view doc/ucis.ano/bgp_graph/bgp_path_list_bird.php @ 326:2eb15dc9b339 draft

Fixed the pod
author Ivo Smits <Ivo@UCIS.nl>
date Mon, 03 Jan 2011 01:14:38 +0100
parents d44b9afb4a25
children
line wrap: on
line source

#!/usr/bin/php
<?php
$mynode = array_key_exists('LOCALNODE',$_SERVER)?$_SERVER['LOCALNODE']:0;

$fds = NULL;
$proc = proc_open('birdc', array(0 => array('pipe','r'), 1 => array('pipe','w'), 2 => STDERR), $fds);
fwrite($fds[0], "show route all\n");
fclose($fds[0]);
$paths = array();

while (!feof($fds[1])) {
	$line = stream_get_line($fds[1], 1024, "\n");
	if ($line === NULL || $line === FALSE) break;
	if (!strlen($line) || $line[0] != "\t") continue;
	if (substr($line, 0, 14) != "\tBGP.as_path: ") continue;
	$path = substr($line, 14);
	if (in_array($path, $paths)) continue;
	$paths[] = $path;
	print($mynode.' '.$path."\n");
}