.
******/
/*
* MESHMAP Map Functions
*
*********************************************************************************************************************/
/**
* @param $NodeList
* @param $TopoList
*/
function build_NodesAndLinks($NodeList, $TopoList, $MarkerList = null)
{
global $STABLE_MESH_VERSION;
global $useNodes;
global $useLinks;
global $useMarkers;
//icon names: default (green), update firmware (red) and for the different bands
$markerList = '';
//then get info from the node info database
//use it to:
//1: create markers for the map
//2: do lots of stuff, like, use the topology data to make the link lines,
//try to detect the tunnels vs everything else,
//check what band the device is on,
//find distance and bearing info of linked nodes. :) yes really!
//try and tell the dtd links apart from the ones that are not dtd links but appear to be,
//*real* DTD links will be very close together, if not the same,
//the others, (like what Ventura Mesh uses) will be far apart and therefore probably not a "real" dtd link.
$display_NodeList = '';
if (is_array($NodeList) && !empty($NodeList))
{
foreach ($NodeList as $node_info)
{
$node_FirmwareStatus = checkVersion($node_info['firmware_version'], $STABLE_MESH_VERSION);
if ($node_info['lat'] && $node_info['lon']) // Are there nodes with locations?
{
/*
* find the Linked nodes to list
*********************/
$node_LinkedList = '';
$node_LinkedList = load_LinkedTO($node_info, $TopoList);
/*
* Find the Services for the node
********************************/
// $node_ServiceList = load_ServiceList($node_info['olsrinfo_json']);
// $node_ServiceList = '';
$node_ServiceList = load_ServiceList($node_info['services']);
/*
* Build the Nodes Marker
*/
$display_NodeList .= build_Marker($node_info, $node_ServiceList, $node_LinkedList, $node_FirmwareStatus);
}
}
if (!empty($display_NodeList))
{
$display_NodeList = rtrim($display_NodeList); // Rtrim off an ending newline
}
}
$display_MarkerList = '';
if (isset($useMarkers) && $useMarkers)
{
foreach ($MarkerList as $Marker)
{
if ($Marker['lat'] && $Marker['lon']) //Are there Markers with location?
{
$display_MarkerList .= buildStationMarker($Marker); // Build Marker
}
}
if (!empty($display_MarkerList))
{
$display_MarkerList = rtrim($display_MarkerList); // Rtrim off an ending newline
}
}
/*
* Create and Display the Link Lines
****************************************/
$display_LinkList = '';
if (isset($useLinks) && $useLinks)
{
$display_LinkList = load_LinkList($NodeList, $TopoList);
if (!empty($display_LinkList))
{
$display_LinkList = rtrim($display_LinkList); // Rtrim off an ending newline
}
}
$display_MarkersAndLinks = $display_NodeList . $display_MarkerList . $display_LinkList;
if (!empty($display_MarkersAndLinks))
{
$display_MarkersAndLinks = rtrim($display_MarkersAndLinks, ','); // Trim off the very last comma
}
$display_MarkersAndLinks .= ";\n\n";
return $display_MarkersAndLinks;
}
/**
* loadServiceList
* This function parses the json data obtained from the node.
* It looks for all of the plugins/services installed on the node.
* The Service_line format is:
* Link or host value | [TCP | UDP ] | Advertised service
*
* This routine will return the last ( end ) field of the service line, which is the Advertised service
*
* @param $json_array
*
* @return string List of Services to Display
*/
function load_ServiceList($serviceList)
{
$localServiceArray = wxc_listServices($serviceList);
$serviceList = '';
if (is_array($localServiceArray))
{
foreach ($localServiceArray as $key => $value)
{
//WXC 6-30-2017: removed links for services that have no link
if ($value == NULL) {
//$serviceList .= " ". $key;
$serviceList .= $key;
}else {
//WXC 6-30-2017: Moved from after link to before the link,
//made the pop up look better.
$serviceList .= " " . $key . "";
}
}
}
return $serviceList;
}
/**
* loadLinkList
* This function iterates through the topology array to build a leaflet package polyline
* There are four types of links defined, each is represented by a different color.
* RF Link - Standard Mesh Node link
* DTD Link - Mesh nodes connected by direct link ( typically via a switch )
* Tunnel Link -
* Infinite Link - Links reported by and marked as unusable by olsr
*
* @param $NodeList
* @param $TopoList
*
* @return mixed
*/
function load_LinkList($NodeList, $TopoList)
{
global $MESH_SETTINGS;
$linkList = "\n";
if (isset($TopoList))
{
foreach ($TopoList as $value)
{
if ($value['nodelat'] && $value['linklon'])
//if there's no location info ignore the entry
{
$node_lat = $value['nodelat'];
$node_lon = $value['nodelon'];
$link_lat = $value['linklat'];
$link_lon = $value['linklon'];
$display_color = 'red';
$display_weight = 2;
$display_opacity = 1;
$display_offset = 2;
$map_LayerAssigned = '';
$tunnel = 0;
$dtd = 0;
$moreThanTen = 0;
$infinite = 0;
$nodeHasTunnel = 0;
$linkHasTunnel = 0;
$nodeName = $value['node'];
$linkName = $value['linkto'];
if ($value['cost'] == 1.0 && !($tunnel)) //find the tunnels
{
foreach ($NodeList as $searching_for_tunnels)
{
if ($searching_for_tunnels['node'] == $nodeName)
{
if ($searching_for_tunnels['active_tunnel_count'] >= 1)
{
$nodeHasTunnel = 1;
}
}
if ($searching_for_tunnels['node'] == $linkName)
{
if ($searching_for_tunnels['active_tunnel_count'] >= 1)
{
$linkHasTunnel = 1;
}
}
if (($linkHasTunnel) && ($nodeHasTunnel))
{
$tunnel = 1;
$nodeHasTunnel = 0;
$linkHasTunnel = 0;
$display_color = $MESH_SETTINGS['Link_Tunnel'];
$dtd = 1;
$display_opacity = 0.5;
$map_LayerAssigned = 'tunnelLinks';
}
}
}
if ($value['cost'] == 0.1 && $value['distance'] <= 0.7)
//find DTD links (always a cost of 0.1)
{
$display_color = $MESH_SETTINGS['DTD_Link_Minus'];
$dtd = 1;
$display_opacity = 0.2;
$map_LayerAssigned = 'dtdLinks';
}
//this is for the "other" DTD links
//using other wireless tech to create links that are seen as "DTD" by the AREDN software
//
// this is also some (all) tunnels now after 3.20.3 changes
// TODO: check this!
if ($value['cost'] == 0.1 && $value['distance'] > 0.7)
{
$display_color = $MESH_SETTINGS['DTD_Link_Plus'];
$dtd = 1;
//$display_opacity = 0.3;
$display_opacity = 1.0;
//$display_weight = 0.3;
$display_weight = 1.0;
$map_LayerAssigned = 'dtdLinks';
}
//find the "infinite cost" links (they show as "INFINITE" in the olsr files the other script changes that to 99.99)
if ($value['cost'] == 99.99)
{
$display_color = $MESH_SETTINGS['Link_Infinite'];
$infinite = 1;
$display_opacity = 0.2;
$map_LayerAssigned = 'infiniteLinks';
}
//links with a cost of less than 1.0 but NOT tunnels or DTD links
//tunnels are always 1.0 and DTD is always 0.1
if (($value['cost'] <= 1.000) && ($value['cost'] != 0.1) && !($tunnel))
{
//these will always be a solid green
$display_color = $MESH_SETTINGS['Link_GOOD'];
$display_opacity = 0.5;
$map_LayerAssigned = 'rfLinks';
}
//links of greater than 10.000 ETX, but not "INFINITE" (these links are always red)
if ($value['cost'] > 14.000 && $value['cost'] != 99.99)
{
$display_color = $MESH_SETTINGS['Link_BAD'];
$moreThanTen = 1;
$display_opacity = 0.3;
$map_LayerAssigned = 'rfLinks';
}
//now for the more normal links
//less than ETX 5.0 links
if ($value['cost'] < 7 && !($dtd) && !($tunnel))
{
$display_color = sprintf("#%02XFF00", ($value['cost'] - 1) * (255 / (5 - 1)));
$map_LayerAssigned = 'rfLinks';
}
//more than ETX 5.0 links
if ($value['cost'] > 7 && !($moreThanTen) && !($infinite))
{
$display_color = sprintf("#FF%02X00", ($value['cost'] - 1) * (255 / (5 - 1)) -
255);
$display_opacity = 0.5;
$map_LayerAssigned = 'rfLinks';
}
if ($map_LayerAssigned)
{
$linkList .= 'L.polyline([[' . $node_lat . ',' . $node_lon . '],[' . $link_lat .
',' . $link_lon . ']], {color: "' . $display_color . '", opacity: ' . $display_opacity .
', weight: ' . $display_weight . ', offset: ' . $display_offset . '})
.bindPopup("' . $nodeName . ' to ' . $linkName . ' Cost: ' .
$value['cost'] . '")
.addTo(' . $map_LayerAssigned . '),' . "\n";
}
}
}
}
return $linkList;
}
/**
* loadLinkedTO
* This routine create a HTML formatted text list of link details.
* The information gathered here is display as part of the node popup detail.
*
* @param $node_info
* @param $TopoList
*
* @return string
*/
function load_LinkedTO($node_info, $TopoList)
{
$linkedToList = '';
$linkInfoForStationPopups = array($node_info['node'] => array());
//don't init what is going to be an array as a string!!
//$linkInfoForStationPopups = array($node_info['node'] => "");
$node = $node_info['node'];
//and build a big 3D array of it all
//like this:
//array
// "NodeName"
// "1stLinkedNodesName"
// "CostFrom"
// "CostTo"
// "distance"
// "bearing"
// "2ndLinkedNodesName"
// "CostFrom"
// "CostTo"
//etc..etc..
if (isset($TopoList))
{
foreach ($TopoList as $value)
{
//if there's no location info (at each end of the link) ignore the entry
if ($value['nodelat'] && $value['linklon'])
{
//this is the section that is exploding in php7.2.3
if ($value['linkto'] == $node)
{
//this will be the cost FROM each linked station back TO the node we are currently looking at in the while loop
//had to create the array correctly! fixed 3-28-2018 - wxc
if (isset($linkInfoForStationPopups[$node_info['node']][$value['node']]) && is_array($linkInfoForStationPopups[$node_info['node']][$value['node']])) {
$linkInfoForStationPopups[$node_info['node']][$value['node']]['costFrom'] = $value['cost'];
}else {
$linkInfoForStationPopups[$node_info['node']][$value['node']] = array('costFrom' => $value['cost']);
}
}
if ($value['node'] == $node)
{
//$linkedNodesKeyNameArray = array("costTo", "distance", "bearing");
//this will be the cost TO each linked station FROM the node we are currently looking at in the while loop
//distance and bearing added too for goo measure! :)
//$linkInfoForStationPopups[$node_info['node']][$value['linkto']] = array_fill_keys($linkedNodesKeyNameArray, "");
$linkInfoForStationPopups[$node_info['node']][$value['linkto']]['costTo'] = $value['cost'];
//add in the distance to that linked node
$linkInfoForStationPopups[$node_info['node']][$value['linkto']]['distance'] = $value['distance'];
//add in the bearing to that linked node
$linkInfoForStationPopups[$node_info['node']][$value['linkto']]['bearing'] = $value['bearing'];
}
}
}
}
//now take all that info back out and put into a properly formatted string variable that we'll use later
//this part of the function reformatted by kg6wxc.
//the "kilometers" setting will default to "0"
if (!isset($GLOBALS['USER_SETTINGS']['kilometers'])) {
$GLOBALS['USER_SETTINGS']['kilometers'] = "0";
}
foreach ($linkInfoForStationPopups as $nodeNameLinkArray => $linktoArray) {
if (!empty($linktoArray)) {
foreach ($linktoArray as $linkedNodeName => $costArray) {
if (!empty($costArray)) {
if (!empty($costArray['costTo']) && !empty($costArray['costFrom'])) {
//if ((isset($costArray['costTo']) == 0.1) && (isset($costArray['costFrom']) == 0.1)) {
if ($costArray['costTo'] == "0.1" && $costArray['costFrom'] == "0.1") {
$display_cost = ' (DTD) ';
}else {
$display_cost = ' (' . $costArray['costTo'] . '/' . $costArray['costFrom'] . ') ';
}
if ($GLOBALS['USER_SETTINGS']['kilometers']) {
$linkedToList .= $linkedNodeName . $display_cost . $costArray['distance'] . 'km (' . round($costArray['distance'] * 0.62137, 2) . 'mi) ' . $costArray['bearing'] . '° ';
}else {
$linkedToList .= $linkedNodeName . $display_cost . round($costArray['distance'] * 0.62137, 2) . 'mi (' . $costArray['distance'] . 'km) ' . $costArray['bearing'] . '° ';
}
}
}
}
}
}
return $linkedToList;
}
/**
* buildMarker
* This routine builds Mesh Markers.
* These mesh markers are added to various map layer depending upon the type of node
* The currently defined Mesh Markers are categorized by frequency
* 2Ghz, 3Ghz, 5Ghz, 900Mhz, Linux systems
*
* Mesh Markers are stored in the node_info table, which is updated by the get-map-info.php routine
*
* @param $node_info
* @param $node_ServiceList
* @param $node_LinkedList
* @param $node_FirmwareStatus
*
* @return string AssignedLayer
*/
function build_Marker($node_info, $node_ServiceList, $node_LinkedList, $node_FirmwareStatus)
{
//timezone fixes - wxc 11-27-2018
$nodeLastSeen = new DateTime($node_info['last_seen'], $GLOBALS['localTimeZone']);
date_timezone_set($nodeLastSeen, $GLOBALS['localTimeZone']);
$markerList = '';
$nodeUrl = "" . $node_info['node'] .
"";
//Now we look at the 'channel' value, for each node, from the node_info database.
//Then compare it to what we know about each bands channels
//if we find a match, we assume we're in that band...
if ($node_info['firmware_version'] == 'Linux' || $node_info['firmware_version'] == 'linux')
{ // Linux Devices ( Special for SNOOPY )
$icon = 'linuxCircle';
$band = 'Linux';
$AssignedLayer = 'otherStations';
}
else
{
switch ((wxc_checkBand($node_info['channel'], $node_info['board_id'])))
{
case '2GHz': // 2.4GHz devices
$icon = 'twoRadioCircle';
$band = '2.4GHz';
$AssignedLayer = 'twoGHzStations';
break;
case '3GHz': // 3GHz devices
$icon = 'threeRadioCircle';
$band = '3.4GHz';
$AssignedLayer = 'threeGHzStations';
break;
case '5GHz': // 5GHz devices
$icon = 'fiveRadioCircle';
$band = '5.8GHz';
$AssignedLayer = 'fiveGHzStations';
break;
case '900MHz': // Note: Channel values borked for 900Mhz
$icon = 'nineRadioCircle';
$band = '900MHz';
$AssignedLayer = 'nineHundredMHzStations';
break;
default: // unknown
$icon = 'unknownRadioCircle';
$band = '?';
$AssignedLayer = 'otherStations';
}
}
/*
* check for Out of Date Firmware
*/
switch ($node_FirmwareStatus)
{
case 1:
$firmware = 'Firmware: ' . $node_info['firmware_version'] . '';
break;
case 2:
$firmware = 'Firmware: ' . $node_info['firmware_version'] .
'';
break;
default:
$firmware = $node_info['firmware_version'];
}
/*
* Now build the marker
*/
if ($node_LinkedList)
{
$node_LinkedList = 'Node Name (cost to/from) distance bearing ' . $node_LinkedList;
}
//add java variable to hold the "main tab" info
//*** node names used in these variables must have all dashes converted to underscores!! ***
//*** they also must be outside of the $markerList, just echo them out for now since it'll just work! ***
// TODO: remove these echos and do it properly
echo "\n";
//*now* create the marker
$markerList .= "L.marker([" . $node_info['lat'] . "," . $node_info['lon'] . "], {title: '" . $node_info['node'] .
"', icon: " . $icon . "}).bindPopup(popupTabs_" . str_replace("-", "_", $node_info['node']) .
", { maxWidth: 500 } ).addTo(" . $AssignedLayer . ") ,\n";
//
// If Upgrade Suggested add Node to that layer and change the popup
//
if ($node_FirmwareStatus > 0)
{
$markerList .= "L.marker([" . $node_info['lat'] . "," . $node_info['lon'] . "], {title: '" .
$node_info['node'] . "', icon: " . (($node_FirmwareStatus == 1) ? "redCircle" :
"orangeCircle") . "}).bindPopup('
').addTo(upgradeStations) ,\n";
}
return $markerList;
}
/**
* buildStationMarker
* This routine builds Station Markers. Station Markers are auxiliary (non-mesh) details to be displayed on the map.
* These markers are added to the "Other Stations" layer.
* The currently defined Station Markers are:
* Operator, Police Station, Fire Station, EOC, Hospital, Other
*
* Station Markers are stored in the station_info table. Station Markers are manually created.
*
* @param $station_info
*
* @return string AssignedLayer
*/
function buildStationMarker($Marker)
{
//Now we look at the 'channel' value, for each node, from the node_info database.
//Then compare it to what we know about each bands channels
//if we find a match, we assume we're in that band...
switch ($Marker['type'])
{
case "operator":
// Operator Home Station
$icon = "operatorIcon";
$AssignedLayer = 'operatorsElements';
break;
case "police":
$icon = "policeIcon";
$AssignedLayer = 'policeElements';
break;
case "eoc":
$icon = "eocIcon";
$AssignedLayer = 'racesElements';
break;
case "firedepartment":
$icon = "fireIcon";
$AssignedLayer = 'fireElements';
break;
case "hospital":
$icon = "hospitalIcon";
$AssignedLayer = 'hospitalElements';
break;
default:
// unknown
$icon = "Red_Marker";
$AssignedLayer = 'otherElements';
}
/*
* Now build the marker
*/
$markerList = "L.marker([" . $Marker['lat'] . "," . $Marker['lon'] . "], {title: '" . $Marker['name'] .
"', icon: " . $icon . "}).bindPopup('
Other' +
'
900MHz' +
'
2GHz' +
'
3GHz' +
'
5GHz' +
'
';
return div;
};\n\n
EOD;
return $Content;
}
/**
* @return string
*/
function create_MapImage()
{
global $USER_SETTINGS;
//init the map with size, zoom level, center co-ords, etc...
//http://leafletjs.com/reference-1.0.3.html#control-zoom
$Content = "
if (typeof rfLinks === 'undefined' || rfLinks === null) {
var map = L.map('mapid', {
//attributionControl: false,
center: [" . $USER_SETTINGS['map_center_coordinates'] . "],
zoom: [" . $USER_SETTINGS['map_initial_zoom_level'] . "],
minZoom: 0,
maxZoom: 18,
//zoomSnap: 0,
zoomSnap: 1,
//zoomDelta: 0.25,
zoomDelta: 1,
//layers: [defaultMap, twoGHzStations, threeGHzStations, fiveGHzStations, nineHundredMHzStations, otherStations, rfLinks, tunnelLinks, dtdLinks, infiniteLinks],
layers: [defaultMap, twoGHzStations, threeGHzStations, fiveGHzStations, nineHundredMHzStations, otherStations],
//layers: [defaultMap],
fullscreenControl: true
});\n\n
}else {
var map = L.map('mapid', {
//attributionControl: false,
center: [" . $USER_SETTINGS['map_center_coordinates'] . "],
zoom: [" . $USER_SETTINGS['map_initial_zoom_level'] . "],
minZoom: 0,
maxZoom: 18,
//zoomSnap: 0,
zoomSnap: 1,
//zoomDelta: 0.25,
zoomDelta: 1,
layers: [defaultMap, twoGHzStations, threeGHzStations, fiveGHzStations, nineHundredMHzStations, otherStations, rfLinks, tunnelLinks, dtdLinks, infiniteLinks],
//layers: [defaultMap, twoGHzStations, threeGHzStations, fiveGHzStations, nineHundredMHzStations, otherStations],
//layers: [defaultMap],
fullscreenControl: true
});\n\n
}
";
return $Content;
}
/**
* @param $numNodes
* @param $numLinks
* @param $numMarkers
*
* @return string
*/
function show_MapMarkerDetails($numNodes, $numLinks, $numMarkers, $numNodesTotal, $numLinksTotal)
{
// Get the last time we updated the link info
$filetime = wxc_scriptGetLastDateTime("LINKINFO", "topology");
if ($filetime)
{
date_timezone_set($filetime, $GLOBALS['localTimeZone']);
$filetime = date_format($filetime, 'F d Y H:i:s T');
}
//$Content = "MeshMapDetails = '" . $numNodes . " Nodes shown, with " . $numLinks .
// " links " . " Data Last Acquired @ " . $filetime . "';\n";
$Content = "MeshMapDetails = '