1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
|
<!DOCTYPE html>
<html>
<head>
<title><%= $title %></title>
<meta charset="utf-8">
<meta name="viewport" content="width=device-width, initial-scale=1.0">
%= stylesheet '/main.css'
%= javascript '/jquery-2.1.1.min.js'
%= javascript '/image.js'
</head>
<body>
% if ($stop) {
% if ($errstr) {
<div class="error">Received an error from the backend service:</div>
<div>
<pre>
%= $errstr
</pre>
</div>
% }
% elsif ($frontend eq 'png') {
<img src="/<%= $city ? "$city/" : q{} %><%= $stop %>.png?<%= $params %>" alt=""
id="display" height="<%= $height * 4 %>" width="<%= $width * 4 %>"/>
% }
% elsif ($frontend eq 'html') {
<iframe src="/<%= $city ? "$city/" : q{} %><%= $stop %>.html?<%= $params %>" id="display"
height="<%= $height * 5 %>" width="<%= $width * 5 %>"></iframe>
% }
% elsif ($frontend eq 'infoscreen') {
<p>
<a href="/<%= $city ? "$city/" : q{} %><%= $stop %>.html?<%= $params %>&template=infoscreen">Infoscreen for
<%= $city %> <%= $stop %></a>
</p>
Preview:<br/>
<iframe src="/<%= $city ? "$city/" : q{} %><%= $stop %>.html?<%= $params %>&template=infoscreen" id="display"
height="<%= $height * 5 %>" width="<%= $width * 5 %>"></iframe>
% }
% elsif ($frontend eq 'json') {
<p>
<a href="/<%= $city ? "$city/" : q{} %><%= $stop %>.json?<%= $params %>">JSON data for
<%= $city %> <%= $stop %></a>
</p>
<p>
Data is cached for 1 minute. JSON format:
</p>
<ul>
<li>error: err string if an error occured, otherwise null</li>
<li>preformatted: strings used by the PNG / HTML frontend</li>
<li>raw:
% if (param('backend') and param('backend') eq 'db') {
serialized
<a href="http://finalrewind.org/projects/Travel-Status-DE-DeutscheBahn/">
Travel::Status::DE::HAFAS</a>-objects, see the
<a href="http://man.finalrewind.org/3/Travel-Status-DE-DeutscheBahn-Result/">::Result</a>
documentation
% }
% elsif (param('backend') and param('backend') eq 'aseag') {
serialized
<a href="http://finalrewind.org/projects/Travel-Status-DE-URA/">
Travel::Status::DE::URA</a>-objects, see the
<a href="http://man.finalrewind.org/3/Travel-Status-DE-URA-Result/">::Result</a>
documentation
% }
% else {
serialized
<a href="http://finalrewind.org/projects/Travel-Status-DE-VRR/">
Travel::Status::DE::VRR</a>-objects, see the
<a href="http://man.finalrewind.org/3/Travel-Status-DE-VRR-Result/">::Result</a>
and
<a href="http://man.finalrewind.org/3/Travel-Status-DE-VRR-Line/">::Line</a>
documentation
% }
</li>
<li>version: Program version (string, not numeric)</li>
</ul>
<p>NOTE: The JSON interface is not guaranteed to be stable. The data layout may
change any time.</p>
% }
% } # ($city and $stop)
% else {
<p>
VRR-Infoscreen shows the next departures at a public transit stop, just like
the Lumino LED displays used at some stops.
</p>
<p>
It works best for the VRR (Verkehrsverbund Rhein-Ruhr), but also supports most
other German transit networks.
</p>
% }
<div class="input-field">
% if (my $error = stash 'error') {
<p>
Error: <%= $error %><br/>
</p>
% }
%= form_for _redirect => begin
<div>
<div class="field">
<div class="desc">Stadt</div>
<div>
%= text_field 'city'
</div>
</div>
<div class="field">
<div class="desc">Haltestelle</div>
<div>
%= text_field 'stop'
%= submit_button 'Display'
</div>
</div>
<div class="break"></div>
<span class="optional">optional:</span>
<div class="field">
<div class="desc" title="number of lines">
display height</div>
<div>
%= number_field 'no_lines', min => 1, max => 10
</div>
</div>
<div class="field">
<div class="desc">min. offset [minutes]</div>
<div>
%= number_field 'offset', min => 0
</div>
</div>
<div class="field">
<div class="desc" title="comma-separated list, example: NE,U,10">
match line prefixes¹</div>
<div>
%= text_field 'line'
</div>
</div>
<div class="field">
<div class="desc" title="comma-separated list. Buggy.">match platform¹</div>
<div>
%= text_field 'platform'
</div>
</div>
<div class="field">
<div class="desc">frontend</div>
<div>
%= select_field frontend => [['Image (PNG)' => 'png'], ['HTML' => 'html'], ['Infoscreen' => 'infoscreen'], ['JSON' => 'json']]
</div>
</div>
<div class="field">
<div class="desc">backend</div>
<div>
% my @efa_backends = map { ["$_ (EFA)" => "efa.$_"] } efa_service_list();
% @efa_backends = map { $_->[1] } sort { $a->[0] cmp $b->[0] }
% map { [$_->[0], $_] } @efa_backends;
% my @hafas_backends = map { ["$_ (HAFAS)" => "hafas.$_"] } hafas_service_list();
% @hafas_backends = map { $_->[1] } sort { $a->[0] cmp $b->[0] }
% map { [$_->[0], $_] } @hafas_backends;
%= select_field backend => [['EFA / VRR' => 'vrr'], ['DB (HAFAS)' => 'db'], ['ASEAG (URA)' => 'aseag'], @efa_backends, @hafas_backends]
</div>
</div>
</div>
% end
<p>
<b>¹</b> separate values with commas, e.g. NE,U,10
</p>
</div> <!-- input-field -->
<div class="notes">
<span class="notes">notes:</span>
<ul>
<li>The EFA backend does not support Umlauts</li>
<li>For Düsseldorf, the DB backend usually gives better results</li>
<li>If you write the city correctly (like "Essen", not "essen"), vrr-infoscreen can
shorten destination names</li>
<li><a href="/Essen/Martinstr?no_lines=8">Example</a>
<li>See also <a href="http://dbf.finalrewind.org/">db-infoscreen</a> for an
interface optimized for Deutsche Bahn departure data</li>
</li>
</ul>
</div> <!-- notes -->
<div class="about">
<a href="http://finalrewind.org/projects/vrr-fakedisplay/">vrr-fakedisplay</a>
v<%= $version %><br/>
Backends:<br/>
<a href="http://finalrewind.org/projects/Travel-Status-DE-URA/">Travel::Status::DE::ASEAG</a>
v<%= $Travel::Status::DE::ASEAG::VERSION %><br/>
<a href="http://finalrewind.org/projects/Travel-Status-DE-DeutscheBahn/">Travel::Status::DE::HAFAS</a>
v<%= $Travel::Status::DE::HAFAS::VERSION %><br/>
<a href="http://finalrewind.org/projects/Travel-Status-DE-VRR/">Travel::Status::DE::EFA</a>
v<%= $Travel::Status::DE::EFA::VERSION %><br/>
</div>
</body>
</html>
|
