Unverified Commit 944688cf authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

influxdb: add stations statistics

parent a58a312b

lib/Travelynx/Command/influxdb.pm

+58 −1
Original line number Diff line number Diff line
@@ -29,6 +29,7 @@ sub run { 
	my $active = $now->clone->subtract( months => 1 );



	my @stats;

	my @stations;

	my @traewelling;



	push(
@@ -83,6 +84,44 @@ sub run { 
			$db->select( 'polylines', 'count(*) as count' )->hash->{count}

		)

	);



	push(

		@stations,

		query_to_influx(

			'iris',

			$db->select(

				'stations',

				'count(*) as count',

				{

					source   => 0,

					archived => 0

				}

			)->hash->{count}

		)

	);

	push(

		@stations,

		query_to_influx(

			'hafas',

			$db->select(

				'stations',

				'count(*) as count',

				{

					source   => 1,

					archived => 0

				}

			)->hash->{count}

		)

	);

	push(

		@stations,

		query_to_influx(

			'archived',

			$db->select( 'stations', 'count(*) as count', { archived => 1 } )

			  ->hash->{count}

		)

	);



	push(

		@traewelling,

		query_to_influx(
@@ -115,11 +154,29 @@ sub run { 
		)

	);



	if ( $self->app->config->{influxdb}->{url} ) {

	if ( $self->app->mode eq 'development' ) {

		$self->app->log->debug( 'POST '

			  . $self->app->config->{influxdb}->{url}

			  . ' stats '

			  . join( ',', @stats ) );

		$self->app->log->debug( 'POST '

			  . $self->app->config->{influxdb}->{url}

			  . ' stations '

			  . join( ',', @stations ) );

		$self->app->log->debug( 'POST '

			  . $self->app->config->{influxdb}->{url}

			  . ' traewelling '

			  . join( ',', @traewelling ) );

	}

	elsif ( $self->app->config->{influxdb}->{url} ) {

		$self->app->ua->post_p(

			$self->app->config->{influxdb}->{url},

			'stats ' . join( ',', @stats )

		)->wait;

		$self->app->ua->post_p(

			$self->app->config->{influxdb}->{url},

			'stations ' . join( ',', @stations )

		)->wait;

		$self->app->ua->post_p(

			$self->app->config->{influxdb}->{url},

			'traewelling ' . join( ',', @traewelling )

templates/_departures_hafas.html.ep

+1 −0
Original line number Diff line number Diff line 
<p>+++ Testbetrieb +++</p>

<table class="striped">

<tbody>

% my $orientation_bar_shown = param('train');