function Drawitem($x, $y, $opt, $label, $typ) { global $fmt, $dev, $loi, $ipi, $redbuild; $itxt = ""; $pfont = "1"; $vfont = "font-size=\"9\""; $vicon = "32"; if ($opt > 2) { $r = 8; } else { $r = 4; } if ($typ == "C") { if ($fmt == "svg") { $itxt .= "\t<circle fill=\"cornflowerblue\" stroke=\"black\" cx=\"{$x}\" cy=\"{$y}\" r=\"{$r}\"/>\n"; $itxt .= "\t<text x=\"" . ($x - 20) . "\" y=\"" . ($y + 20) . "\" fill=\"navy\">{$label}</text>\n"; } else { $itxt .= "Imagefilledellipse(\$image, {$x}, {$y}, " . 2 * $r . ", " . 2 * $r . ", \"\$cornflowerblue\");\n"; $itxt .= "Imageellipse(\$image, {$x}, {$y}, " . 2 * $r . ", " . 2 * $r . ", \"\$black\");\n"; $itxt .= "ImageString(\$image, 1, " . ($x - 10) . ", " . ($y + 10) . ", \"{$label}\", \"\$navy\");\n"; } return $itxt; } elseif ($typ == "B") { if (preg_match("/{$redbuild}/", $label)) { $bc = "red"; } else { $bc = "cornflowerblue"; } if ($fmt == "svg") { $itxt .= "\t<rect fill=\"{$bc}\" stroke=\"black\" x=\"" . ($x - $r) . "\" y=\"" . ($y - $r) . "\" width=\"" . 2 * $r . "\" height=\"" . 2 * $r . "\" />\n"; $itxt .= "\t<text x=\"" . ($x - 20) . "\" y=\"" . ($y + 20) . "\" fill=\"blue\">{$label}</text>\n"; } else { $itxt .= "Imagefilledrectangle(\$image, " . ($x - $r) . ", " . ($y - $r) . ", " . ($x + $r) . ", " . ($y + $r) . ", \${$bc});\n"; $itxt .= "Imagerectangle(\$image, " . ($x - $r) . ", " . ($y - $r) . ", " . ($x + $r) . ", " . ($y + $r) . ", \"\$black\");\n"; $itxt .= "ImageString(\$image, 1, " . ($x - 10) . ", " . ($y + 10) . ", \"{$label}\", \"\$blue\");\n"; } return $itxt; } elseif ($typ == "ci") { $img = "cityg"; $lcol = "gray"; } elseif ($typ == "c") { $img = CtyImg($opt); $lcol = "navy"; $pfont = "5"; $vfont = "font-size=\"15\" font-weight=\"bold\""; $vicon = "50"; } elseif ($typ == "b") { $img = BldImg($opt, $label); $lcol = "blue"; } elseif ($typ == "fl") { $img = "stair"; $lcol = "navy"; $pfont = "3"; $vfont = "font-size=\"12\" font-weight=\"bold\""; $vicon = "10"; } elseif ($typ == "d") { $img = "dev/" . $dev[$label]['ic']; $lcol = "black"; } if ($fmt == "svg") { $itxt .= "\t<image x=\"" . ($x - $vicon / 2) . "\" y=\"" . ($y - $vicon / 2) . "\" width=\"{$vicon}\" height=\"{$vicon}\" xlink:href=\"../img/{$img}.png\"/>\n"; if ($typ == "d") { if ($loi) { $itxt .= "\t<text x=\"" . ($x - $vicon / 2) . "\" y=\"" . ($y - $vicon / 2 - 4) . "\" {$vfont} fill=\"{$lcol}\">" . $dev[$label]['rom'] . "</text>\n"; } if ($ipi) { $itxt .= "<text x=\"" . ($x - $vicon / 2) . "\" y=\"" . ($y + $vicon / 2 + 20) . "\" fill=\"gray\">" . $dev[$label]['ip'] . "</text>\n"; } } $itxt .= "\t<text x=\"" . ($x - $vicon / 2) . "\" y=\"" . ($y + $vicon / 2 + 10) . "\" {$vfont} fill=\"{$lcol}\">" . Safelabel($label) . "</text>\n"; } else { $itxt .= "\$icon = Imagecreatefrompng(\"../img/{$img}.png\");\n"; $itxt .= "\$w = Imagesx(\$icon);\n"; $itxt .= "\$h = Imagesy(\$icon);\n"; $itxt .= "Imagecopy(\$image, \$icon,intval({$x} - \$w/2),intval({$y} - \$h/2),0,0,\$w,\$h);\n"; if ($typ == "d") { if ($loi) { $itxt .= "ImageString(\$image, {$pfont}, intval({$x} - \$w/1.8), intval({$y} - \$h/1.6 - 10), \"" . $dev[$label]['rom'] . "\", \$cornflowerblue);\n"; } if ($ipi) { $itxt .= "ImageString(\$image, {$pfont}, intval({$x} - \$w/1.8), intval({$y} + \$h/1.6 + 10), \"" . $dev[$label]['ip'] . "\", \$gray );\n"; } } $itxt .= "ImageString(\$image, {$pfont}, intval({$x} - \$w/1.8), intval({$y} + \$h/1.6), \"" . Safelabel($label) . "\", \${$lcol});\n"; $itxt .= "Imagedestroy(\$icon);\n"; } return $itxt; }
function Drawitem($x,$y,$opt,$label,$typ) { global $fmt,$dev,$loi,$ipi,$redbuild; $itxt = ""; $pfont = "1"; $vfont = "font-size=\"9\""; $vicon = "32"; if($opt > 2){$r = 8;}else{$r = 4;} if($typ == "f"){ $cury = $rows = 0; $cols = 1; foreach(array_keys($ndev[$cty][$bld]) as $flr){ # Determine building size $cols = max(count($ndev[$cty][$bld][$flr]),$cols); # find max cols if($cols > $fco){ # Break row, if > Floor columns $rrow = ceil($cols / $fco); # How many rows result? $rows += $rrow; $cols = $fco; }else{ $rows++; } } $woff = intval($fsi*($cols-1)/2); $hoff = intval($fsi*($rows-1)/2); $mapframes .= Drawbox( $xbl[$bld] - $woff - intval($fsi/2) - 10, $ybl[$bld] - $hoff - intval($fsi/2), $xbl[$bld] + $woff + intval($fsi/2), $ybl[$bld] + $hoff + intval($fsi/2), $bld); uksort($ndev[$cty][$bld], "Floorsort"); foreach(array_keys($ndev[$cty][$bld]) as $flr){ $mapitems .= Drawitem( $xbl[$bld] - $woff - intval($fsi/2), $ybl[$bld] - $hoff + $cury*$fsi, 0,$flr,'fl'); usort( $ndev[$cty][$bld][$flr],"Roomsort" ); $curx = 0; foreach($ndev[$cty][$bld][$flr] as $dv){ $xd[$dv] = $xbl[$bld] - $woff + $curx*$fsi; $yd[$dv] = $ybl[$bld] - $hoff + $cury*$fsi; $mapitems .= Drawitem($xd[$dv],$yd[$dv],'0',$dv,'d'); $area = ($xd[$dv]-20) .",". ($yd[$dv]-20) .",". ($xd[$dv]+20) .",". ($yd[$dv]+20); $imgmap .= "<area href=Devices-Status.php?dev=". rawurlencode($dv) ." coords=\"$area\" shape=rect title=\"Show $dv Status\">\n"; $curx++; if($curx == $fco){ $curx = 0; $cury++; } } $cury++; } }elseif($typ == "B"){ if( preg_match("/$redbuild/",$label) ){$bc = "red";}else{$bc = "cornflowerblue";} if($fmt == "svg"){ $itxt .= " <rect fill=\"$bc\" stroke=\"black\" x=\"".($x-$r)."\" y=\"".($y-$r)."\" width=\"".(2*$r)."\" height=\"".(2*$r)."\" />\n"; $itxt .= " <text x=\"".($x-20)."\" y=\"".($y+20)."\" fill=\"blue\">$label</text>\n"; }else{ $itxt .= "Imagefilledrectangle(\$image, ".($x-$r).", ".($y-$r).", ".($x+$r).", ".($y+$r).", \$$bc);\n"; $itxt .= "Imagerectangle(\$image, ".($x-$r).", ".($y-$r).", ".($x+$r).", ".($y+$r).", \"\$black\");\n"; $itxt .= "ImageString(\$image, 1, ".($x-10).", ".($y+10).", \"$label\", \"\$blue\");\n"; } return $itxt; }elseif($typ == "C"){ if($fmt == "svg"){ $itxt .= " <circle fill=\"cornflowerblue\" stroke=\"black\" cx=\"$x\" cy=\"$y\" r=\"$r\"/>\n"; $itxt .= " <text x=\"".($x-20)."\" y=\"".($y+20)."\" fill=\"navy\">$label</text>\n"; }else{ $itxt .= "Imagefilledellipse(\$image, $x, $y, ".(2*$r).", ".(2*$r).", \"\$cornflowerblue\");\n"; $itxt .= "Imageellipse(\$image, $x, $y, ".(2*$r).", ".(2*$r).", \"\$black\");\n"; $itxt .= "ImageString(\$image, 1, ".($x-10).", ".($y+10).", \"$label\", \"\$navy\");\n"; } return $itxt; }elseif($typ == "ci"){ $img = "cityg"; $lcol = "gray"; }elseif($typ == "c"){ $img = CtyImg($opt); $lcol = "navy"; $pfont = "5"; $vfont = "font-size=\"15\" font-weight=\"bold\""; $vicon = "50"; }elseif($typ == "b"){ $img = BldImg($opt,$label); $lcol = "blue"; }elseif($typ == "fl"){ $img = "stair"; $lcol = "navy"; $pfont = "3"; $vfont = "font-size=\"12\" font-weight=\"bold\""; $vicon = "10"; }elseif($typ == "d"){ $img = "dev/" . $dev[$label]['ic']; $lcol = "black"; } if($fmt == "svg"){ $itxt .= " <image x=\"".($x-$vicon/2)."\" y=\"".($y-$vicon/2)."\" width=\"$vicon\" height=\"$vicon\" xlink:href=\"../img/$img.png\"/>\n"; if ($typ == "d"){ if ($loi){$itxt .= " <text x=\"".($x-$vicon/2)."\" y=\"".($y-$vicon/2-4)."\" $vfont fill=\"$lcol\">".$dev[$label]['rom']."</text>\n";} if ($ipi){$itxt .= "<text x=\"".($x-$vicon/2)."\" y=\"".($y+$vicon/2+20)."\" fill=\"gray\">".$dev[$label]['ip']."</text>\n";} } $itxt .= " <text x=\"".($x-$vicon/2)."\" y=\"".($y+$vicon/2+10)."\" $vfont fill=\"$lcol\">".Safelabel($label)."</text>\n"; }else{ $itxt .= "\$icon = Imagecreatefrompng(\"../img/$img.png\");\n"; $itxt .= "\$w = Imagesx(\$icon);\n"; $itxt .= "\$h = Imagesy(\$icon);\n"; $itxt .= "Imagecopy(\$image, \$icon,intval($x - \$w/2),intval($y - \$h/2),0,0,\$w,\$h);\n"; if ($typ == "d"){ if ($loi){$itxt .= "ImageString(\$image, $pfont, intval($x - \$w/1.8), intval($y - \$h/1.6 - 10), \"".$dev[$label]['rom']."\", \$cornflowerblue);\n";} if ($ipi){$itxt .= "ImageString(\$image, $pfont, intval($x - \$w/1.8), intval($y + \$h/1.6 + 10), \"".$dev[$label]['ip']."\", \$gray );\n";} } $itxt .= "ImageString(\$image, $pfont, intval($x - \$w/1.8), intval($y + \$h/1.6), \"".Safelabel($label)."\", \$$lcol);\n"; $itxt .= "Imagedestroy(\$icon);\n"; } return $itxt; }
function Map() { global $debug, $link, $locsep, $vallbl, $sholbl, $sumlbl, $imas, $fmt, $lit, $fsz, $pos; global $xm, $ym, $xo, $yo, $rot, $cro, $bro, $len, $lsf, $mde, $in, $op, $st, $co, $lev, $loo, $loa, $loi, $ipi, $ifa; global $mapbg, $mapitems, $maplinks, $mapinfo, $imgmap, $reg, $cty, $bld, $flr, $dev, $nod, $nlnk, $jnod, $cud; $rlnk = array(); $clnk = array(); $blnk = array(); $dlnk = array(); $acol = ''; $join = ''; if ($pos == 'a') { $acol = ',status'; $join .= 'LEFT JOIN monitoring USING (device) '; } if (in_array('vlanid', $in) or in_array('vlanname', $in)) { $join .= 'LEFT JOIN vlans USING (device) '; } if (in_array('mac', $in) or in_array('nodip', $in) or in_array('name', $in) or in_array('oui', $in)) { $join .= 'LEFT JOIN nodes USING (device) '; } if (in_array('ifip', $in) or in_array('vrfname', $in)) { $join .= 'LEFT JOIN networks USING (device) '; } if (in_array('neighbor', $in)) { $join .= 'LEFT JOIN links USING (device) '; } $query .= GenQuery('devices', 's', "distinct device,devip,type,location,contact,devmode,icon,cpu,temp,devopts,size,stack{$acol},snmpversion", '', '', $in, $op, $st, $co, $join); # Postgres requires ordercolumn (snmpversion)! if ($lev < 5) { if (strpos($query, 'WHERE')) { $query .= ' AND snmpversion != 0'; } else { $query .= ' WHERE snmpversion != 0'; } } $query .= ' order by snmpversion desc'; $res = DbQuery($query, $link); if ($res) { while ($d = DbFetchRow($res)) { $l = explode($locsep, $d[3]); $reg[$l[0]]['ndv']++; $cty[$l[0]][$l[1]]['ndv']++; $dev[$d[0]]['reg'] = $l[0]; if ($d[6] and $ipi) { # Get IP info for interfaces on snmpdevs $nquery = GenQuery('networks', 's', 'ifname,ifip,ifip6,vrfname', '', '', array('device'), array('='), array($d[0])); $nres = DbQuery($nquery, $link); if ($nres) { while ($n = DbFetchRow($nres)) { if ($n[1]) { $dev[$d[0]]['ifip'][$n[0]] .= " " . long2ip($n[1]) . ($n[3] ? " ({$n['3']})" : ""); } else { $dev[$d[0]]['ifip'][$n[0]] .= " " . DbIPv6($n[2]) . ($n[3] ? " ({$n['3']})" : ""); } } } else { echo DbError($nlink); } DbFreeResult($nres); } if ($d[6] and ($ifa or $lit == 'l')) { # Get IF alias TODO use iftype to determine links? $nquery = GenQuery('interfaces', 's', 'ifname,ifidx,iftype,alias,dinoct,doutoct', '', '', array('device'), array('='), array($d[0])); $nres = DbQuery($nquery, $link); if ($nres) { while ($n = DbFetchRow($nres)) { $dev[$d[0]]['ifty'][$n[0]] = $n[1]; $dev[$d[0]]['ifix'][$n[0]] = $n[2]; $dev[$d[0]]['ifal'][$n[0]] = $n[3]; $dev[$d[0]]['ifin'][$n[0]] = $n[4]; $dev[$d[0]]['ifout'][$n[0]] = $n[5]; } } else { echo DbError($nlink); } DbFreeResult($nres); } if ($lev > 1) { $dev[$d[0]]['cty'] = $l[1]; } if ($lev > 2) { $bld[$l[0]][$l[1]][$l[2]]['ndv']++; $dev[$d[0]]['bld'] = $l[2]; } if ($lev > 3) { if ($mde == "r") { $flr[$l[0]][$l[1]][$l[2]][$d[0]]['ndv']++; } else { $flr[$l[0]][$l[1]][$l[2]][$l[3]][] = $d[0]; } $dev[$d[0]]['ip'] = long2ip($d[1]); $dev[$d[0]]['rom'] = $l[4]; $dev[$d[0]]['rak'] = $l[5] ? $l[5] : ""; $dev[$d[0]]['typ'] = $d[2]; $dev[$d[0]]['con'] = $d[4]; $dev[$d[0]]['mod'] = Devmode($d[5]); $dev[$d[0]]['ico'] = $d[6]; if (substr($d[9], 1, 1) == "C") { $dev[$d[0]]['cpu'] = $d[7]; } else { $dev[$d[0]]['cpu'] = "-"; } $dev[$d[0]]['tmp'] = $d[8]; if ($d[8] != 0) { $dev[$d[0]]['tlb'] = $_SESSION['far'] ? intval($dev[$d[0]]['tmp'] * 1.8 + 32) . "F" : $dev[$d[0]]['tmp'] . "C"; } else { $dev[$d[0]]['tlb'] = "-"; } $dev[$d[0]]['stk'] = $d[11] > 1 ? $d[11] : 1; $dev[$d[0]]['siz'] = $d[10] * $dev[$d[0]]['stk']; if ($pos == 'a') { $dev[$d[0]]['sta'] = $d[12]; } } } DbFreeResult($res); } else { echo DbError($link); } # Precalculate Links foreach (array_keys($dev) as $d) { # Devs sorted by snmpversion creates links with stats first! $lquery = GenQuery('links', 's', '*', '', '', array('device'), array('='), array($d)); $lres = DbQuery($lquery, $link); while ($k = DbFetchRow($lres)) { if (isset($dev[$k[3]]['reg'])) { # Only use, if we have complete devs $rlquery = GenQuery('links', 's', '*', '', '', array('device', 'neighbor'), array('=', '='), array($k[3], $k[1]), array('AND')); $rlres = DbQuery($rlquery, $link); $rlnum = DbNumRows($rlres); if ($debug) { echo "<div class=\"textpad good\">LINK:{$k['1']} to {$k['3']} with BW of {$k['5']}</div>\n"; } if (array_key_exists("{$k['3']};;{$k['1']}", $dlnk)) { $dlnk["{$k['3']};;{$k['1']}"]['rbw'] += $k[5]; $dlnk["{$k['3']};;{$k['1']}"]['rtr'] += $dev[$k[3]]['ifin'][$k[4]]; $dlnk["{$k['3']};;{$k['1']}"]['rif'][] = "{$k['1']};;{$k['2']}"; $dlnk["{$k['3']};;{$k['1']}"]['rty']["{$k['6']}:" . date('j.M', $k[10])]++; } elseif (isset($dev[$k[3]]['ico'])) { if (!$rlnum) { if ($debug) { echo "<div class=\"textpad alrm\">LNK: Fixing missing link from {$k['3']} to {$k['1']}</div>\n"; } $dlnk["{$k['1']};;{$k['3']}"]['rbw'] += $k[5]; $dlnk["{$k['1']};;{$k['3']}"]['rtr'] += $dev[$k[1]]['ifin'][$k[2]]; $dlnk["{$k['1']};;{$k['3']}"]['rif'][] = "{$k['3']};;{$k['4']}"; $dlnk["{$k['1']};;{$k['3']}"]['fty']["{$k['6']}:" . date('j.M', $k[10])]++; } $dlnk["{$k['1']};;{$k['3']}"]['fbw'] += $k[5]; $dlnk["{$k['1']};;{$k['3']}"]['ftr'] += $dev[$k[1]]['ifout'][$k[2]]; $dlnk["{$k['1']};;{$k['3']}"]['fif'][] = "{$k['1']};;{$k['2']}"; $dlnk["{$k['1']};;{$k['3']}"]['fty']["{$k['6']}:" . date('j.M', $k[10])]++; } $ra = $dev[$k[1]]['reg']; $rb = $dev[$k[3]]['reg']; $ca = $dev[$k[1]]['cty']; $cb = $dev[$k[3]]['cty']; $ba = $dev[$k[1]]['bld']; $bb = $dev[$k[3]]['bld']; if ($mde != "f" and $ra != $rb) { $reg[$ra]['nlk']++; $reg[$ra]['alk'][$rb]++; # Needed for arranging if (array_key_exists("{$rb};;{$ra}", $rlnk)) { # Reverse link exists? $rlnk["{$rb};;{$ra}"]['rbw'] += $k[5]; $rlnk["{$rb};;{$ra}"]['rtr'] += $dev[$k[1]]['ifin'][$k[2]]; $rlnk["{$rb};;{$ra}"]['rif'][] = "{$k['1']};;{$k['2']}"; $rlnk["{$rb};;{$ra}"]['rty']["{$k['6']}:" . date('j.M', $k[10])]++; } else { if (!$rlnum) { $reg[$rb]['nlk']++; $reg[$rb]['alk'][$rb]++; $rlnk["{$ra};;{$rb}"]['rbw'] += $k[5]; $rlnk["{$ra};;{$rb}"]['rtr'] += $dev[$k[1]]['ifin'][$k[2]]; $rlnk["{$ra};;{$rb}"]['rif'][] = "{$k['3']};;{$k['4']}"; $rlnk["{$ra};;{$rb}"]['rty']["{$k['6']}:" . date('j.M', $k[10])]++; } $rlnk["{$ra};;{$rb}"]['fbw'] += $k[5]; $rlnk["{$ra};;{$rb}"]['ftr'] += $dev[$k[1]]['ifout'][$k[2]]; $rlnk["{$ra};;{$rb}"]['fif'][] = "{$k['1']};;{$k['2']}"; $rlnk["{$ra};;{$rb}"]['fty']["{$k['6']}:" . date('j.M', $k[10])]++; } } if ($mde != "f" and $lev > 1) { if ("{$ra};;{$ca}" != "{$rb};;{$cb}") { $cty[$ra][$ca]['nlk']++; if ($ra == $rb) { $cty[$ra][$ca]['alk'][$cb]++; } #TODO test whether this improves arranging! if (array_key_exists("{$rb};;{$cb};;{$ra};;{$ca}", $clnk)) { $clnk["{$rb};;{$cb};;{$ra};;{$ca}"]['rbw'] += $k[5]; $clnk["{$rb};;{$cb};;{$ra};;{$ca}"]['rtr'] += $dev[$k[1]]['ifin'][$k[2]]; $clnk["{$rb};;{$cb};;{$ra};;{$ca}"]['rif'][] = "{$k['1']};;{$k['2']}"; $clnk["{$rb};;{$cb};;{$ra};;{$ca}"]['rty']["{$k['6']}:" . date('j.M', $k[10])]++; } else { if (!$rlnum) { $cty[$rb][$cb]['nlk']++; if ($ra == $rb) { $cty[$rb][$cb]['alk'][$ca]++; } $clnk["{$ra};;{$ca};;{$rb};;{$cb}"]['rbw'] += $k[5]; $clnk["{$ra};;{$ca};;{$rb};;{$cb}"]['rtr'] += $dev[$k[1]]['ifin'][$k[2]]; $clnk["{$ra};;{$ca};;{$rb};;{$cb}"]['rif'][] = "{$k['3']};;{$k['4']}"; $clnk["{$ra};;{$ca};;{$rb};;{$cb}"]['rty']["{$k['6']}:" . date('j.M', $k[10])]++; } $clnk["{$ra};;{$ca};;{$rb};;{$cb}"]['fbw'] += $k[5]; $clnk["{$ra};;{$ca};;{$rb};;{$cb}"]['ftr'] += $dev[$k[1]]['ifout'][$k[2]]; $clnk["{$ra};;{$ca};;{$rb};;{$cb}"]['fif'][] = "{$k['1']};;{$k['2']}"; $clnk["{$ra};;{$ca};;{$rb};;{$cb}"]['fty']["{$k['6']}:" . date('j.M', $k[10])]++; } } } if ($mde != "f" and $lev > 2) { if ("{$ra};;{$ca};;{$ba}" != "{$rb};;{$cb};;{$bb}") { $bld[$ra][$ca][$ba]['nlk']++; if ("{$ra};;{$ca}" == "{$rb};;{$cb}") { $bld[$ra][$ca][$ba]['alk'][$bb]++; } if (array_key_exists("{$rb};;{$cb};;{$bb};;{$ra};;{$ca};;{$ba}", $blnk)) { $blnk["{$rb};;{$cb};;{$bb};;{$ra};;{$ca};;{$ba}"]['rbw'] += $k[5]; $blnk["{$rb};;{$cb};;{$bb};;{$ra};;{$ca};;{$ba}"]['rtr'] += $dev[$k[1]]['ifin'][$k[2]]; $blnk["{$rb};;{$cb};;{$bb};;{$ra};;{$ca};;{$ba}"]['rif'][] = "{$k['1']};;{$k['2']}"; $blnk["{$rb};;{$cb};;{$bb};;{$ra};;{$ca};;{$ba}"]['rty']["{$k['6']}:" . date('j.M', $k[10])]++; } else { if (!$rlnum) { $bld[$rb][$cb][$bb]['nlk']++; if ("{$ra};;{$ca}" == "{$rb};;{$cb}") { $bld[$rb][$cb][$bb]['alk'][$ba]++; } $blnk["{$ra};;{$ca};;{$ba};;{$rb};;{$cb};;{$bb}"]['rbw'] += $k[5]; $blnk["{$ra};;{$ca};;{$ba};;{$rb};;{$cb};;{$bb}"]['rtr'] += $dev[$k[1]]['ifin'][$k[2]]; $blnk["{$ra};;{$ca};;{$ba};;{$rb};;{$cb};;{$bb}"]['rif'][] = "{$k['3']};;{$k['4']}"; $blnk["{$ra};;{$ca};;{$ba};;{$rb};;{$cb};;{$bb}"]['rty']["{$k['6']}:" . date('j.M', $k[10])]++; } $blnk["{$ra};;{$ca};;{$ba};;{$rb};;{$cb};;{$bb}"]['fbw'] += $k[5]; $blnk["{$ra};;{$ca};;{$ba};;{$rb};;{$cb};;{$bb}"]['ftr'] += $dev[$k[1]]['ifout'][$k[2]]; $blnk["{$ra};;{$ca};;{$ba};;{$rb};;{$cb};;{$bb}"]['fif'][] = "{$k['1']};;{$k['2']}"; $blnk["{$ra};;{$ca};;{$ba};;{$rb};;{$cb};;{$bb}"]['fty']["{$k['6']}:" . date('j.M', $k[10])]++; } } } if ($lev > 3) { $dev[$k[1]]['nlk']++; # Count devlinks for flatmode $dev[$k[1]]['alk'][$k[3]]++; # Needed for arranging #if ($mde == "r") {# TODO find arrange method for building rings (only links within bld matter!) # $flr[$l[0]][$l[1]][$l[2]][$k[1]]['alk'][$k[3]]++; #} if (!$rlnum) { $dev[$k[3]]['nlk']++; $dev[$k[3]]['alk'][$k[1]]++; } } } } DbFreeResult($lres); } $rk = array_keys($reg); $nr = count($rk); # Draw Layout $cud = 0; if ($mde == "f") { $fstnod = 1; $nd = count(array_keys($dev)); foreach (Arrange($dev) as $dv) { $jdev[$dv] = $cud; list($dev[$dv]['x'], $dev[$dv]['y']) = CircleCoords(intval($xm / 2 + $xo), intval($ym / 2 - $yo), $cud, $nd, $dev[$dv]['nlk'], $len, $rot); $mapitems .= DrawItem($dev[$dv]['x'], $dev[$dv]['y'], '0', $dv, 'd'); if ($lev == 6) { DrawNodes($dv); } $imgmap .= "<area href=\"Devices-Status.php?dev=" . urlencode($dv) . "\" coords=\"" . ($dev[$dv]['x'] - $imas) . "," . ($dev[$dv]['y'] - $imas) . "," . ($dev[$dv]['x'] + $imas) . "," . ($dev[$dv]['y'] + $imas) . "\" shape=\"rect\" title=\"{$dv} " . $dev[$dv]['ip'] . " CPU:" . $dev[$dv]['cpu'] . "% Temp:" . $dev[$dv]['tlb'] . "\">\n"; if ($loi) { $mapinfo .= DrawLabel($dev[$dv]['x'], $dev[$dv]['y'] - 40, Safelabel($dev[$dv]['cty'] . " " . $dev[$dv]['bld']), 1, "cornflowerblue"); } elseif ($debug) { $mapinfo .= DrawLabel($dev[$dv]['x'], $dev[$dv]['y'] - 40, "Pos{$cud}", 1, "cornflowerblue"); } $cud++; } } else { if ($mde == "g") { # Prepare geographic stuff if (count($rk) == 1) { $ck = array_keys($cty[$rk[0]]); if (count($ck) == 1) { $mapbg = TopoMap($rk[0], $ck[0]); } else { $mapbg = TopoMap($rk[0]); } } else { $mapbg = TopoMap(); } $bg = Imagecreatefromjpeg("../topo/{$mapbg}"); $xm = Imagesx($bg); $ym = Imagesy($bg); Imagedestroy($bg); } $cur = 0; $toc = 0; $tob = 0; foreach (Arrange($reg) as $r) { if ($mde == "g") { list($reg[$r]['x'], $reg[$r]['y'], $reg[$r]['cmt']) = DbCoords($r); } if (!$reg[$r]['x']) { list($reg[$r]['x'], $reg[$r]['y']) = CircleCoords(intval($xm / 2 + $xo), intval($ym / 2 - $yo), $cur, $nr, $reg[$r]['nlk'], $len, $rot); } if ($lev == 1) { $jreg[$r] = $cur; $mapitems .= DrawItem($reg[$r]['x'], $reg[$r]['y'], $reg[$r]['ndv'], $r, 1); $imgmap .= "<area href=\"?lev=2&mde={$mde}&fmt=png&loo={$loo}&loa={$loa}&st[]=" . urlencode(TopoLoc($r)) . "\" coords=\"" . ($reg[$r]['x'] - $imas) . "," . ($reg[$r]['y'] - $imas) . "," . ($reg[$r]['x'] + $imas) . "," . ($reg[$r]['y'] + $imas) . "\" shape=\"rect\" title=\"{$sholbl}\">\n"; } else { if ($loi) { if (count($cty[$r]) > 1) { $mapinfo .= DrawItem($reg[$r]['x'], $reg[$r]['y'], '0', $r . " " . $reg[$r]['cmt'], 'ri'); } else { $mapinfo .= DrawLabel($reg[$r]['x'], $reg[$r]['y'] - 42, Safelabel($r), 1, "cornflowerblue"); } } $cuc = 0; $nc = count(array_keys($cty[$r])); foreach (Arrange($cty[$r]) as $c) { if ($mde == "g") { list($cty[$r][$c]['x'], $cty[$r][$c]['y'], $cty[$r][$c]['cmt']) = DbCoords($r, $c); } if (!$cty[$r][$c]['x']) { list($cty[$r][$c]['x'], $cty[$r][$c]['y']) = CircleCoords($reg[$r]['x'], $reg[$r]['y'], $cuc, $nc, $cty[$r][$c]['nlk'], $len * 10 / $lsf, $cro); } if ($lev == 2) { $jcty["{$r};;{$c}"] = $toc; $mapitems .= DrawItem($cty[$r][$c]['x'], $cty[$r][$c]['y'], $cty[$r][$c]['ndv'], $c, 2); $imgmap .= "<area href=\"?lev=3&mde={$mde}&fmt=png&loo={$loo}&loa={$loa}&st[]=" . urlencode(TopoLoc($r, $c)) . "\" coords=\"" . ($cty[$r][$c]['x'] - $imas) . "," . ($cty[$r][$c]['y'] - $imas) . "," . ($cty[$r][$c]['x'] + $imas) . "," . ($cty[$r][$c]['y'] + $imas) . "\" shape=\"rect\" title=\"{$sholbl}\">\n"; } else { if ($loi) { if (count($bld[$r][$c]) > 1) { $mapinfo .= DrawItem($cty[$r][$c]['x'], $cty[$r][$c]['y'], '0', $c . " " . $cty[$r][$c]['cmt'], 'ci'); } else { $mapinfo .= DrawLabel($cty[$r][$c]['x'], $cty[$r][$c]['y'] - 30, Safelabel($c), 1, "cornflowerblue"); } } $cub = 0; $nb = count(array_keys($bld[$r][$c])); foreach (Arrange($bld[$r][$c]) as $b) { if ($mde == "g") { list($bld[$r][$c][$b]['x'], $bld[$r][$c][$b]['y'], $bld[$r][$c][$b]['cmt']) = DbCoords($r, $c, $b); } if (!$bld[$r][$c][$b]['x']) { list($bld[$r][$c][$b]['x'], $bld[$r][$c][$b]['y']) = CircleCoords($cty[$r][$c]['x'], $cty[$r][$c]['y'], $cub, $nb, $bld[$r][$c][$b]['nlk'] * ($mde == "b" ? $cb % 2 + 0.3 : 1), $len / pow($lsf / 10, 2), $bro); } if ($lev == 3) { $jbld["{$r};;{$c};;{$b}"] = $tob; $mapitems .= DrawItem($bld[$r][$c][$b]['x'], $bld[$r][$c][$b]['y'], $bld[$r][$c][$b]['ndv'], $b, 3); $imgmap .= "<area href=\"?lev=4&mde={$mde}&fmt=png&loo={$loo}&loa={$loa}&st[]=" . urlencode(TopoLoc($r, $c, $b)) . "\" coords=\"" . ($bld[$r][$c][$b]['x'] - $imas) . "," . ($bld[$r][$c][$b]['y'] - $imas) . "," . ($bld[$r][$c][$b]['x'] + $imas) . "," . ($bld[$r][$c][$b]['y'] + $imas) . "\" shape=\"rect\" title=\"{$sholbl}\">\n"; } elseif ($mde == "b" or $mde == "g") { DrawBuilding($bld[$r][$c][$b]['x'], $bld[$r][$c][$b]['y'], $r, $c, $b); } else { if ($loi) { if (count($flr[$r][$c][$b]) > 1) { $mapinfo .= DrawItem($bld[$r][$c][$b]['x'], $bld[$r][$c][$b]['y'], '0', $b . " " . $bld[$r][$c][$b]['cmt'], 'bi'); } else { $mapinfo .= DrawLabel($bld[$r][$c][$b]['x'], $bld[$r][$c][$b]['y'] - 38, Safelabel($b), 1, "cornflowerblue"); } } $cd = 0; $nd = count(array_keys($flr[$r][$c][$b])); foreach (Arrange($flr[$r][$c][$b]) as $d) { $jdev[$d] = $cud; list($dev[$d]['x'], $dev[$d]['y']) = CircleCoords($bld[$r][$c][$b]['x'], $bld[$r][$c][$b]['y'], $cd, $nd, $dev[$d]['nlk'], $fsz, 0, 0); $mapitems .= DrawItem($dev[$d]['x'], $dev[$d]['y'], '0', $d, 'd'); $imgmap .= "<area href=\"Devices-Status.php?dev=" . urlencode($d) . "\" coords=\"" . ($dev[$d]['x'] - $imas) . "," . ($dev[$d]['y'] - $imas) . "," . ($dev[$d]['x'] + $imas) . "," . ($dev[$d]['y'] + $imas) . "\" shape=\"rect\" title=\"{$dv} " . $dev[$d]['ip'] . " CPU:" . $dev[$d]['cpu'] . "% T:" . $dev[$d]['tmp'] . "C\">\n"; if ($lev == 6) { DrawNodes($d); } $cd++; $cud++; } } $cub++; $tob++; } } $cuc++; $toc++; } } $cur++; } } # Draw Links if ($lev == 1) { $rlkeys = array_keys($rlnk); foreach ($rlkeys as $li) { $l = explode(';;', $li); if ($fmt == "json") { $ls = intval(sqrt($rlnk[$li]['fbw'] / 100000000 / $lsf) + 1); $maplinks .= " {\"source\":" . $jreg[$l[0]] . ",\"target\":" . $jreg[$l[1]] . ",\"value\":{$ls}},\n"; } else { DrawLink($reg[$l[0]]['x'], $reg[$l[0]]['y'], $reg[$l[1]]['x'], $reg[$l[1]]['y'], $rlnk[$li]); } } } elseif ($lev == 2) { foreach (array_keys($clnk) as $li) { $l = explode(';;', $li); if ($fmt == "json") { $ls = intval(sqrt($clnk[$li]['fbw'] / 100000000 / $lsf) + 1); $maplinks .= " {\"source\":" . $jcty["{$l['0']};;{$l['1']}"] . ",\"target\":" . $jcty["{$l['2']};;{$l['3']}"] . ",\"value\":{$ls}},\n"; } else { DrawLink($cty[$l[0]][$l[1]]['x'], $cty[$l[0]][$l[1]]['y'], $cty[$l[2]][$l[3]]['x'], $cty[$l[2]][$l[3]]['y'], $clnk[$li]); } } } elseif ($lev == 3) { foreach (array_keys($blnk) as $li) { $l = explode(';;', $li); if ($fmt == "json") { $ls = intval(sqrt($blnk[$li]['fbw'] / 100000000 / $lsf) + 1); $maplinks .= " {\"source\":" . $jbld["{$l['0']};;{$l['1']};;{$l['2']}"] . ",\"target\":" . $jbld["{$l['3']};;{$l['4']};;{$l['5']}"] . ",\"value\":{$ls}},\n"; } else { DrawLink($bld[$l[0]][$l[1]][$l[2]]['x'], $bld[$l[0]][$l[1]][$l[2]]['y'], $bld[$l[3]][$l[4]][$l[5]]['x'], $bld[$l[3]][$l[4]][$l[5]]['y'], $blnk[$li]); } } } elseif ($lev > 3) { foreach (array_keys($dlnk) as $li) { $l = explode(';;', $li); if ($fmt == "json") { $ls = intval(sqrt($dlnk[$li]['fbw'] / 100000000 / $lsf) + 1); $ls = $ls ? $ls : 1; $maplinks .= " {\"source\":" . $jdev[$l[0]] . ",\"target\":" . $jdev[$l[1]] . ",\"value\":{$ls}},\n"; } else { DrawLink($dev[$l[0]]['x'], $dev[$l[0]]['y'], $dev[$l[1]]['x'], $dev[$l[1]]['y'], $dlnk[$li]); } } if ($lev == 6) { foreach (array_keys($nlnk) as $li) { $l = explode(';;', $li); if ($fmt == "json") { $ls = intval(sqrt($nlnk[$li]['fbw'] / 100000000 / $lsf) + 1); $ls = $ls ? $ls : 1; $maplinks .= " {\"source\":" . $jdev[$l[0]] . ",\"target\":" . $jnod["{$l['0']};;{$l['1']}"] . ",\"value\":{$ls}},\n"; } else { DrawLink($dev[$l[0]]['x'], $dev[$l[0]]['y'], $nod[$l[1]]['x'], $nod[$l[1]]['y'], $nlnk[$li]); } } } } }