attempt at testing AS names

1 files changed, 14 insertions, 0 deletions

diff --git a/doc/ucis.ano/bgp_graph/path_list_to_dot.php b/doc/ucis.ano/bgp_graph/path_list_to_dot.php
index 1c54583..5ad8152 100755
--- a/doc/ucis.ano/bgp_graph/path_list_to_dot.php
+++ b/doc/ucis.ano/bgp_graph/path_list_to_dot.php
@@ -22,6 +22,20 @@ foreach ($nodes as $node => $links) {
 	}
 }
 
+function nodename ($node) { switch ($node) {
+ case '64731': return 'SRN';
+}; return $node; };
+
+$nodelist=array();
+foreach ($nodes as $node => $links) {
+ if (!array_key_exists($node,$nodelist)) $nodelist[$node]=nodename($node);
+ foreach ($links as $link => $dummy)
+  if (!array_key_exists($link,$nodelist)) $nodelist[$node]=nodename($link);
+};
+
+foreach ($nodelist as $node => $name)
+ print "\t".$node.' [label="'.$name.'"]'."\n";
+
 print("graph BGP_nodes {\n");
 foreach ($nodes as $node => $links) {
 	foreach ($links as $link => $dummy) {