From 520e6456001cf858d7e59606a77b1cf0ab115aa9 Mon Sep 17 00:00:00 2001
From: Birte Kristina Friesel <derf@finalrewind.org>
Date: Fri, 23 Aug 2024 22:44:02 +0200
Subject: Suggest backends based on coverage and latest checkout coordinates

References #156
---
 lib/Travelynx/Model/Journeys.pm | 26 ++++++++++++++++++++++++++
 1 file changed, 26 insertions(+)

(limited to 'lib/Travelynx/Model')

diff --git a/lib/Travelynx/Model/Journeys.pm b/lib/Travelynx/Model/Journeys.pm
index 6d59d44..8a97aef 100755
--- a/lib/Travelynx/Model/Journeys.pm
+++ b/lib/Travelynx/Model/Journeys.pm
@@ -807,6 +807,32 @@ sub get_oldest_ts {
 	return undef;
 }
 
+sub get_latest_checkout_latlon {
+	my ( $self, %opt ) = @_;
+	my $uid = $opt{uid};
+	my $db  = $opt{db} // $self->{pg}->db;
+
+	my $res_h = $db->select(
+		'journeys_str',
+		[ 'arr_lat', 'arr_lon', ],
+		{
+			user_id   => $uid,
+			cancelled => 0
+		},
+		{
+			limit    => 1,
+			order_by => { -desc => 'journey_id' }
+		}
+	)->hash;
+
+	if ( not $res_h ) {
+		return;
+	}
+
+	return $res_h->{arr_lat}, $res_h->{arr_lon};
+
+}
+
 sub get_latest_checkout_ids {
 	my ( $self, %opt ) = @_;
 	my $uid = $opt{uid};
-- 
cgit v1.2.3