/main.php

Large files files are truncated, but you can click here to view the full file

<?php

#Refuse if a direct call has been made
if(!defined('Sprinklers')){header($_SERVER['SERVER_PROTOCOL'].' 404 Not Found', true, 404);exit();}

#Check if config exists, if not redirect to install
if (!file_exists("config.php")) {header("Location: install.php");exit();}

#Change time out to 5 seconds (default is 60)
ini_set('default_socket_timeout', 5);

#Set script timeout to 6 seconds to give time for socket to timeout and return error
set_time_limit(6);

#Include configuration
require_once("config.php");

date_default_timezone_set('UTC');

#Check if PHP has str_getcsv function or if it needs a fallback
if (!function_exists('str_getcsv')) {
    function str_getcsv($input, $delimiter = ',', $enclosure = '"') {
        $fh = fopen('php://temp', 'r+');
        fwrite($fh, $input);
        rewind($fh);
        $row = fgetcsv($fh,0,$delimiter,$enclosure);
        fclose($fh);
        return $row;
    }
}

#Help migrate older configurations
if (!isset($auto_delay)) {
    changeConfig("auto_delay",0);
    $auto_delay = 0;
}

if (!isset($auto_mm)) {
    changeConfig("auto_mm",0);
    $auto_mm = 0;
}

if (!isset($auto_delay_duration)) {
    changeConfig("auto_delay_duration",24);
    $auto_delay_duration = 24;
}

if (!isset($woeid)) {
    $woeid = get_woeid();
    changeConfig("woeid",$woeid);
}

#Get Base URL of Site
if (isset($_SERVER['SERVER_NAME'])) $base_url = (($force_ssl) ? "https://" : "http://").$_SERVER['SERVER_NAME'].$_SERVER['PHP_SELF'];

#Call action if requested and allowed
if (isset($_REQUEST['action'])) {
	if (is_callable($_REQUEST['action'])) {
		if (($_REQUEST['action'] == "gettoken" || $_REQUEST['action'] == "checktoken" || $_REQUEST['action'] == "login") || is_auth()) {
            if (in_array($_REQUEST["action"], array("clear_logs","change_user","add_user","delete_user","make_user_list","auto_mm_on","auto_mm_off","current_status","submit_stations","make_stations_list","get_autodelay","submit_autodelay","get_weather","make_list_logs","gettoken","checktoken","login","runonce","send_en_mm","make_settings_list","make_list_status","make_list_manual","fresh_program","make_all_programs","make_runonce","spoff","spon","mm_off","mm_on","en_on","en_off","rbt","rsn","raindelay","submit_options","delete_program","update_program","get_preview","import_config","export_config"))) {
    			call_user_func($_REQUEST['action']);
            }
		} else {
            header($_SERVER['SERVER_PROTOCOL'].' 401 Unauthorized', true, 401);
        }
		exit();
	} else {
		exit();
	}
}

#Weather functions

#Resolve location to WOEID
function get_woeid() {
    $options = get_options();
    $data = file_get_contents("http://query.yahooapis.com/v1/public/yql?q=select%20woeid%20from%20geo.placefinder%20where%20text=%22".urlencode($options["loc"])."%22");
    preg_match("/<woeid>(\d+)<\/woeid>/", $data, $woeid);
    return intval($woeid[1]);
}

#Get the current weather code and temp
function get_weather_data() {
    global $woeid;
    $data = file_get_contents("http://weather.yahooapis.com/forecastrss?w=".$woeid);
    if ($data === false) return array();
    preg_match("/<yweather:condition\s+text=\"([\w|\s]+)\"\s+code=\"(\d+)\"\s+temp=\"(\d+)\"\s+date=\"(.*)\"/", $data, $newdata);
    preg_match("/<title>Yahoo! Weather - (.*)<\/title>/",$data,$loc);
    preg_match("/<yweather:location .*?country=\"(.*?)\"\/>/",$data,$region);
    $region = $region[1];
    if ($region == "United States" || $region == "Bermuda" || $region == "Palau") {
        $temp = $newdata[3]."&#176;F";
    } else {
        $temp = intval(($newdata[3]-32)*(5/9))."&#176;C";
    }
    $weather = array("text"=>$newdata[1],"code"=>$newdata[2],"temp"=>$temp,"date"=>$newdata[4],"location"=>$loc[1]);
    return $weather;
}

#Lookup code and get the set delay
function code_to_delay($code) {
    global $auto_delay_duration;
    $adverse_codes = array(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,35,37,38,39,40,41,42,43,44,45,46,47);
    $reset_codes = array(36);
    if (in_array($code, $adverse_codes)) return $auto_delay_duration;
    if (in_array($code, $reset_codes)) return 0;
    return false;
}

#Check the current weather for the devices location, and set the appropriate delay, if needed
function weather_to_delay() {
    $weather = get_weather_data();
    $delay = code_to_delay($weather["code"]);
    if ($delay === false) return;
    send_to_os("/cv?pw=&rd=".$delay);
}

function get_weather() {
    echo json_encode(get_weather_data());
}

#Export/Import
function export_config() {
    $data = get_from_os("/gp?d=0");

    preg_match("/pd=\[\];(.*);/", $data, $progs);
    $progs = explode(";", $progs[1]);

    $i = 0;
    foreach ($progs as $prog) {
        $tmp = explode("=", $prog);
        $newdata["programs"][$i] = $tmp[1];
        $i++;
    }
    $newdata["options"] = get_options();

    $vs = get_stations();
    $newdata["stations"] = $vs["stations"];
    $newdata["masop"] = $vs["masop"];

    echo json_encode($newdata);
}

function import_config() {
    if (!isset($_REQUEST["data"])) echo 0;
    $data = json_decode($_REQUEST["data"],true);
    if (is_null($data)) echo 0;
    $cs = "/cs?pw="; $co = "/co?pw="; $cp_start = "/cp?pw="; $i = 0;
    foreach ($data["options"] as $key => $value) {
        if (is_array($value)) {
            if (in_array($key, array(16,21,22,25)) && $value["val"] == 0) continue; 
            $co .= "&o".$key."=".$value["val"];
        } else if ($key == "loc") {
            $co .= "&".$key."=".urlencode($value);
        }
    }
    send_to_os($co);
    foreach ($data["stations"] as $station) {
        $cs .= "&s".$i."=".urlencode($station);
        $i++;
    }
    $i = 0;
    foreach ($data["masop"] as $bit) {
        $cs .= "&m".$i."=".urlencode($bit);
        $i++;
    }
    send_to_os($cs);
    send_to_os("/dp?pw=&pid=-1");
    foreach ($data["programs"] as $prog) {
        send_to_os($cp_start."&pid=-1&v=".$prog);
    }
}

#OpenSprinkler functions

#Get station names
function get_stations() {
    $data = get_from_os("/vs");
    preg_match("/snames=\[(.*)\];/", $data, $matches);
    $rawstations = str_getcsv($matches[1],",","'");
    preg_match("/nboards=(\d+)/", $data, $matches);
    $total = $matches[1] * 8; $current = 1;
    foreach ($rawstations as $station) {
        if ($current > $total) break;
        $station = preg_replace("/\\\u([0-9a-eA-E]{4})/", "&#x\\1;", $station);
        $stations[] = $station;
        $current++;
    }

    preg_match("/masop=\[(.*?)\]/", $data, $masop);
    $masop = explode(",",$masop[1]);

    return array("stations" => $stations,"masop" => $masop);
}

#Get program information
function get_programs() {
    $data = get_from_os("/gp?d=0");

    preg_match_all("/(nprogs|nboards|ipas|mnp)=[\w|\d|.\"]+/", $data, $opts);

    foreach ($opts[0] as $variable) {
        if ($variable === "") continue;
        $tmp = str_replace('"','',explode("=", $variable));
        $newdata[$tmp[0]] = $tmp[1];
    }

    preg_match("/pd=\[\];(.*);/", $data, $progs);
    if (empty($progs)) return $progs;
    $progs = explode(";", $progs[1]);

    $i = 0;
    foreach ($progs as $prog) {
        $tmp = explode("=", $prog);
        $tmp2 = str_replace("[", "", $tmp[1]);
        $tmp2 = str_replace("]", "", $tmp2); 
        $program = explode(",", $tmp2);

        #Reset variables
        $days0 = $program[1]; $days1 = $program[2]; $even = false; $odd = false; $interval = false; $days = ""; $stations = "";

        $newdata["programs"][$i]["en"] = $program[0];
        $newdata["programs"][$i]["start"] = $program[3];
        $newdata["programs"][$i]["end"] = $program[4];
        $newdata["programs"][$i]["interval"] = $program[5];
        $newdata["programs"][$i]["duration"] = $program[6];

        for ($n=0; $n < $newdata["nboards"]; $n++) {
            $bits = $program[7+$n];
            for ($s=0; $s < 8; $s++) { 
                $stations .= ($bits&(1<<$s)) ? "1" : "0";
            }
        }
        $newdata["programs"][$i]["stations"] = $stations;

        if(($days0&0x80)&&($days1>1)){
            #This is an interval program
            $days=array($days1,$days0&0x7f);
            $interval = true;
        } else {
            #This is a weekly program 
            for($d=0;$d<7;$d++) {
                if ($days0&(1<<$d)) {
                    $days .= "1";
                } else {
                    $days .= "0";
                }
            }
            if(($days0&0x80)&&($days1==0))  {$even = true;}
            if(($days0&0x80)&&($days1==1))  {$odd = true;}
        }

        $newdata["programs"][$i]["days"] = $days;
        $newdata["programs"][$i]["is_even"] = $even;
        $newdata["programs"][$i]["is_odd"] = $odd;
        $newdata["programs"][$i]["is_interval"] = $interval;
        $i++;
    }
    return $newdata;
}

function get_preview() {
    process_programs($_REQUEST["m"],$_REQUEST["d"],$_REQUEST["y"]);
}

function process_programs($month,$day,$year) {
    $newdata = array();

    $newdata["settings"] = get_settings();
    $vs = get_stations();
    $newdata["stations"] = $vs["stations"];

    $data = get_from_os("/gp?d=".$day."&m=".$month."&y=".$year);
    preg_match_all("/(seq|mas|wl|sdt|mton|mtoff|devday|devmin|dd|mm|yy|nprogs|nboards|ipas|mnp)=[\w|\d|.\"]+/", $data, $opts);

    foreach ($opts[0] as $variable) {
        if ($variable === "") continue;
        $tmp = str_replace('"','',explode("=", $variable));
        $newdata[$tmp[0]] = $tmp[1];
    }

    preg_match("/masop=\[(.*?)\]/", $data, $masop);
    $newdata["masop"] = explode(",",$masop[1]);

    preg_match("/pd=\[\];(.*);/", $data, $progs);
    $progs = explode(";", $progs[1]);

    $i = 0;
    foreach ($progs as $prog) {
        $tmp = explode("=", $prog);
        $tmp2 = str_replace("[", "", $tmp[1]);
        $tmp2 = str_replace("]", "", $tmp2);
        $newdata["programs"][$i] = explode(",",$tmp2);
        $i++;
    }
    
    $simminutes=0;
    $simt=strtotime($newdata["mm"]."/".$newdata["dd"]."/".$newdata["yy"]);
    $simdate=date(DATE_RSS,$simt);
    $simday = ($simt/3600/24)>>0;
    $match=array(0,0);
    $st_array=array($newdata["nboards"]*8);
    $pid_array=array($newdata["nboards"]*8);
    $et_array=array($newdata["nboards"]*8);
    for($sid=0;$sid<$newdata["nboards"]*8;$sid++) {
        $st_array[$sid]=0;$pid_array[$sid]=0;$et_array[$sid]=0;
    }
    do {
        $busy=0;
        $match_found=0;
        for($pid=0;$pid<$newdata["nprogs"];$pid++) {
          $prog=$newdata["programs"][$pid];
          if(check_match($prog,$simminutes,$simdate,$simday,$newdata)) {
            for($sid=0;$sid<$newdata["nboards"]*8;$sid++) {
              $bid=$sid>>3;$s=$sid%8;
              if($newdata["mas"]==($sid+1)) continue; // skip master station
              if($prog[7+$bid]&(1<<$s)) {
                $et_array[$sid]=$prog[6]*$newdata["wl"]/100>>0;$pid_array[$sid]=$pid+1;
                $match_found=1;
              }
            }
          }
        }
        if($match_found) {
          $acctime=$simminutes*60;
          if($newdata["seq"]) {
            for($sid=0;$sid<$newdata["nboards"]*8;$sid++) {
              if($et_array[$sid]) {
                $st_array[$sid]=$acctime;$acctime+=$et_array[$sid];
                $et_array[$sid]=$acctime;$acctime+=$newdata["sdt"];
                $busy=1;
              }
            }
          } else {
            for($sid=0;$sid<$newdata["nboards"]*8;$sid++) {
              if($et_array[$sid]) {
                $st_array[$sid]=$simminutes*60;
                $et_array[$sid]=$simminutes*60+$et_array[$sid];
                $busy=1;
              }
            }
          }
        }
        if ($busy) {
          $endminutes=run_sched($simminutes*60,$st_array,$pid_array,$et_array,$newdata,$simt)/60>>0;
          if($newdata["seq"]&&$simminutes!=$endminutes) $simminutes=$endminutes;
          else $simminutes++;
          for($sid=0;$sid<$newdata["nboards"]*8;$sid++) {$st_array[$sid]=0;$pid_array[$sid]=0;$et_array[$sid]=0;}
        } else {
          $simminutes++;
        }
    } while($simminutes<24*60);
}

function check_match($prog,$simminutes,$simdate,$simday,$data) {
    if($prog[0]==0) return 0;
    if (($prog[1]&0x80)&&($prog[2]>1)) {
        $dn=$prog[2];$drem=$prog[1]&0x7f;
        if(($simday%$dn)!=(($data["devday"]+$drem)%$dn)) return 0;
    } else {
        $wd=(date("w",strtotime($simdate))+6)%7;
        if(($prog[1]&(1<<$wd))==0)  return 0;
        $dt=date("j",strtotime($simdate));
        if(($prog[1]&0x80)&&($prog[2]==0))  {if(($dt%2)!=0) return 0;}
        if(($prog[1]&0x80)&&($prog[2]==1))  {
          if($dt==31) return 0;
          else if ($dt==29 && date("n",strtotime($simdate))==2) return 0;
          else if (($dt%2)!=1) return 0;
        }
    }
    if($simminutes<$prog[3] || $simminutes>$prog[4]) return 0;
    if($prog[5]==0) return 0;
    if((($simminutes-$prog[3])/$prog[5]>>0)*$prog[5] == ($simminutes-$prog[3])) {
        return 1;
    }
        return 0;
}

function run_sched($simseconds,$st_array,$pid_array,$et_array,$data,$simt) {
  $endtime=$simseconds;
  for($sid=0;$sid<$data["nboards"]*8;$sid++) {
    if($pid_array[$sid]) {
      if($data["seq"]==1) {
        time_to_text($sid,$st_array[$sid],$pid_array[$sid],$et_array[$sid],$data,$simt);
        if(($data["mas"]>0)&&($data["mas"]!=$sid+1)&&($data["masop"][$sid>>3]&(1<<($sid%8))))
            echo "{'start': ".($st_array[$sid]+$data["mton"]).",'end': ".($et_array[$sid]+$data["mtoff"]).",'content':'','className':'master','group':'Master'},";
        $endtime=$et_array[$sid];
      } else {
        time_to_text($sid,$simseconds,$pid_array[$sid],$et_array[$sid],$data,$simt);
        if(($data["mas"]>0)&&($data["mas"]!=$sid+1)&&($data["masop"][$sid>>3]&(1<<($sid%8))))
          $endtime=($endtime>$et_array[$sid])?$endtime:$et_array[$sid];
      }
    }
  }
  if($data["seq"]==0&&$data["mas"]>0) echo "{'start': ".$simseconds.",'end': ".$endtime.",'content':'','className':'master','group':'Master'},";
  return $endtime;
}

function time_to_text($sid,$start,$pid,$end,$data,$simt) {
    $class = "program-".(($pid+3)%4);
    if (($data["settings"]["rd"]!=0)&&($simt+$start+($data["settings"]["tz"]-48)*900<=$data["settings"]["rdst"])) $class="delayed";
    echo "{'start': ".$start.",'end': ".$end.",'className':'".$class."','content':'P".$pid."','group':'".$data["stations"][$sid]."'},";
}

#Get OpenSprinkler options
function get_options() {
    $data = get_from_os("/vo");
    preg_match("/var opts=\[(.*)\];/", $data,$opts);
    preg_match("/loc=\"(.*)\"/",$data,$loc);
    preg_match("/nopts=(\d+)/", $data, $nopts);

    $newdata["loc"] = $loc[1];
    $newdata["nopts"] = $nopts[1];

    $data = explode(",", $opts[1]);

    for ($i=3; $i <= count($data); $i=$i+4) {
        $o = intval($data[$i]);
        if (in_array($o, array(1,12,13,15,16,17,18,19,20,21,22,23,25))) $newdata[$o] = array("en" => $data[$i-2],"val" => $data[$i-1]);
    }
    $newdata = move_keys(array(15,17,19,20,23),$newdata);
    $newdata = move_keys(array(16,21,22,25),$newdata);
    return $newdata;
}

#Get OpenSprinkler settings
function get_settings() {
    $data = get_from_os("");
    preg_match_all("/(ver|devt|nbrd|tz|en|rd|rs|mm|rdst|mas|urs|wl|ipas)=[\w|\d|.\"]+/", $data, $matches);
    preg_match("/loc=\"(.*)\"/",$data,$loc);
    preg_match("/lrun=\[(.*)\]/", $data, $lrun);
    preg_match("/ps=\[(.*)\];/",$data,$ps);
    $ps = explode("],[",$ps[1]);
    $i = 0;
    foreach ($ps as $p) {
        $ps[$i] = explode(",",str_replace(array("[","]"), "", $ps[$i]));
        $i++;
    }
    $newdata = array("ps" => $ps, "lrun" => explode(",", $lrun[1]), "loc" => $loc[1]);
    foreach ($matches[0] as $variable) {
        if ($variable === "") continue;
        $tmp = str_replace('"','',explode("=", $variable));
        $newdata[$tmp[0]] = $tmp[1];
    }
    return $newdata;
}

function get_station_status() {
    preg_match("/\d+/", get_from_os("/sn0"), $data);
    return str_split($data[0]);
}

#Check if operation and manual mode are enabled. Also return version information
function start_data() {
    $settings = get_settings();
    $en = ($settings["en"] == 1) ? "selected" : "";
    $mm = ($settings["mm"] == 1) ? "selected" : "";
    $ver = join(".",str_split($settings["ver"]));
    return array("en"=>$en,"mm"=>$mm,"ver"=>$ver);
}

function get_autodelay() {
    global $auto_delay,$auto_delay_duration;
    echo json_encode(array("auto_delay"=>$auto_delay,"auto_delay_duration"=>$auto_delay_duration));
}

#Send command to OpenSprinkler
function send_to_os($url) {
    global $os_ip, $os_pw;
    $url = str_replace("pw=", "pw=".$os_pw, $url);
    $result = file_get_contents("http://".$os_ip.$url);
    if ($result === false) { echo 0; exit(); }
    echo 1;
}

function get_from_os($url) {
    global $os_ip, $os_pw;
    $url = str_replace("pw=", "pw=".$os_pw, $url);
    return file_get_contents("http://".$os_ip.$url);
}

#Updates a program
function update_program() {
    send_to_os("/cp?pw=&pid=".$_REQUEST["pid"]."&v=".$_REQUEST["data"]);
}

#Deletes a program
function delete_program() {
    send_to_os("/dp?pw=&pid=".$_REQUEST["pid"]);
}

#Submit auto-delay settings
function submit_autodelay() {
    global $auto_delay,$auto_delay_duration;
    $autodelay = json_decode($_REQUEST["autodelay"],true);
    $switch = ($autodelay["auto_delay"] === "on") ? 1 : 0;
    if ($switch !== $auto_delay) {
        $auto_delay = $switch;
        if (!changeConfig("auto_delay",$switch)) {
            echo 2;
            exit();
        }
    }
    $switch = intval($autodelay["auto_delay_duration"]);
    if ($switch !== $auto_delay_duration) {
        $auto_delay_duration = $switch;
        if (!changeConfig("auto_delay_duration",$switch)) {
            echo 2;
            exit();
        }
    }
    echo 1;
}

#Submit updated options
function submit_options() {
    send_to_os("/co?pw=&".http_build_query(json_decode($_REQUEST["options"])));
    $woeid = get_woeid();
    changeConfig("woeid",$woeid);
}

#Submit updated stations
function submit_stations() {
    $masop = (isset($_REQUEST["masop"])) ? "&".http_build_query(json_decode($_REQUEST["masop"])) : "";
    send_to_os("/cs?pw=&".http_build_query(json_decode($_REQUEST["names"])).$masop);
}

#Submit run-once program
function runonce() {
    send_to_os("/cr?pw=&t=".$_REQUEST["data"]);    
}

#Submit rain delay
function raindelay() {
    send_to_os("/cv?pw=&rd=".$_REQUEST["delay"]);
}

#Reset all stations (turn-off)
function rsn() {
    send_to_os("/cv?pw=&rsn=1");
}

#Reboot OpenSprinkler
function rbt() {
    send_to_os("/cv?pw=&rbt=1");
}

#Change operation to on
function en_on() {
    send_to_os("/cv?pw=&en=1");
}

#Change operation to off
function en_off() {
    send_to_os("/cv?pw=&en=0");
}

#Switch manual mode on
function mm_on() {
    send_to_os("/cv?pw=&mm=1");
}

#Switch manual mode off
function mm_off() {
    send_to_os("/cv?pw=&mm=0");
}

#Turn specific station on
function spon() {
    send_to_os("/sn".$_REQUEST["zone"]."=1&t=0");
}

#Turn specific station off
function spoff() {
    send_to_os("/sn".$_REQUEST["zone"]."=0");
}

#Turn off automatic disable of manual mode
function auto_mm_off() {
    if (changeConfig("auto_mm",0)) {
        $auto_mm = 0;
        echo 1;
        exit();
    }
    echo 0;
}

#Turn on automatic disable of manual mode
function auto_mm_on() {
    if (changeConfig("auto_mm",1)) {
        $auto_mm = 1;
        echo 1;
        exit();
    }
    echo 0;
}

#Content generation functions
function make_list_logs() {
    #Adapted from the script written by David B. Gustavson, 20121021
    global $log_file;
    
    $graphing = isset($_REQUEST["type"]) && $_REQUEST["type"] == "graph";

    if (!$graphing) $list = "<div data-role='collapsible-set' data-inset='true' data-theme='b' data-collapsed-icon='arrow-d' data-expanded-icon='arrow-u'>";
    $vs = get_stations();
    $ValveName = $vs["stations"];
    $settings = get_settings();
    $tz = $settings["tz"] - 48;
    $tz = (($tz>=0) ? "+" : "-").((abs($tz)/4)*60*60)+(((abs($tz)%4)*15/10).((abs($tz)%4)*15%10) * 60);

    $SprinklerValveHistory=file_get_contents($log_file);
    $Lines=explode("\n",$SprinklerValveHistory);
    $SprinklerPattern = array();

    for ($i=0;$i<count($Lines);$i++){
        $ELines[$i]=explode("--",$Lines[$i]);
        if (count($ELines[$i])>1){
            $timeThis=strtotime($ELines[$i][1]);
            if (!(($timeThis >= $_REQUEST["start"]) && ($timeThis <= $_REQUEST["end"]))) continue;
            $SprinklerPattern[]=str_split($ELines[$i][0]);
            $SprinklerTime[]=$ELines[$i][1];
            $SprinklerTimeConverted[]=strtotime($ELines[$i][1]);
            if ($settings["urs"] == 1 && isset($ELines[$i][2])) $RainSensor[]=$ELines[$i][2];
            if (isset($ELines[$i][3])) $RainDelay[]=$ELines[$i][3];
        };
    };
    for ($i=0;$i<count($SprinklerPattern);$i++){
        if (isset($RainSensor[$i])) {
            if (($i>0) && ($RainSensor[$i-1]=="1") && ($RainSensor[$i]=="0") || ($i==count($RainSensor)-1) && ($RainSensor[$i]=="1")) {
                    $TimeNow = $SprinklerTimeConverted[$i];
                    $TimeBegin = $TimeNow;

                    for ($k=1;$k<$i;$k++) {
                        if ($RainSensor[$i-$k]=="1"){
                            $TimeBegin=$SprinklerTimeConverted[$i-$k];
                        } else { break; };
                    };

                    if (($i==count($RainSensor)-1)&&($RainSensor[$i]=="1")) $TimeNow = time();

                    $TimeElapsed=$TimeNow-$TimeBegin;
                    $now = (($i==count($RainSensor)-1)&&($RainSensor[$i]=="1"));

                    if (!$TimeElapsed && !$now) continue;
                    $RainHistory[]= array($SprinklerTime[$i], $TimeElapsed, ($now ? " Running Now" : ""));
            }
        }

        if (isset($RainDelay[$i])) {
            if (($i>0) && ($RainDelay[$i-1]=="1") && ($RainDelay[$i]=="0") || ($i==count($RainDelay)-1) && ($RainDelay[$i]=="1")) {
                    $TimeNow = $SprinklerTimeConverted[$i];
                    $TimeBegin = $TimeNow;

                    for ($k=1;$k<$i;$k++) {
                        if ($RainDelay[$i-$k]=="1"){
                            $TimeBegin=$SprinklerTimeConverted[$i-$k];
                        } else { break; };
                    };

                    if (($i==count($RainDelay)-1)&&($RainDelay[$i]=="1")) $TimeNow = time();

                    $TimeElapsed=$TimeNow-$TimeBegin;
                    $now = (($i==count($RainDelay)-1)&&($RainDelay[$i]=="1"));

                    if (!$TimeElapsed && !$now) continue;
                    $DelayHistory[]= array($SprinklerTime[$i], $TimeElapsed, ($now ? " Running Now" : ""));
            }
        }

        for ($j=0;$j<count($ValveName);$j++){
            if (!isset($SprinklerPattern[$i-1][$j])) continue;
            if (($i>0) && ($SprinklerPattern[$i-1][$j]=="1") && ($SprinklerPattern[$i][$j]=="0")|| ($i==count($SprinklerPattern)-1) && ($SprinklerPattern[$i][$j]=="1")) {
                $TimeNow = $SprinklerTimeConverted[$i];
                $TimeBegin = $TimeNow;

                for ($k=1;$k<$i;$k++) {
                    if ($SprinklerPattern[$i-$k][$j]=="1"){
                        $TimeBegin=$SprinklerTimeConverted[$i-$k];
                    } else { break; };
                };

                if (($i==count($SprinklerPattern)-1)&&($SprinklerPattern[$i][$j]=="1")) $TimeNow = time();

                $TimeElapsed=$TimeNow-$TimeBegin;
                $now = (($i==count($SprinklerPattern)-1)&&($SprinklerPattern[$i][$j]=="1"));

                if (!$TimeElapsed && !$now) continue;
                $ValveHistory[$j][]= array($SprinklerTime[$i], $TimeElapsed, ($now ? " Running Now" : ""));
            };
        };
    };
    $table_header = "<table><thead><tr><th data-priority='1'>Runtime</th><th data-priority='2'>Date/Time</th></tr></thead><tbody>";
    $hour = array(array(0,0),array(1,0),array(2,0),array(3,0),array(4,0),array(5,0),array(6,0),array(7,0),array(8,0),array(9,0),array(10,0),array(11,0),array(12,0),array(13,0),array(14,0),array(15,0),array(16,0),array(17,0),array(18,0),array(19,0),array(20,0),array(21,0),array(22,0),array(23,0));
    $month = array(array(0,0),array(1,0),array(2,0),array(3,0),array(4,0),array(5,0),array(6,0),array(7,0),array(8,0),array(9,0),array(10,0),array(11,0));
    $dow = array(array(0,0),array(1,0),array(2,0),array(3,0),array(4,0),array(5,0),array(6,0));
    $data = array();
    for ($j=0;$j<count($ValveName);$j++) {
        if ($graphing) {
            if (isset($_REQUEST["sort"])) {
                switch ($_REQUEST["sort"]) {
                    case 'dow':
                        $data[$j] = $dow;
                        $date_needed = "w";
                        break;
                    case 'month':
                        $data[$j] = $month;
                        $date_needed = "n";
                        break;
                    case 'hour':
                        $data[$j] = $hour;
                        $date_needed = "G";
                        break;
                    default:
                        break;
                }
            } else {
                $data[$j] = array();
                $date_needed = "U";
            }
        }
        if (!isset($ValveHistory[$j])) continue;
        if (!$graphing) {
            $ct=count($ValveHistory[$j]);
            $list .= "<div data-role='collapsible' data-collapsed='true'><h2><div class='ui-btn-up-c ui-btn-corner-all custom-count-pos'>".$ct.(($ct == 1) ? " run" : " runs" )."</div>".$ValveName[$j]."</h2>".$table_header;
        }
        for ($k=0;$k<count($ValveHistory[$j]);$k++){
            $theTime = strtotime($ValveHistory[$j][$k][0])+$tz;
            $mins = round($ValveHistory[$j][$k][1]/60);
            if ($graphing) {
                $info = intval(date($date_needed,$theTime));
                if (isset($_REQUEST["sort"])) {
                    $data[$j][$info][1] += $mins;
                } else {
                    $data[$j][] = array($info*1000,0);
                    $data[$j][] = array($info*1000,$mins);
                    $data[$j][] = array(($info+($mins*60))*1000,0);
                }
            } else {
                $list .= "<tr><td>".$mins.(($mins == 1) ? " min" : " mins")."</td><td>".date('D, d M Y H:i',$theTime).$ValveHistory[$j][$k][2]."</td></tr>";                    
            }
        };
        if (!$graphing) $list .= "</tbody></table></div>";
    };
    $ValveName[$j] = "Rain Sensor";
    if ($graphing) {
        if (isset($_REQUEST["sort"])) {
            switch ($_REQUEST["sort"]) {
                case 'dow':
                    $data[$j] = $dow;
                    $date_needed = "w";
                    break;
                case 'month':
                    $data[$j] = $month;
                    $date_needed = "n";
                    break;
                case 'hour':
                    $data[$j] = $hour;
                    $date_needed = "G";
                    break;
                default:
                    break;
            }
        } else {
            $data[$j] = array();
            $date_needed = "U";
        }
    }
    if (isset($RainHistory)) {
        if (!$graphing) {
            $ct=count($RainHistory);
            $list .= "<div data-role='collapsible' data-collapsed='true'><h2><div class='ui-btn-up-c ui-btn-corner-all custom-count-pos'>".$ct.(($ct == 1) ? " switch" : " switches" )."</div>Rain Sensor</h2>".$table_header;
        }
        for ($k=0;$k<count($RainHistory);$k++){
            $theTime=strtotime($RainHistory[$k][0])+$tz;
            $mins = round($RainHistory[$k][1]/60);
            if ($graphing) {
                $info = intval(date($date_needed,$theTime));
                if (isset($_REQUEST["sort"])) {
                    $data[$j][$info][1] += $mins;
                } else {
                    $data[$j][] = array($info*1000,0);
                    $data[$j][] = array($info*1000,$mins);
                    $data[$j][] = array(($info+($mins*60))*1000,0);
                }
            } else {
                $list .= "<tr><td>".$mins.(($mins == 1) ? " min" : " mins")."</td><td>".date('D, d M Y H:i',$theTime).$RainHistory[$k][2]."</td></tr>";
            }
        };
        if (!$graphing) $list .= "</tbody></table></div>";
    }
    $j++; $ValveName[$j] = "Rain Delay";
    if ($graphing) {
        if (isset($_REQUEST["sort"])) {
            switch ($_REQUEST["sort"]) {
                case 'dow':
                    $data[$j] = $dow;
                    $date_needed = "w";
                    break;
                case 'month':
                    $data[$j] = $month;
                    $date_needed = "n";
                    break;
                case 'hour':
                    $data[$j] = $hour;
                    $date_needed = "G";
                    break;
                default:
                    break;
            }
        } else {
            $data[$j] = array();
            $date_needed = "U";
        }
    }
    if (isset($DelayHistory)) {
        if (!$graphing) {
            $ct=count($DelayHistory);
            $list .= "<div data-role='collapsible' data-collapsed='true'><h2><div class='ui-btn-up-c ui-btn-corner-all custom-count-pos'>".$ct.(($ct == 1) ? " change" : " changes" )."</div>Rain Delay</h2>".$table_header;
        }
        for ($k=0;$k<count($DelayHistory);$k++){
            $theTime=strtotime($DelayHistory[$k][0])+$tz;
            $mins = round($DelayHistory[$k][1]/60);
            if ($graphing) {
                $info = intval(date($date_needed,$theTime));
                if (isset($_REQUEST["sort"])) {
                    $data[$j][$info][1] += $mins;
                } else {
                    $data[$j][] = array($info*1000,0);
                    $data[$j][] = array($info*1000,$mins);
                    $data[$j][] = array(($info+($mins*60))*1000,0);
                }
            } else {
                $list .= "<tr><td>".$mins.(($mins == 1) ? " min" : " mins")."</td><td>".date('D, d M Y H:i',$theTime).$DelayHistory[$k][2]."</td></tr>";
            }
        };
        if (!$graphing) $list .= "</tbody></table></div>";
    }

    if ($graphing) {
        echo json_encode(array("data" => $data, "stations" => $ValveName));    
    } else {
        echo $list."</div>";
    }
}

#Make run-once list
function make_runonce() {
    $list = "<p style='text-align:center'>Value is in minutes. Zero means the station will be excluded from the run-once program.</p><div data-role='fieldcontain'>";
    $n = 0;
    $data = get_programs();
    $vs = get_stations();
    $stations = $vs["stations"];
    foreach ($stations as $station) {
        $list .= "<label for='zone-".$n."'>".$station.":</label><input type='number' data-highlight='true' data-type='range' name='zone-".$n."' min='0' max='50' id='zone-".$n."' value='0'>";
        $n++;
    }
    $list .= "</div><a data-role='button' onclick='submit_runonce();'>Submit</a><a data-role='button' data-theme='a' onclick='reset_runonce();'>Reset</a>";
    $progs = array();
    if (count($data["programs"])) {
        foreach ($data["programs"] as $program) {
            $prog = array();
            $set_stations = str_split($program["stations"]);
            for ($i=0;$i<count($stations);$i++) { 
                $prog[] = (isset($set_stations[$i]) && $set_stations[$i]) ? $program["duration"] : 0;
            }
            $progs[] = $prog;
        }
    }
    echo json_encode(array("page"=>$list,"progs"=>$progs));
}

#Make the list of all programs
function make_all_programs() {
    $data = get_programs();
    $total = count($data["programs"]);
    if ($total == 0) {
        echo "<p style='text-align:center'>You have no programs currently added. Tap the Add button on the top right corner to get started.</p>";
        return;
    }
    $vs = get_stations();
    $stations = $vs["stations"];
    $n = 0;
    $list = "<p style='text-align:center'>Click any program below to expand/edit. Be sure to save changes by hitting submit below.</p><div data-role='collapsible-set'>";
    foreach ($data["programs"] as $program) {
        $list .= make_program($n,$total,$stations,$program);
        $n++;
    }
    echo $list."</div>";
}

#Generate a new program view
function fresh_program() {
    $vs = get_stations();
    $stations = $vs["stations"];
    echo make_program("new",1,$stations);
}

function make_program($n,$total,$stations,$program=array("en"=>0,"is_interval"=>0,"is_even"=>0,"is_odd"=>0,"duration"=>0,"interval"=>0,"start"=>0,"end"=>0)) {
    $week = array("M", "T", "W", "R", "F", "Sa", "Su");
    if (isset($program["days"])) {
        if (is_array($program["days"])) {
            $days = $program["days"];
        } else {
            $days = str_split($program["days"]);
        }
    } else {
        $days = array(0,0,0,0,0,0,0);
    }
    if (isset($program["stations"])) $set_stations = str_split($program["stations"]);
    $list = "<fieldset ".((!$n && $total == 1) ? "data-collapsed='false'" : "")." id='program-".$n."' ".(($n === "new") ? "" : "data-role='collapsible'").">";
    if ($n !== "new") $list .= "<legend>Program ".($n + 1)."</legend>";
    $list .= "<input data-mini='true' type='checkbox' ".(($program["en"] || $n==="new") ? "checked='checked'" : "")." name='en-".$n."' id='en-".$n."'><label for='en-".$n."'>Enabled</label>";
    $list .= "<fieldset data-role='controlgroup' data-type='horizontal' style='text-align: center'>";
    $list .= "<input data-mini='true' type='radio' name='rad_days-".$n."' id='days_week-".$n."' value='days_week-".$n."' ".(($program["is_interval"]) ? "" : "checked='checked'")."><label for='days_week-".$n."'>Weekly</label>";
    $list .= "<input data-mini='true' type='radio' name='rad_days-".$n."' id='days_n-".$n."' value='days_n-".$n."' ".(($program["is_interval"]) ? "checked='checked'" : "")."><label for='days_n-".$n."'>Interval</label>";
    $list .= "</fieldset><div id='input_days_week-".$n."' ".(($program["is_interval"]) ? "style='display:none'" : "").">";

    $list .= "<fieldset data-role='controlgroup' data-type='horizontal' style='text-align: center'><p style='margin:0'>Restrictions</p>";
    $list .= "<input data-mini='true' type='radio' name='rad_rst-".$n."' id='days_norst-".$n."' value='days_norst-".$n."' ".((!$program["is_even"] && !$program["is_odd"]) ? "checked='checked'" : "")."><label for='days_norst-".$n."'>None</label>";
    $list .= "<input data-mini='true' type='radio' name='rad_rst-".$n."' id='days_odd-".$n."' value='days_odd-".$n."' ".((!$program["is_even"] && $program["is_odd"]) ? "checked='checked'" : "")."><label for='days_odd-".$n."'>Odd Days</label>";
    $list .= "<input data-mini='true' type='radio' name='rad_rst-".$n."' id='days_even-".$n."' value='days_even-".$n."' ".((!$program["is_odd"] && $program["is_even"]) ? "checked='checked'" : "")."><label for='days_even-".$n."'>Even Days</label>";
    $list .= "</fieldset>";

    $list .= "<fieldset data-type='horizontal' data-role='controlgroup' style='text-align: center'><p style='margin:0'>Days of the Week</p>";
    $j = 0;            
    foreach ($week as $day) {
        $list .= "<input data-mini='true' type='checkbox' ".((!$program["is_interval"] && $days[$j]) ? "checked='checked'" : "")." name='d".$j."-".$n."' id='d".$j."-".$n."'><label for='d".$j."-".$n."'>".$day."</label>";
        $j++;
    }
    $list .= "</fieldset></div>";

    $list .= "<div ".(($program["is_interval"]) ? "" : "style='display:none'")." id='input_days_n-".$n."' class='ui-grid-a'>";
    $list .= "<div class='ui-block-a'><label for='every-".$n."'>Interval (Days)</label><input data-mini='true' type='number' name='every-".$n."' pattern='[0-9]*' id='every-".$n."' value='".$days[0]."'></div>";
    $list .= "<div class='ui-block-b'><label for='starting-".$n."'>Starting In</label><input data-mini='true' type='number' name='starting-".$n."' pattern='[0-9]*' id='starting-".$n."' value='".$days[1]."'></div>";
    $list .= "</div>";

    $list .= "<fieldset data-role='controlgroup'><legend>Stations:</legend>";
    $j = 0;
    foreach ($stations as $station) {
        $list .= "<input data-mini='true' type='checkbox' ".((isset($set_stations) && $set_stations[$j]) ? "checked='checked'" : "")." name='station_".$j."-".$n."' id='station_".$j."-".$n."'><label for='station_".$j."-".$n."'>".$station."</label>";
        $j++;
    }
    $list .= "</fieldset>";

    $list .= "<fieldset data-role='controlgroup' data-type='horizontal' style='text-align: center'>";
    $list .= "<input data-mini='true' type='reset' name='s_checkall-".$n."' id='s_checkall-".$n."' value='Check All' />";
    $list .= "<input data-mini='true' type='reset' name='s_uncheckall-".$n."' id='s_uncheckall-".$n."' value='Uncheck All' />";
    $list .= "</fieldset>";

    $list .= "<div class='ui-grid-a'>";
    $list .= "<div class='ui-block-a'><label for='start-".$n."'>Start Time</label><input data-mini='true' type='time' name='start-".$n."' id='start-".$n."' value='".gmdate("H:i", $program["start"]*60)."'></div>";
    $list .= "<div class='ui-block-b'><label for='end-".$n."'>End Time</label><input data-mini='true' type='time' name='end-".$n."' id='end-".$n."' value='".gmdate("H:i", $program["end"]*60)."'></div>";
    $list .= "</div>";

    $list .= "<label for='duration-".$n."'>Duration (minutes)</label><input data-mini='true' type='number' data-highlight='true' data-type='range' name='duration-".$n."' min='0' max='300' id='duration-".$n."' value='".($program["duration"]/60)."'>";
    $list .= "<label for='interval-".$n."'>Interval (minutes)</label><input data-mini='true' type='number' data-highlight='true' data-type='range' name='interval-".$n."' min='0' max='1439' id='interval-".$n."' value='".($program["interval"])."'><br>";
    if ($n === "new") {
        $list .= "<input data-mini='true' type='submit' name='submit-".$n."' id='submit-".$n."' value='Save New Program'></fieldset>";
    } else {
        $list .= "<input data-mini='true' type='submit' name='submit-".$n."' id='submit-".$n."' value='Save Changes to Program ".($n + 1)."'>";
        $list .= "<input data-mini='true' data-theme='a' type='submit' name='delete-".$n."' id='delete-".$n."' value='Delete Program ".($n + 1)."'></fieldset>";
    }
    return $list;
}

#Make the manual list
function make_list_manual() {
    $list = '<li data-role="list-divider" data-theme="a">Sprinkler Stations</li>';
    $vs = get_stations();
    $stations = $vs["stations"];
    $status = get_station_status();
    $i = 0;

    foreach ($stations as $station) {
        $list .= '<li data-icon="false"><a style="text-align:center" '.(($status[$i]) ? 'class="green" ' : '').'href="#" onclick="toggle(this);">'.$station.'</a></li>';
        $i++;
    }
    echo $list;
}

function current_status() {
    $settings = get_settings();
    $vs = get_stations();
    $stations = $vs["stations"];
    $status = get_station_status();
    $options = get_options();

    if (!$settings["en"]) {
        $line = "<p id='running-text' style='text-align:center'>System Disabled</p>";
        echo json_encode(array("color" => "red","line" => $line,"seconds" => 0,"sdelay" => $options[17]["val"])); return;
    }

    if ($settings["rd"]) {
        $line = "<p id='running-text' style='text-align:center'>Rain delay until ".gmdate("D, d M Y H:i:s",$settings["rdst"])."</p>";
        echo json_encode(array("color" => "red","line" => $line,"seconds" => 0,"sdelay" => $options[17]["val"])); return;
    }

    if ($settings["urs"] && $settings["rs"]) {
        $line = "<p id='running-text' style='text-align:center'>Rain detected</p>";
        echo json_encode(array("color" => "red","line" => $line,"seconds" => 0,"sdelay" => $options[17]["val"])); return;
    }

    $open = array_keys($status,true);
    if (count($open) >= 2) {
        $ptotal = 0;
        foreach ($open as $key => $value) {
            $tmp = $settings["ps"][$value][1];
            if ($tmp > $ptotal) $ptotal = $tmp;
        }
        $sample = $open[0];
        $pname = pidname($settings["ps"][$sample][0]);
        $line = "<img id='running-icon' width='11px' height='11px' src='img/running.png' /><p id='running-text'>";
        $line .= $pname." is running on ".count($open)." stations ";
        if ($pname != "Manual program") $line .= "<span id='countdown' class='nobr'>(".sec2hms($ptotal)." remaining)</span>";
        $line .= "</p>";
        echo json_encode(array("color" => "green","line" => $line,"seconds" => $ptotal,"sdelay" => $options[17]["val"]));
        return;
    }

    $i = 0;
    foreach ($stations as $station) {
        $info = "";
        if ($settings["ps"][$i][0] && $status[$i]) {
            $pname= pidname($settings["ps"][$i][0]);
            $line = "<img id='running-icon' width='11px' height='11px' src='img/running.png' /><p id='running-text'>";
            $line .= $pname." is running on station <span class='nobr'>".$station."</span> ";
            if ($pname != "Manual program") $line .= "<span id='countdown' class='nobr'>(".sec2hms($settings["ps"][$i][1])." remaining)</span>";
            $line .= "</p>";
            echo json_encode(array("color" => "green","line" => $line,"seconds" => $settings["ps"][$i][1],"sdelay" => $options[17]["val"]));
            return;
        }
        $i++;
    }

    if ($settings["mm"]) {
        $line = "<p id='running-text' style='text-align:center'>Manual mode enabled</p>";
        echo json_encode(array("color" => "red","line" => $line,"seconds" => 0,"sdelay" => $options[17]["val"])); return;
    }
}

#Generate status page
function make_list_status() {
    $settings = get_settings();
    $vs = get_stations();
    $stations = $vs["stations"];
    $status = get_station_status();
    $options = get_options();

    $runningTotal = array();
    $allPnames = array();

    $list = "";$tz = $settings['tz']-48;
    $tz = (($tz>=0) ? "+" : "-").(abs($tz)/4>>0).":".((abs($tz)%4)*15/10>>0).((abs($tz)%4)*15%10);
    
    $header = "<span id='clock-s' class='nobr'>".gmdate("D, d M Y H:i:s",$settings["devt"])."</span> GMT ".$tz;
    $runningTotal["c"] = $settings["devt"];

    $i = 0;
    foreach ($stations as $station) {
        $info = "";
        if ($settings["ps"][$i][0]) {
            $rem=$settings["ps"][$i][1];
            $remm=$rem/60>>0;
            $rems=$rem%60;
            $pname= pidname($settings["ps"][$i][0]);
            if ($status[$i] && $pname != "Manual program") $runningTotal[$i] = $rem;
            $allPnames[$i] = $pname;
            $info = "<p class='rem'>".(($status[$i]) ? "Running" : "Scheduled" )." ".$pname;
            if ($pname != "Manual program") $info .= " <span id='countdown-".$i."' class='nobr'>(".($remm/10>>0).($remm%10).":".($rems/10>>0).($rems%10)." remaining)</span>";
            $info .= "</p>";
        }
        if ($settings["mas"] == $i+1) $station .= " (Master)";
        if ($status[$i]) {
            $color = "green";
        } else {
            $color = "red";
        }
        $list .= "<li class='".$color."'><p class='sname'>".$station."</p>".$info."</li>";
        $i++;
    }

    $footer = "";
    $lrdur = $settings["lrun"][2];
    
    if ($lrdur != 0) {
        $lrpid = $settings["lrun"][1];
        $pname= pidname($lrpid);

        $footer = '<p>'.$pname.' last ran station '.$stations[$settings["lrun"][0]].' for '.($lrdur/60>>0).'m '.($lrdur%60).'s on '.gmdate("D, d M Y H:i:s",$settings["lrun"][3]).'</p>';
    }

    $open = count(array_keys($status,true));

    $ptotal = 0;
    foreach ($settings["ps"] as $valve) {
        if ($valve[0]) {
            if ($open > 1) {
                $tmp = $valve[1];
                if ($tmp > $ptotal) $ptotal = $tmp;            
            } else {
                $ptotal += $valve[1];
            }
        }
    }

    if ($ptotal) {
        $scheduled = count($allPnames);
        if (!$open && $scheduled) $runningTotal["d"] = $options[17]["val"];
        if ($open == 1) $ptotal += ($scheduled-1)*$options[17]["val"];
        $allPnames = array_unique($allPnames);
        $numProg = count($allPnames);
        $allPnames = strrev(preg_replace(strrev("/, /"),strrev(" and "),strrev(implode(", ", $allPnames)),1));
        $pinfo = $allPnames.(($numProg > 1) ? " are" : " is" )." running ";
        $pinfo .= "<span id='countdown-p' class='nobr'>(".sec2hms($ptotal)." remaining)</span>";
        $runningTotal["p"] = $ptotal;
        $header .= "<br>".$pinfo;
    }

    echo json_encode(array("list" => $list,"header" => $header,"footer" => $footer, "sdelay" => $options[17]["val"], "totals" => json_encode($runningTotal)));
}

#Generate settings page
function make_settings_list() {
    $options = get_options();
    $settings = get_settings();
    $vs = get_stations();
    $stations = $vs["stations"];
    $list = "<li><div data-role='fieldcontain'><fieldset>";
    foreach ($options as $key => $data) {
        if (!is_int($key)) continue;
        switch ($key) {
            case 1:
                $timezones = array("-12:00","-11:30","-11:00","-10:00","-09:30","-09:00","-08:30","-08:00","-07:00","-06:00","-05:00","-04:30","-04:00","-03:30","-03:00","-02:30","-02:00","+00:00","+01:00","+02:00","+03:00","+03:30","+04:00","+04:30","+05:00","+05:30","+05:45","+06:00","+06:30","+07:00","+08:00","+08:45","+09:00","+09:30","+10:00","+10:30","+11:00","+11:30","+12:00","+12:45","+13:00","+13:45","+14:00");
                $tz = $data["val"]-48;
                $tz = (($tz>=0) ? "+" : "-").sprintf("%02d", strval(abs($tz)/4)).":".strval(((abs($tz)%4)*15/10).((abs($tz)%4)*15%10));
                $list .= "<label for='o1' class='select'>Timezone</label><select data-mini='true' id='o1'>";
                foreach ($timezones as $timezone) {
                    $list .= "<option ".(($timezone == $tz) ? "selected" : "")." value='".$timezone."'>".$timezone."</option>";
                }
                $list .= "</select>";
                continue 2;
            case 12:
#                $http = $options[13]["val"]*256+$data["val"];
#                $list .= "<label for='o12'>HTTP Port</label><input data-mini='true' type='number' pattern='[0-9]*' id='o12' value='".$http."' />";
                continue 2;
            case 15:
                $list .= "<label for='o15'>Extension Boards</label><input data-highlight='true' data-mini='true' type='number' pattern='[0-9]*' data-type='range' min='0' max='5' id='o15' value='".$data["val"]."' />";
                continue 2;
            case 16:
                $list .= "<input data-mini='true' id='o16' type='checkbox' ".(($data["val"] == "1") ? "checked='checked'" : "")." /><label for='o16'>Sequential</label>";
                continue 2;
            case 17:
                $list .= "<label for='o17'>Station Delay (seconds)</label><input data-highlight='true' data-mini='true' type='number' pattern='[0-9]*' data-type='range' min='0' max='240' id='o17' value='".$data["val"]."' />";
                continue 2;
            case 18:
                $list .= "<label for='o18' class='select'>Master Station</label><select data-mini='true' id='o18'><option value='0'>None</option>";
                $i = 1;
                foreach ($stations as $station) {
                    $list .= "<option ".(($i == $data["val"]) ? "selected" : "")." value='".$i."'>".$station."</option>";
                    if ($i == 8) break;
                    $i++;
                }
                $list .= "</select><label for='loc'>Location</label><input data-mini='true' type='text' id='loc' value='".$options["loc"]."' />";
                continue 2;
            case 19:
                $list .= "<label for='o19'>Master On Delay</label><input data-highlight='true' data-mini='true' type='number' pattern='[0-9]*' data-type='range' min='0' max='60' id='o19' value='".$data["val"]."' />";
                continue 2;
            case 20:
                $list .= "<label for='o20'>Master Off Delay</label><input data-highlight='true' data-mini='true' type='number' pattern='[0-9]*' data-type='range' min='-60' max='60' id='o20' value='".$data["val"]."' />";
                continue 2;
            case 21:
                $list .= "<input data-mini='true' id='o21' type='checkbox' ".(($data["val"] == "1") ? "checked='checked'" : "")." /><label for='o21'>Use Rain Sensor</label>";
                continue 2;
            case 22:
                $list .= "<input data-mini='true' id='o22' type='checkbox' ".(($data["val"] == "1") ? "checked='checked'" : "")." /><label for='o22'>Normally Open (Rain Sensor)</label>";
                continue 2;
            case 23:
                $list .= "<label for='o23'>Water Level</label><input data-highlight='true' data-mini='true' type='number' pattern='[0-9]*' data-type='range' min='0' max='250' id='o23' value='".$data["val"]."' />";
                continue 2;
            case 25:
                $list .= "<input data-mini='true' id='o25' type='checkbox' ".(($data["val"] == "1") ? "checked='checked'" : "")." /><label for='o25'>Ignore Password</label>";
                continue 2;
        }
    }
    $list .= "</fieldset></div></li>";
    echo $list;
}

function make_stations_list() {
    $settings = get_settings();
    $vs = get_stations();
    $stations = $vs["stations"];
    $masop = $vs["masop"];
    $list = "<li>";
    if ($settings["mas"]) $list .= "<table><tr><th>Station Name</th><th>Activate Master?</th></tr>";
    $i = 0;
    foreach ($stations as $station) {
        if ($settings["mas"]) $list .= "<tr><td>";
        $list .= "<input data-mini='true' id='edit_station_".$i."' type='text' value='".$station."' />";
        if ($settings["mas"]) {
            if ($settings["mas"] == $i+1) {
                $list .= "</td><td class='use_master'><p id='um_".$i."' style='text-align:center'>(Master)</p></td></tr>";
            } else {
                $list .= "</td><td class='use_master'><input id='um_".$i."' type='checkbox' "…