From d896bdcddc4e6e0161a3cab449ef4b11963543ab Mon Sep 17 00:00:00 2001
From: Birte Kristina Friesel <birte.friesel@uos.de>
Date: Thu, 30 Jan 2025 22:26:41 +0100
Subject: annotate cancelled and unlikely / infeasible connections

---
 lib/Travel/Routing/DE/DBRIS/Connection/Segment.pm | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

(limited to 'lib/Travel/Routing/DE/DBRIS/Connection')

diff --git a/lib/Travel/Routing/DE/DBRIS/Connection/Segment.pm b/lib/Travel/Routing/DE/DBRIS/Connection/Segment.pm
index f2278ef..1b01d77 100644
--- a/lib/Travel/Routing/DE/DBRIS/Connection/Segment.pm
+++ b/lib/Travel/Routing/DE/DBRIS/Connection/Segment.pm
@@ -18,7 +18,7 @@ Travel::Routing::DE::DBRIS::Connection::Segment->mk_ro_accessors(
 	  sched_dep rt_dep dep dep_platform
 	  sched_arr rt_arr arr arr_platform
 	  sched_duration rt_duration duration duration_percent
-	  arr_delay dep_delay delay
+	  arr_delay dep_delay delay feasibility is_unlikely
 	  journey_id
 	  occupancy occupancy_first occupancy_second
 	  is_transfer is_walk walk_name distance_m
@@ -42,6 +42,7 @@ sub new {
 		train_long  => $json->{verkehrsmittel}{langText},
 		direction   => $json->{verkehrsmittel}{richtung},
 		distance_m  => $json->{distanz},
+		feasibility => $json->{anschlussBewertungCode},
 	};
 
 	if ( my $ts = $json->{abfahrtsZeitpunkt} ) {
@@ -134,6 +135,9 @@ sub new {
 
 	for my $message ( @{ $json->{risNotizen} // [] } ) {
 		push( @{ $ref->{messages_ris} }, $message );
+		if ( $message->{key} eq 'text.realtime.journey.missed.connection' ) {
+			$ref->{is_unlikely} = 1;
+		}
 	}
 
 	for my $message ( @{ $json->{priorisierteMeldungen} // [] } ) {
-- 
cgit v1.2.3