diff options
author | Daniel Friesel <derf@finalrewind.org> | 2022-10-02 22:21:37 +0200 |
---|---|---|
committer | Daniel Friesel <derf@finalrewind.org> | 2022-10-02 22:22:56 +0200 |
commit | 962bb7e20b249f9d272518a517e5cf04a0a50727 (patch) | |
tree | 7031e19d29cd668dc4ebf41a374ca385293360fa /lib/Travel/Status/DE | |
parent | b7d28bc824f5a11c96902f81856bcbdbdccf99ee (diff) |
ÖBB: switch to mgate
Diffstat (limited to 'lib/Travel/Status/DE')
-rw-r--r-- | lib/Travel/Status/DE/HAFAS.pm | 18 |
1 files changed, 16 insertions, 2 deletions
diff --git a/lib/Travel/Status/DE/HAFAS.pm b/lib/Travel/Status/DE/HAFAS.pm index 0d6175d..cbb4dbb 100644 --- a/lib/Travel/Status/DE/HAFAS.pm +++ b/lib/Travel/Status/DE/HAFAS.pm @@ -117,11 +117,25 @@ my %hafas_instance = ( }, }, 'ÖBB' => { - url => 'https://fahrplan.oebb.at/bin/stboard.exe', + mgate => 'https://fahrplan.oebb.at/bin/mgate.exe', stopfinder => 'https://fahrplan.oebb.at/bin/ajax-getstop.exe', name => 'Österreichische Bundesbahnen', productbits => [qw[ice ice ice regio regio s bus ferry u tram ice ondemand ice]], + request => { + client => { + id => 'OEBB', + v => '6030600', + type => 'IPH', + name => 'oebbPROD-ADHOC', + }, + ver => '1.41', + auth => { + type => 'AID', + aid => 'OWDL4fE4' . 'ixNiPBBm', + }, + lang => 'deu', + }, }, RSAG => { url => 'https://fahrplan.rsag-online.de/hafas/stboard.exe', @@ -211,7 +225,7 @@ sub new_mgate { $lid = 'A=1@O=' . $self->{station} . '@'; } - my $mot_mask = 1023; + my $mot_mask = 2**@{ $hafas_instance{$service}{productbits} } - 1; my %mot_pos; for my $i ( 0 .. $#{ $hafas_instance{$service}{productbits} } ) { |