+sub port_graphs_link {
+ # hardcoded for 'main' tree for now
+ my $self = shift;
+ my $serviceid = shift;
+ my $hash = $self->get_router_serviceids(undef,$serviceid);
+ my @keys = keys %$hash; # yeah this is weird...
+ my $host = $keys[0];
+ my $iface = $hash->{$keys[0]};
+ my $config_tree = new Torrus::ConfigTree( -TreeName => 'main' );
+ my $token = $config_tree->token("/Routers/$host/Interface_Counters/$iface/InOut_bps");
+ return $Torrus::Freeside::FSURL."/torrus/main?token=$token";
+}
+