support non-DB HAFAS backends (WiP)

10 files changed, 106 insertions, 58 deletions

diff --git a/templates/_checked_in.html.ep b/templates/_checked_in.html.ep
index 19a94bb..9450ffd 100644
--- a/templates/_checked_in.html.ep
+++ b/templates/_checked_in.html.ep
@@ -345,7 +345,7 @@
 				% }
 				<a style="margin-right: 0;" href="<%= $url %>"><i class="material-icons left" aria-hidden="true">timeline</i> Zuglauf</a>
 				% if ($journey->{extra_data}{trip_id}) {
-					<a class="right" style="margin-right: 0;" href="https://dbf.finalrewind.org/map/<%= $journey->{extra_data}{trip_id} =~ s{#}{%23}gr %>/<%= $journey->{train_line} || 0 %>?from=<%= $journey->{dep_name} %>&amp;to=<%= $journey->{arr_name} %>&amp;dark=<%= (session('theme') and session('theme') eq 'dark') ? 1 : 0 %>"><i class="material-icons left" aria-hidden="true">map</i> Karte</a>
+					<a class="right" style="margin-right: 0;" href="https://dbf.finalrewind.org/map/<%= $journey->{extra_data}{trip_id} =~ s{#}{%23}gr %>/<%= $journey->{train_line} || 0 %>?hafas=<%= $journey->{backend_name} // 'DB' %>&amp;from=<%= $journey->{dep_name} %>&amp;to=<%= $journey->{arr_name} %>&amp;dark=<%= (session('theme') and session('theme') eq 'dark') ? 1 : 0 %>"><i class="material-icons left" aria-hidden="true">map</i> Karte</a>
 				% }
 			</div>
 		</div>
diff --git a/templates/_checked_out.html.ep b/templates/_checked_out.html.ep
index 5a944dc..21db335 100644
--- a/templates/_checked_out.html.ep
+++ b/templates/_checked_out.html.ep
@@ -3,7 +3,7 @@
 		<span class="card-title">Ausgecheckt</span>
 		<p>Aus
 			%= include '_format_train', journey => $journey
-			bis <a href="/s/<%= $journey->{arr_eva} %>?hafas=<%= $journey->{train_id} =~ m{[|]} ? 1 : 0 %>"><%= $journey->{arr_name} %></a></p>
+			bis <a href="/s/<%= $journey->{arr_eva} %>?hafas=<%= $journey->{is_hafas} ? $journey->{backend_name} : q{} %>"><%= $journey->{arr_name} %></a></p>
 		% if (@{stash('connections_iris') // [] } or @{stash('connections_hafas') // []}) {
 			<span class="card-title" style="margin-top: 2ex;">Verbindungen</span>
 			<p>Fahrt auswählen zum Einchecken mit Zielwahl.</p>
diff --git a/templates/_connections_hafas.html.ep b/templates/_connections_hafas.html.ep
index dcf7ec9..43198e2 100644
--- a/templates/_connections_hafas.html.ep
+++ b/templates/_connections_hafas.html.ep
@@ -1,6 +1,6 @@
 <ul class="collection departures connections">
 	% for my $res (@{$connections}) {
-		% my ($train, $via, $via_arr) = @{$res};
+		% my ($train, $via, $via_arr, $hafas_service) = @{$res};
 		% $via_arr = $via_arr ? $via_arr->strftime('%H:%M') : q{};
 		% my $row_class = '';
 		% my $link_class = 'action-checkin';
@@ -10,6 +10,7 @@
 		% }
 		% if ($checkin_from) {
 			<li class="collection-item <%= $row_class %> <%= $link_class %>"
+			data-hafas="<%= $hafas_service %>"
 			data-station="<%= $train->station_eva %>"
 			data-train="<%= $train->id %>"
 			data-ts="<%= ($train->sched_datetime // $train->datetime)->epoch %>"
diff --git a/templates/_departures_hafas.html.ep b/templates/_departures_hafas.html.ep
index 9e4d7a4..012db61 100644
--- a/templates/_departures_hafas.html.ep
+++ b/templates/_departures_hafas.html.ep
@@ -18,6 +18,7 @@
 		</li>
 	% }
 	<li class="collection-item <%= $link_class %> <%= $row_class %>"
+		data-hafas="<%= $hafas %>"
 		data-station="<%= $result->station_eva %>"
 		data-train="<%= $result->id %>"
 		data-ts="<%= ($result->sched_datetime // $result->datetime)->epoch %>"
diff --git a/templates/departures.html.ep b/templates/departures.html.ep
index 9fd79e6..71dd0ad 100644
--- a/templates/departures.html.ep
+++ b/templates/departures.html.ep
@@ -1,26 +1,27 @@
 <div class="row">
-	<div class="col s12">
-		<h2>
-			<i class="material-icons "  aria-hidden="true"><%= param('hafas') ? 'directions' : 'train' %></i>
+	<div class="col s8">
+		<strong style="font-size: 120%;">
 			<%= $station %>
-		</h2>
+		</strong>
 		% for my $related_station (sort { $a->{name} cmp $b->{name} } @{$related_stations}) {
 			+ <%= $related_station->{name} %> <br/>
 		% }
 	</div>
-</div>
-% if ($api_link) {
-<div class="row">
-	<div class="col s12 center-align">
-	% if (param('hafas')) {
-		<a href="<%= $api_link %>" class="btn-small"><i class="material-icons left"  aria-hidden="true">train</i>zum Schienenverkehr</a>
-	% }
-	% else {
-		<a href="<%= $api_link %>" class="btn-small"><i class="material-icons left"  aria-hidden="true">directions</i>zum Nahverkehr</a>
-	% }
+	<div class="col s4 center-align">
+		% my $self_link = url_for('sstation', station => param('station'));
+		% if (param('hafas')) {
+			<span class="btn-small disabled"><i class="material-icons left" aria-hidden="true">directions</i> <%= param('hafas') %> (HAFAS)</span>
+		% }
+		% else {
+			% if ($user->{backend_id}) {
+				<a href="/account/select_backend?redirect_to=<%= $self_link %>" class="btn-small"><i class="material-icons left" aria-hidden="true">directions</i><%= $user->{backend_name} %> (<%= $user->{backend_hafas} ? 'HAFAS' : q{} %>)</a>
+			% }
+			% else {
+				<a href="/account/select_backend?redirect_to=<%= $self_link %>" class="btn-small"><i class="material-icons left" aria-hidden="true">train</i>DB (IRIS-TTS)</a>
+			% }
+		% }
 	</div>
 </div>
-% }
 
 % my $have_connections = 0;
 % if ($user_status->{checked_in}) {
@@ -40,10 +41,10 @@
 				</div>
 				<div class="card-action">
 					% if ($can_check_out) {
-						<a class="action-undo" data-id="in_transit" data-checkints="<%= $user_status->{timestamp}->epoch %>"  style="margin-right: 0;">
+						<a class="action-undo" data-hafas="<%= param('hafas') // q{} %>" data-id="in_transit" data-checkints="<%= $user_status->{timestamp}->epoch %>"  style="margin-right: 0;">
 							<i class="material-icons left" aria-hidden="true">undo</i> Rückgängig
 						</a>
-						<a class="action-checkout right" data-station="<%= $eva %>" data-force="1">
+						<a class="action-checkout right" data-hafas="<%= param('hafas') // q{} %>" data-station="<%= $eva %>" data-force="1">
 							Hier auschecken
 						</a>
 					% }
@@ -51,7 +52,7 @@
 						<a class="action-undo" data-id="in_transit" data-checkints="<%= $user_status->{timestamp}->epoch %>"  style="margin-right: 0;">
 							<i class="material-icons left" aria-hidden="true">undo</i> Rückgängig
 						</a>
-						<a class="action-checkout right" data-station="<%= $eva %>" data-force="1">
+						<a class="action-checkout right" data-hafas="<%= param('hafas') // q{} %>" data-station="<%= $eva %>" data-force="1">
 							<i class="material-icons left" aria-hidden="true">gps_off</i>
 							Hier auschecken
 						</a>
@@ -139,7 +140,7 @@
 		</p>
 		% if (not $user_status->{checked_in} or ($can_check_out and $user_status->{arr_eva} and $user_status->{arrival_countdown} <= 0)) {
 			% if ($hafas) {
-				%= include '_departures_hafas', results => $results;
+				%= include '_departures_hafas', results => $results, hafas => $hafas;
 			% }
 			% else {
 				%= include '_departures_iris', results => $results;
diff --git a/templates/exception.html.ep b/templates/exception.html.ep
index ec01ad2..9b8697c 100644
--- a/templates/exception.html.ep
+++ b/templates/exception.html.ep
@@ -20,8 +20,15 @@
 			Timestamp:
 			%= DateTime->now(time_zone => 'Europe/Berlin')->strftime("%d/%b/%Y:%H:%M:%S %z")
 			<br/><br/>
-			Message:
-			%= ref($exception) ? (split(qr{\n}, $exception->message))[0] : $exception
+			% if (ref($exception)) {
+				Trace:<br/>
+				% for my $line (split(qr{\n}, $exception->message)) {
+					<%= $line %><br/>
+				% }
+			% }
+			% else {
+				Message: <%= $exception %>
+			% }
 		</p>
 	</div>
 </div>
diff --git a/templates/landingpage.html.ep b/templates/landingpage.html.ep
index 45bfb21..22478ed 100644
--- a/templates/landingpage.html.ep
+++ b/templates/landingpage.html.ep
@@ -1,5 +1,6 @@
 % if (is_user_authenticated()) {
 	% my $status = stash('user_status');
+	% my $user = stash('user');
 	% if (stash('error')) {
 		<div class="row">
 			<div class="col s12">
@@ -51,32 +52,40 @@
 				% if ( @{stash('timeline') // [] } ) {
 					%= include '_timeline_link', timeline => stash('timeline')
 				% }
-				<div class="card">
-					<div class="card-content">
-						<span class="card-title">Hallo, <%= current_user->{name} %>!</span>
-						<p>Du bist gerade nicht eingecheckt.</p>
-						<div class="geolocation" data-recent="<%= join('|', map { $_->{eva} . ';' . $_->{name} . ';' . $_->{hafas} } @{stash('recent_targets') // []} ) %>">
-							<button class="btn waves-effect waves-light btn-flat">Stationen in der Umgebung abfragen</button>
-						</div>
-						%= form_for 'list_departures' => begin
+				%= form_for 'list_departures' => begin
+					<div class="card">
+						<div class="card-content">
+							<span class="card-title">Hallo, <%= $user->{name} %>!</span>
+							<p>Du bist gerade nicht eingecheckt.</p>
+							<p>
+							<div class="geolocation" data-recent="<%= join('|', map { $_->{eva} . ';' . $_->{name} . ';' . $_->{hafas} } @{stash('recent_targets') // []} ) %>" data-backend=<%= $user->{backend_id} %>">
+								<button class="btn waves-effect waves-light btn-flat">Stationen in der Umgebung abfragen</button>
+							</div>
 							<div class="input-field">
 								%= text_field 'station', id => 'station', class => 'autocomplete contrast-color-text', autocomplete => 'off', required => undef
 								<label for="station">Manuelle Eingabe</label>
 							</div>
-							<div class="center-align">
-								<button class="btn waves-effect waves-light btn-flat" type="submit" name="action" value="departures">
-									<i class="material-icons left" aria-hidden="true">send</i>
-									Abfahrten
-								</button>
-							</div>
-						%= end
+							</p>
+						</div>
+						<div class="card-action">
+							% if ($user->{backend_id}) {
+								<a href="/account/select_backend?redirect_to=/" class="btn btn-flat"><i class="material-icons left" aria-hidden="true">directions</i><%= $user->{backend_name} %> (<%= $user->{backend_hafas} ? 'HAFAS' : q{} %>)</a>
+							% }
+							% else {
+								<a href="/account/select_backend?redirect_to=/" class="btn btn-flat"><i class="material-icons left" aria-hidden="true">train</i>DB (IRIS-TTS)</a>
+							% }
+							<button class="btn right waves-effect waves-light btn-flat" type="submit" name="action" value="departures">
+								<i class="material-icons left" aria-hidden="true">send</i>
+								Abfahrten
+							</button>
+						</div>
 					</div>
-				</div>
+				%= end
 			% }
 		</div>
 	</div>
 	<h2 style="margin-left: 0.75rem;">Letzte Fahrten</h2>
-	%= include '_history_trains', date_format => '%d.%m.%Y', journeys => [journeys->get(uid => current_user->{id}, limit => 5, with_datetime => 1)];
+	%= include '_history_trains', date_format => '%d.%m.%Y', journeys => [journeys->get(uid => $user->{id}, limit => 5, with_datetime => 1)];
 % }
 % else {
 	<div class="row">
diff --git a/templates/layouts/default.html.ep b/templates/layouts/default.html.ep
index 01b8018..4edf805 100644
--- a/templates/layouts/default.html.ep
+++ b/templates/layouts/default.html.ep
@@ -62,7 +62,7 @@
 		%= javascript "/static/${av}/js/geolocation${min}.js"
 	% }
 	% if (stash('with_autocomplete')) {
-		%= javascript "/dyn/${av}/autocomplete.js", defer => undef
+		%= javascript "/dyn/${av}/autocomplete.js?backend_id=" . (stash('backend_id') // 1), defer => undef
 	% }
 	% if (stash('with_map')) {
 		%= javascript "/static/${av}/leaflet/leaflet.js"
diff --git a/templates/select_backend.html.ep b/templates/select_backend.html.ep
new file mode 100644
index 0000000..4eb4cc9
--- /dev/null
+++ b/templates/select_backend.html.ep
@@ -0,0 +1,34 @@
+<div class="row">
+	<div class="col s12">
+		<h2>Backend auswählen</h2>
+		<p style="text-align: justify;">
+			Das ausgewählte Backend bestimmt die Datenquelle für Fahrten in travelynx.
+			<strong>DB (HAFAS)</strong> ist eine gute Wahl für Nah-, Regional- und Fernverkehr in Deutschland und (teilweise) Nachbarländern.
+			<strong>IRIS-TTS</strong> unterstützt ausschließlich Schienenverkehr; im Gegensatz zum HAFAS sind hier detaillierte Verspätungsgründe verfügbar.
+			Die restlichen Backends können sich für Fahrten außerhalb Deutschlands sowie in einzelnen innerdeutschen Verkehrsverbünden lohnen.
+			Fahrten im Ausland fehlen im DB-HAFAS oft; Fahrten im Inland können mit spezifischen Backends genauere Daten haben – z.B. liefert das AVV-HAFAS im Gegensatz zum DB-HAFAS Kartendaten für dortige Buslinien.
+		</p>
+	</div>
+</div>
+%= form_for '/account/select_backend' => (method => 'POST') => begin
+	% if (stash('redirect_to')) {
+		%= hidden_field 'redirect_to' => stash('redirect_to')
+	% }
+	% for my $backend (@{ stash('backends') // [] }) {
+		<div class="row">
+			<div class="col s12 m4 l4 center-align">
+				<button class="btn waves-effect waves-light <%= $backend->{id} == $user->{backend_id} ? 'disabled' : q{} %>" type="submit" name="backend" value="<%= $backend->{id} %>">
+					<%= $backend->{name} %> (<%= $backend->{type} %>)
+				</button>
+			</div>
+			<div class="col s12 m8 l8">
+				% if ($backend->{longname}) {
+					<%= $backend->{longname} %>
+				% }
+				% if ($backend->{id} == $user->{backend_id}) {
+					(aktuell ausgewählt)
+				% }
+			</div>
+		</div>
+	% }
+%= end
diff --git a/templates/traewelling.html.ep b/templates/traewelling.html.ep
index c1f2b7d..1e0d65d 100644
--- a/templates/traewelling.html.ep
+++ b/templates/traewelling.html.ep
@@ -157,26 +157,21 @@
 				<div>
 					<label>
 						%= check_box toot => 1
-						<span>… Checkin auf Mastodon veröffentlichen</span>
-					</label>
-				</div>
-				<div>
-					<label>
-						%= check_box tweet => 1
-						<span>… Checkin auf Twitter veröffentlichen</span>
+						<span>… Checkin im Fediverse veröffentlichen</span>
 					</label>
 				</div>
 				<p>Die Synchronisierung erfolgt spätestens drei Minuten nach der
-					Zielwahl. Beachte, dass die Synchronisierung travelynx
-					→ Träwelling unabhängig von der eingestellten Sichtbarkeit
-					des Checkins erfolgt. travelynx reicht die Sichtbarkeit
-					aber an Träwelling weiter.
-					Träwelling-Checkins können von travelynx aktuell nicht
-					rückgängig gemacht werden. Eine nachträgliche Änderung der
-					Zielstation wird nicht übernommen. Mastodon und Twitter beziehen
-					sich auf die in den <a
+					Zielwahl. Es werden ausschließlich Checkins mittels
+					DB (IRIS-TTS) und DB (HAFAS) synchornisiert. Beachte, dass
+					die Synchronisierung travelynx → Träwelling unabhängig von
+					der eingestellten Sichtbarkeit des Checkins erfolgt.
+					travelynx reicht die Sichtbarkeit aber an Träwelling
+					weiter.  Träwelling-Checkins können von travelynx aktuell
+					nicht rückgängig gemacht werden. Eine nachträgliche
+					Änderung der Zielstation wird nicht übernommen. Fediverse
+					bezieht sich auf den in den <a
 					href="https://traewelling.de/settings">Träwelling-Einstellungen</a>
-					verknüpften Accounts.</p>
+					verknüpften Account.</p>
 			</div>
 			<div class="input-field col s12">
 				<div>