Add new configuration options to enable/disable IPv6 or IPv4.

When disabling IPv6 or IPv4, the looking glass will not try to use both
IP protocol versions when looking for an AS routes or when pinging or
tracerouting.
If an IP address of a disabling IP version is used, the user will have an
error in return of its command. This error will tell him that the IP version
he is trying to use is disabled.

Please note that when trying to ping or traceroute a hostname from a Cisco or
a Juniper device, this looking glass will not prevent the device to use a
disabled IP version when executing its command.

This commit also contains some small changes with HTML tags.

5 files changed, 169 insertions, 69 deletions

diff --git a/routers/bird.php b/routers/bird.php
index 6d74672..34f1a96 100644
--- a/routers/bird.php
+++ b/routers/bird.php
@@ -2,7 +2,7 @@
 
 /*
  * Looking Glass - An easy to deploy Looking Glass
- * Copyright (C) 2014-2015 Guillaume Mazoyer <gmazoyer@gravitons.in>
+ * Copyright (C) 2014-2016 Guillaume Mazoyer <gmazoyer@gravitons.in>
  *
  * This program is free software; you can redistribute it and/or modify
  * it under the terms of the GNU General Public License as published by
@@ -31,7 +31,7 @@ final class Bird extends Router {
       $destination = hostname_to_ip_address($hostname);
 
       if (!$destination) {
-        throw new Exception('No AAAA or A record found for '.$hostname);
+        throw new Exception('No record found for '.$hostname);
       }
     }
 
@@ -42,7 +42,7 @@ final class Bird extends Router {
       $ping = 'ping '.$this->global_config['tools']['ping_options'].' '.
         (isset($hostname) ? $hostname : $destination);
     } else {
-      throw new Exception('The parameter does not resolve to an IPv6/IPv4 address.');
+      throw new Exception('The parameter does not resolve to an IP address.');
     }
 
     if (($ping != null) && $this->has_source_interface_id()) {
@@ -68,7 +68,7 @@ final class Bird extends Router {
       $destination = hostname_to_ip_address($hostname);
 
       if (!$destination) {
-        throw new Exception('No AAAA or A record found for '.$hostname);
+        throw new Exception('No record found for '.$hostname);
       }
     }
 
@@ -81,20 +81,20 @@ final class Bird extends Router {
         $this->global_config['tools']['traceroute_options'].' '.
         (isset($hostname) ? $hostname : $destination);
     } else {
-      throw new Exception('The parameter does not resolve to an IPv6/IPv4 address.');
+      throw new Exception('The parameter does not resolve to an IP address.');
     }
 
     if (($traceroute != null) && $this->has_source_interface_id()) {
-      if (match_ipv4($destination) &&
-          ($this->get_source_interface_id('ipv4') != null)) {
-        $traceroute .= ' '.
-          $this->global_config['tools']['traceroute_source_option'].' '.
-          $this->get_source_interface_id('ipv4');
-      } else if (match_ipv6($destination) &&
+      if (match_ipv6($destination) &&
           ($this->get_source_interface_id('ipv6') != null)) {
         $traceroute .= ' '.
           $this->global_config['tools']['traceroute_source_option'].' '.
           $this->get_source_interface_id('ipv6');
+      } else if (match_ipv4($destination) &&
+          ($this->get_source_interface_id('ipv4') != null)) {
+        $traceroute .= ' '.
+          $this->global_config['tools']['traceroute_source_option'].' '.
+          $this->get_source_interface_id('ipv4');
       }
     }
 
@@ -110,20 +110,32 @@ final class Bird extends Router {
     switch ($command) {
       case 'bgp':
         if (match_ipv6($parameter, false)) {
-          $commands[] = $birdc6.' \'show route for '.$parameter.'\'';
+          if ($this->global_config['misc']['disable_ipv6']) {
+            throw new Exception('IPv6 is disabled.');
+          } else {
+            $commands[] = $birdc6.' \'show route for '.$parameter.'\'';
+          }
         } else if (match_ipv4($parameter, false)) {
-          $commands[] = $birdc.' \'show route for '.$parameter.'\'';
+          if ($this->global_config['misc']['disable_ipv4']) {
+            throw new Exception('IPv4 is disabled.');
+          } else {
+            $commands[] = $birdc.' \'show route for '.$parameter.'\'';
+          }
         } else {
-          throw new Exception('The parameter is not an IPv6/IPv4 address.');
+          throw new Exception('The parameter is not an IP address.');
         }
         break;
 
       case 'as-path-regex':
         if (match_aspath_regex($parameter)) {
-          $commands[] = $birdc6.' \'show route where bgp_path ~ [= '.
-            $parameter.' =]\'';
-          $commands[] = $birdc.' \'show route where bgp_path ~ [= '.
-            $parameter.' =]\'';
+          if (!$this->global_config['misc']['disable_ipv6']) {
+            $commands[] = $birdc6.' \'show route where bgp_path ~ [= '.
+              $parameter.' =]\'';
+          }
+          if (!$this->global_config['misc']['disable_ipv4']) {
+            $commands[] = $birdc.' \'show route where bgp_path ~ [= '.
+              $parameter.' =]\'';
+          }
         } else {
           throw new Exception('The parameter is not an AS-Path regular expression.');
         }
@@ -131,10 +143,14 @@ final class Bird extends Router {
 
       case 'as':
         if (match_as($parameter)) {
-          $commands[] = $birdc6.' \'show route where bgp_path ~ [= '.
-            $parameter.' =]\'';
-          $commands[] = $birdc.' \'show route where bgp_path ~ [= '.
-            $parameter.' =]\'';
+          if (!$this->global_config['misc']['disable_ipv6']) {
+            $commands[] = $birdc6.' \'show route where bgp_path ~ [= '.
+              $parameter.' =]\'';
+          }
+          if (!$this->global_config['misc']['disable_ipv4']) {
+            $commands[] = $birdc.' \'show route where bgp_path ~ [= '.
+              $parameter.' =]\'';
+          }
         } else {
           throw new Exception('The parameter is not an AS number.');
         }
diff --git a/routers/cisco.php b/routers/cisco.php
index 4529d2d..0a7cb76 100644
--- a/routers/cisco.php
+++ b/routers/cisco.php
@@ -2,7 +2,7 @@
 
 /*
  * Looking Glass - An easy to deploy Looking Glass
- * Copyright (C) 2014-2015 Guillaume Mazoyer <gmazoyer@gravitons.in>
+ * Copyright (C) 2014-2016 Guillaume Mazoyer <gmazoyer@gravitons.in>
  *
  * This program is free software; you can redistribute it and/or modify
  * it under the terms of the GNU General Public License as published by
@@ -26,11 +26,22 @@ final class Cisco extends Router {
   protected function build_ping($destination) {
     $ping = null;
 
-    if (match_ipv6($destination) || match_ipv4($destination) ||
-        match_hostname($destination)) {
+    if (match_hostname($destination)) {
       $ping = 'ping '.$destination.' repeat 10';
+    } else if (match_ipv6($destination)) {
+      if ($this->global_config['misc']['disable_ipv6']) {
+        throw new Exception('IPv6 is disabled.');
+      } else {
+        $ping = 'ping '.$destination.' repeat 10';
+      }
+    } else if (match_ipv4($destination)) {
+      if ($this->global_config['misc']['disable_ipv4']) {
+        throw new Exception('IPv4 is disabled.');
+      } else {
+        $ping = 'ping '.$destination.' repeat 10';
+      }
     } else {
-      throw new Exception('The parameter is not an IPv6/IPv4 address or a hostname.');
+      throw new Exception('The parameter is not an IP address or a hostname.');
     }
 
     if (($ping != null) && $this->has_source_interface_id()) {
@@ -51,7 +62,7 @@ final class Cisco extends Router {
       $destination = hostname_to_ip_address($hostname);
 
       if (!$destination) {
-        throw new Exception('No AAAA or A record found for '.$hostname);
+        throw new Exception('No record found for '.$hostname);
       }
 
       if (match_ipv6($destination)) {
@@ -59,10 +70,10 @@ final class Cisco extends Router {
       } else if (match_ipv4($destination)) {
         $traceroute = 'traceroute ip '.(isset($hostname) ? $hostname : $destination);
       } else {
-        throw new Exception('The parameter does not resolve to an IPv6/IPv4 address.');
+        throw new Exception('The parameter does not resolve to an IP address.');
       }
     } else {
-      throw new Exception('The parameter is not an IPv6/IPv4 address or a hostname.');
+      throw new Exception('The parameter is not an IP address or a hostname.');
     }
 
     if (($traceroute != null) && $this->has_source_interface_id() &&
@@ -79,18 +90,32 @@ final class Cisco extends Router {
     switch ($command) {
       case 'bgp':
         if (match_ipv6($parameter, false)) {
-          $commands[] = 'show bgp ipv6 unicast '.$parameter;
+          if ($this->global_config['misc']['disable_ipv6']) {
+            throw new Exception('IPv6 is disabled.');
+          } else {        
+            $commands[] = 'show bgp ipv6 unicast '.$parameter;
+          }
         } else if (match_ipv4($parameter, false)) {
-          $commands[] = 'show bgp ipv4 unicast '.$parameter;
+          if ($this->global_config['misc']['disable_ipv4']) {
+            throw new Exception('IPv4 is disabled.');
+          } else {
+            $commands[] = 'show bgp ipv4 unicast '.$parameter;
+          }
         } else {
-          throw new Exception('The parameter is not an IPv6/IPv4 address.');
+          throw new Exception('The parameter is not an IP address.');
         }
         break;
 
       case 'as-path-regex':
         if (match_aspath_regex($parameter)) {
-          $commands[] = 'show bgp ipv6 unicast quote-regexp "'.$parameter.'"';
-          $commands[] = 'show bgp ipv4 unicast quote-regexp "'.$parameter.'"';
+          if (!$this->global_config['misc']['disable_ipv6']) {
+            $commands[] = 'show bgp ipv6 unicast quote-regexp "'.$parameter.
+              '"';
+          }
+          if (!$this->global_config['misc']['disable_ipv4']) {
+            $commands[] = 'show bgp ipv4 unicast quote-regexp "'.$parameter.
+              '"';
+          }
         } else {
           throw new Exception('The parameter is not an AS-Path regular expression.');
         }
@@ -98,8 +123,14 @@ final class Cisco extends Router {
 
       case 'as':
         if (match_as($parameter)) {
-          $commands[] = 'show bgp ipv6 unicast quote-regexp "^'.$parameter.'_"';
-          $commands[] = 'show bgp ipv4 unicast quote-regexp "^'.$parameter.'_"';
+          if (!$this->global_config['misc']['disable_ipv6']) {
+            $commands[] = 'show bgp ipv6 unicast quote-regexp "^'.$parameter.
+              '_"';
+          }
+          if (!$this->global_config['misc']['disable_ipv4']) {
+            $commands[] = 'show bgp ipv4 unicast quote-regexp "^'.$parameter.
+              '_"';
+          }
         } else {
           throw new Exception('The parameter is not an AS number.');
         }
diff --git a/routers/juniper.php b/routers/juniper.php
index 53c9473..355a1d3 100644
--- a/routers/juniper.php
+++ b/routers/juniper.php
@@ -2,7 +2,7 @@
 
 /*
  * Looking Glass - An easy to deploy Looking Glass
- * Copyright (C) 2014-2015 Guillaume Mazoyer <gmazoyer@gravitons.in>
+ * Copyright (C) 2014-2016 Guillaume Mazoyer <gmazoyer@gravitons.in>
  *
  * This program is free software; you can redistribute it and/or modify
  * it under the terms of the GNU General Public License as published by
@@ -26,11 +26,22 @@ final class Juniper extends Router {
   protected function build_ping($destination) {
     $ping = null;
 
-    if (match_ipv6($destination) || match_ipv4($destination) ||
-        match_hostname($destination)) {
+    if (match_hostname($destination)) {
       $ping = 'ping count 10 rapid '.$destination;
+    } else if (match_ipv6($destination)) {
+      if ($this->global_config['misc']['disable_ipv6']) {
+        throw new Exception('IPv6 is disabled.');
+      } else {
+        $ping = 'ping inet6 count 10 rapid '.$destination;
+      }
+    } else if (match_ipv4($destination)) {
+      if ($this->global_config['misc']['disable_ipv4']) {
+        throw new Exception('IPv4 is disabled.');
+      } else {
+        $ping = 'ping inet count 10 rapid '.$destination;
+      }
     } else {
-      throw new Exception('The parameter is not an IPv6/IPv4 address or a hostname.');
+      throw new Exception('The parameter is not an IP address or a hostname.');
     }
 
     if (($ping != null) && $this->has_source_interface_id()) {
@@ -43,12 +54,22 @@ final class Juniper extends Router {
   protected function build_traceroute($destination) {
     $traceroute = null;
 
-    if (match_ipv6($destination) || match_hostname($destination)) {
+    if (match_hostname($destination)) {
       $traceroute = 'traceroute '.$destination;
+    } else if (match_ipv6($destination)) {
+      if ($this->global_config['misc']['disable_ipv6']) {
+        throw new Exception('IPv6 is disabled.');
+      } else {
+        $traceroute = 'traceroute inet6 '.$destination;
+      }
     } else if (match_ipv4($destination)) {
-      $traceroute = 'traceroute as-number-lookup '.$destination;
+      if ($this->global_config['misc']['disable_ipv4']) {
+        throw new Exception('IPv4 is disabled.');
+      } else {
+        $traceroute = 'traceroute inet as-number-lookup '.$destination;
+      }
     } else {
-      throw new Exception('The parameter is not an IPv6/IPv4 address or a hostname.');
+      throw new Exception('The parameter is not an IP address or a hostname.');
     }
 
     if (($traceroute != null) && $this->has_source_interface_id()) {
@@ -64,22 +85,34 @@ final class Juniper extends Router {
     switch ($command) {
       case 'bgp':
         if (match_ipv6($parameter, false)) {
-          $commands[] = 'show route '.$parameter.
-            ' protocol bgp table inet6.0 active-path';
+          if ($this->global_config['misc']['disable_ipv6']) {
+            throw new Exception('IPv6 is disabled.');
+          } else {
+            $commands[] = 'show route '.$parameter.
+              ' protocol bgp table inet6.0 active-path';
+          }
         } else if (match_ipv4($parameter, false)) {
-          $commands[] = 'show route '.$parameter.
-            ' protocol bgp table inet.0 active-path';
+          if ($this->global_config['misc']['disable_ipv4']) {
+            throw new Exception('IPv4 is disabled.');
+          } else {
+            $commands[] = 'show route '.$parameter.
+              ' protocol bgp table inet.0 active-path';
+          }
         } else {
-          throw new Exception('The parameter is not an IPv6/IPv4 address.');
+          throw new Exception('The parameter is not an IP address.');
         }
         break;
 
       case 'as-path-regex':
         if (match_aspath_regex($parameter)) {
-          $commands[] = 'show route aspath-regex "'.$parameter.
-            '" protocol bgp table inet6.0';
-          $commands[] = 'show route aspath-regex "'.$parameter.
-            '" protocol bgp table inet.0';
+          if (!$this->global_config['misc']['disable_ipv6']) {
+            $commands[] = 'show route aspath-regex "'.$parameter.
+              '" protocol bgp table inet6.0';
+          }
+          if (!$this->global_config['misc']['disable_ipv4']) {
+            $commands[] = 'show route aspath-regex "'.$parameter.
+              '" protocol bgp table inet.0';
+          }
         } else {
           throw new Exception('The parameter is not an AS-Path regular expression.');
         }
@@ -87,10 +120,14 @@ final class Juniper extends Router {
 
       case 'as':
         if (match_as($parameter)) {
-          $commands[] = 'show route aspath-regex "^'.$parameter.
-            ' .*" protocol bgp table inet6.0';
-          $commands[] = 'show route aspath-regex "^'.$parameter.
-            ' .*" protocol bgp table inet.0';
+          if (!$this->global_config['misc']['disable_ipv6']) {
+            $commands[] = 'show route aspath-regex "^'.$parameter.
+              ' .*" protocol bgp table inet6.0';
+          }
+          if (!$this->global_config['misc']['disable_ipv4']) {
+            $commands[] = 'show route aspath-regex "^'.$parameter.
+              ' .*" protocol bgp table inet.0';
+          }
         } else {
           throw new Exception('The parameter is not an AS number.');
         }
diff --git a/routers/quagga.php b/routers/quagga.php
index 55f423f..bc91cdf 100644
--- a/routers/quagga.php
+++ b/routers/quagga.php
@@ -2,7 +2,7 @@
 
 /*
  * Looking Glass - An easy to deploy Looking Glass
- * Copyright (C) 2014-2015 Guillaume Mazoyer <gmazoyer@gravitons.in>
+ * Copyright (C) 2014-2016 Guillaume Mazoyer <gmazoyer@gravitons.in>
  *
  * This program is free software; you can redistribute it and/or modify
  * it under the terms of the GNU General Public License as published by
@@ -31,7 +31,7 @@ final class Quagga extends Router {
       $destination = hostname_to_ip_address($hostname);
 
       if (!$destination) {
-        throw new Exception('No AAAA or A record found for '.$hostname);
+        throw new Exception('No record found for '.$hostname);
       }
     }
 
@@ -42,7 +42,7 @@ final class Quagga extends Router {
       $ping = 'ping '.$this->global_config['tools']['ping_options'].' '.
         (isset($hostname) ? $hostname : $destination);
     } else {
-      throw new Exception('The parameter does not resolve to an IPv6/IPv4 address.');
+      throw new Exception('The parameter does not resolve to an IP address.');
     }
 
     if (($ping != null) && $this->has_source_interface_id()) {
@@ -68,7 +68,7 @@ final class Quagga extends Router {
       $destination = hostname_to_ip_address($hostname);
 
       if (!$destination) {
-        throw new Exception('No AAAA or A record found for '.$hostname);
+        throw new Exception('No record found for '.$hostname);
       }
     }
 
@@ -81,7 +81,7 @@ final class Quagga extends Router {
         $this->global_config['tools']['traceroute_options'].' '.
         (isset($hostname) ? $hostname : $destination);
     } else {
-      throw new Exception('The parameter does not resolve to an IPv6/IPv4 address.');
+      throw new Exception('The parameter does not resolve to an IP address.');
     }
 
     if (($traceroute != null) && $this->has_source_interface_id()) {
@@ -109,18 +109,30 @@ final class Quagga extends Router {
     switch ($command) {
       case 'bgp':
         if (match_ipv6($parameter, false)) {
-          $commands[] = $vtysh.'show bgp ipv6 unicast '.$parameter.'"';
+          if ($this->global_config['misc']['disable_ipv6']) {
+            throw new Exception('IPv6 is disabled.');
+          } else {
+            $commands[] = $vtysh.'show bgp ipv6 unicast '.$parameter.'"';
+          }
         } else if (match_ipv4($parameter, false)) {
-          $commands[] = $vtysh.'show bgp ipv4 unicast '.$parameter.'"';
+          if ($this->global_config['misc']['disable_ipv4']) {
+            throw new Exception('IPv4 is disabled.');
+          } else {
+            $commands[] = $vtysh.'show bgp ipv4 unicast '.$parameter.'"';
+          }
         } else {
-          throw new Exception('The parameter is not an IPv4/IPv6 address.');
+          throw new Exception('The parameter is not an IP address.');
         }
         break;
 
       case 'as-path-regex':
         if (match_aspath_regex($parameter)) {
-          $commands[] = $vtysh.'show ipv6 bgp regexp '.$parameter.'"';
-          $commands[] = $vtysh.'show ip bgp regexp '.$parameter.'"';
+          if (!$this->global_config['misc']['disable_ipv6']) {
+            $commands[] = $vtysh.'show ipv6 bgp regexp '.$parameter.'"';
+          }
+          if (!$this->global_config['misc']['disable_ipv4']) {
+            $commands[] = $vtysh.'show ip bgp regexp '.$parameter.'"';
+          }
         } else {
           throw new Exception('The parameter is not an AS-Path regular expression.');
         }
@@ -128,8 +140,12 @@ final class Quagga extends Router {
 
       case 'as':
         if (match_as($parameter)) {
-          $commands[] = $vtysh.'show ipv6 bgp regexp ^'.$parameter.'_'.'"';
-          $commands[] = $vtysh.'show ip bgp regexp ^'.$parameter.'_'.'"';
+          if (!$this->global_config['misc']['disable_ipv6']) {
+            $commands[] = $vtysh.'show ipv6 bgp regexp ^'.$parameter.'_'.'"';
+          }
+          if (!$this->global_config['misc']['disable_ipv4']) {
+            $commands[] = $vtysh.'show ip bgp regexp ^'.$parameter.'_'.'"';
+          }
         } else {
           throw new Exception('The parameter is not an AS number.');
         }
diff --git a/routers/router.php b/routers/router.php
index 984de2d..f980982 100644
--- a/routers/router.php
+++ b/routers/router.php
@@ -2,7 +2,7 @@
 
 /*
  * Looking Glass - An easy to deploy Looking Glass
- * Copyright (C) 2014-2015 Guillaume Mazoyer <gmazoyer@gravitons.in>
+ * Copyright (C) 2014-2016 Guillaume Mazoyer <gmazoyer@gravitons.in>
  *
  * This program is free software; you can redistribute it and/or modify
  * it under the terms of the GNU General Public License as published by