PrivateCoffee/travelynx
4
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

maintenance, munin: Use journeys, not user_actions

Browse source
This commit is contained in:
Daniel Friesel 2019-04-24 08:45:56 +02:00
parent 14d2dd52eb
commit fd314e327d
2 changed files with 8 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
lib/Travelynx/Command/maintenance.pm
View file

@ -77,13 +77,14 @@ sub run {
for my $uid (@uids_to_delete) {
say "Deleting uid ${uid}...";
my $tokens_res = $db->delete( 'tokens', { user_id => $uid } );
my $stats_res = $db->delete( 'journey_stats', { user_id => $uid } );
my $actions_res = $db->delete( 'user_actions', { user_id => $uid } );
my $user_res = $db->delete( 'users', { id => $uid } );
my $tokens_res = $db->delete( 'tokens', { user_id => $uid } );
my $stats_res = $db->delete( 'journey_stats', { user_id => $uid } );
my $journeys_res = $db->delete( 'journeys', { user_id => $uid } );
my $transit_res = $db->delete( 'in_transit', { user_id => $uid } );
my $user_res = $db->delete( 'users', { id => $uid } );
printf( " %d tokens, %d monthly stats, %d actions\n",
$tokens_res->rows, $stats_res->rows, $actions_res->rows );
printf( " %d tokens, %d monthly stats, %d journeys\n",
$tokens_res->rows, $stats_res->rows, $journeys_res->rows );
if ( $user_res->rows != 1 ) {
printf STDERR (

2
lib/Travelynx/Command/munin.pm
View file

@ -23,7 +23,7 @@ sub run {
my $now = DateTime->now( time_zone => 'Europe/Berlin' );
my $checkin_window_query
= qq{select count(*) as count from user_actions where action_id = 1 and action_time > to_timestamp(?);};
= qq{select count(*) as count from journeys where checkin_time > to_timestamp(?);};
query_to_munin( 'reg_user_count',
$db->select( 'users', 'count(*) as count', { status => 1 } )