brh_7seg.c revision 1.1 1 1.1 thorpej /* $NetBSD: brh_7seg.c,v 1.1 2003/01/25 02:00:16 thorpej Exp $ */
2 1.1 thorpej
3 1.1 thorpej /*
4 1.1 thorpej * Copyright (c) 2001, 2002 Wasabi Systems, Inc.
5 1.1 thorpej * All rights reserved.
6 1.1 thorpej *
7 1.1 thorpej * Written by Jason R. Thorpe for Wasabi Systems, Inc.
8 1.1 thorpej *
9 1.1 thorpej * Redistribution and use in source and binary forms, with or without
10 1.1 thorpej * modification, are permitted provided that the following conditions
11 1.1 thorpej * are met:
12 1.1 thorpej * 1. Redistributions of source code must retain the above copyright
13 1.1 thorpej * notice, this list of conditions and the following disclaimer.
14 1.1 thorpej * 2. Redistributions in binary form must reproduce the above copyright
15 1.1 thorpej * notice, this list of conditions and the following disclaimer in the
16 1.1 thorpej * documentation and/or other materials provided with the distribution.
17 1.1 thorpej * 3. All advertising materials mentioning features or use of this software
18 1.1 thorpej * must display the following acknowledgement:
19 1.1 thorpej * This product includes software developed for the NetBSD Project by
20 1.1 thorpej * Wasabi Systems, Inc.
21 1.1 thorpej * 4. The name of Wasabi Systems, Inc. may not be used to endorse
22 1.1 thorpej * or promote products derived from this software without specific prior
23 1.1 thorpej * written permission.
24 1.1 thorpej *
25 1.1 thorpej * THIS SOFTWARE IS PROVIDED BY WASABI SYSTEMS, INC. ``AS IS'' AND
26 1.1 thorpej * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
27 1.1 thorpej * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
28 1.1 thorpej * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL WASABI SYSTEMS, INC
29 1.1 thorpej * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
30 1.1 thorpej * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
31 1.1 thorpej * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
32 1.1 thorpej * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
33 1.1 thorpej * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
34 1.1 thorpej * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
35 1.1 thorpej * POSSIBILITY OF SUCH DAMAGE.
36 1.1 thorpej */
37 1.1 thorpej
38 1.1 thorpej /*
39 1.1 thorpej * Support for the 7-segment display on the ADI Engineering BRH board.
40 1.1 thorpej */
41 1.1 thorpej
42 1.1 thorpej #include <sys/param.h>
43 1.1 thorpej #include <sys/systm.h>
44 1.1 thorpej
45 1.1 thorpej #include <machine/bus.h>
46 1.1 thorpej
47 1.1 thorpej #include <evbarm/adi_brh/brhreg.h>
48 1.1 thorpej #include <evbarm/adi_brh/brhvar.h>
49 1.1 thorpej
50 1.1 thorpej #define WRITE(x, v) *((__volatile uint8_t *) (x)) = (v)
51 1.1 thorpej
52 1.1 thorpej static int snakestate;
53 1.1 thorpej
54 1.1 thorpej static const uint8_t digitmap[] = {
55 1.1 thorpej /* +#####+
56 1.1 thorpej * # #
57 1.1 thorpej * # #
58 1.1 thorpej * # #
59 1.1 thorpej * +-----+
60 1.1 thorpej * # #
61 1.1 thorpej * # #
62 1.1 thorpej * # #
63 1.1 thorpej * +#####+
64 1.1 thorpej */
65 1.1 thorpej SEG_G,
66 1.1 thorpej
67 1.1 thorpej /* +-----+
68 1.1 thorpej * | #
69 1.1 thorpej * | #
70 1.1 thorpej * | #
71 1.1 thorpej * +-----+
72 1.1 thorpej * | #
73 1.1 thorpej * | #
74 1.1 thorpej * | #
75 1.1 thorpej * +-----+
76 1.1 thorpej */
77 1.1 thorpej SEG_A|SEG_D|SEG_E|SEG_F|SEG_G,
78 1.1 thorpej
79 1.1 thorpej /* +#####+
80 1.1 thorpej * | #
81 1.1 thorpej * | #
82 1.1 thorpej * | #
83 1.1 thorpej * +#####+
84 1.1 thorpej * # |
85 1.1 thorpej * # |
86 1.1 thorpej * # |
87 1.1 thorpej * +#####+
88 1.1 thorpej */
89 1.1 thorpej SEG_C|SEG_F,
90 1.1 thorpej
91 1.1 thorpej /* +#####+
92 1.1 thorpej * | #
93 1.1 thorpej * | #
94 1.1 thorpej * | #
95 1.1 thorpej * +#####+
96 1.1 thorpej * | #
97 1.1 thorpej * | #
98 1.1 thorpej * | #
99 1.1 thorpej * +#####+
100 1.1 thorpej */
101 1.1 thorpej SEG_E|SEG_F,
102 1.1 thorpej
103 1.1 thorpej /* +-----+
104 1.1 thorpej * # #
105 1.1 thorpej * # #
106 1.1 thorpej * # #
107 1.1 thorpej * +#####+
108 1.1 thorpej * | #
109 1.1 thorpej * | #
110 1.1 thorpej * | #
111 1.1 thorpej * +-----+
112 1.1 thorpej */
113 1.1 thorpej SEG_A|SEG_D|SEG_E,
114 1.1 thorpej
115 1.1 thorpej /* +#####+
116 1.1 thorpej * # |
117 1.1 thorpej * # |
118 1.1 thorpej * # |
119 1.1 thorpej * +#####+
120 1.1 thorpej * | #
121 1.1 thorpej * | #
122 1.1 thorpej * | #
123 1.1 thorpej * +#####+
124 1.1 thorpej */
125 1.1 thorpej SEG_B|SEG_E,
126 1.1 thorpej
127 1.1 thorpej /* +#####+
128 1.1 thorpej * # |
129 1.1 thorpej * # |
130 1.1 thorpej * # |
131 1.1 thorpej * +#####+
132 1.1 thorpej * # #
133 1.1 thorpej * # #
134 1.1 thorpej * # #
135 1.1 thorpej * +#####+
136 1.1 thorpej */
137 1.1 thorpej SEG_B,
138 1.1 thorpej
139 1.1 thorpej /* +#####+
140 1.1 thorpej * | #
141 1.1 thorpej * | #
142 1.1 thorpej * | #
143 1.1 thorpej * +-----+
144 1.1 thorpej * | #
145 1.1 thorpej * | #
146 1.1 thorpej * | #
147 1.1 thorpej * +-----+
148 1.1 thorpej */
149 1.1 thorpej SEG_D|SEG_E|SEG_F,
150 1.1 thorpej
151 1.1 thorpej /* +#####+
152 1.1 thorpej * # #
153 1.1 thorpej * # #
154 1.1 thorpej * # #
155 1.1 thorpej * +#####+
156 1.1 thorpej * # #
157 1.1 thorpej * # #
158 1.1 thorpej * # #
159 1.1 thorpej * +#####+
160 1.1 thorpej */
161 1.1 thorpej 0,
162 1.1 thorpej
163 1.1 thorpej /* +#####+
164 1.1 thorpej * # #
165 1.1 thorpej * # #
166 1.1 thorpej * # #
167 1.1 thorpej * +#####+
168 1.1 thorpej * | #
169 1.1 thorpej * | #
170 1.1 thorpej * | #
171 1.1 thorpej * +-----+
172 1.1 thorpej */
173 1.1 thorpej SEG_D|SEG_E,
174 1.1 thorpej };
175 1.1 thorpej
176 1.1 thorpej static uint8_t
177 1.1 thorpej brh_7seg_xlate(char c)
178 1.1 thorpej {
179 1.1 thorpej uint8_t rv;
180 1.1 thorpej
181 1.1 thorpej if (c >= '0' && c <= '9')
182 1.1 thorpej rv = digitmap[c - '0'];
183 1.1 thorpej else if (c == '.')
184 1.1 thorpej rv = (u_int8_t) ~SEG_DP;
185 1.1 thorpej else
186 1.1 thorpej rv = 0xff;
187 1.1 thorpej
188 1.1 thorpej return (rv);
189 1.1 thorpej }
190 1.1 thorpej
191 1.1 thorpej void
192 1.1 thorpej brh_7seg(char a)
193 1.1 thorpej {
194 1.1 thorpej uint8_t ch;
195 1.1 thorpej
196 1.1 thorpej ch = brh_7seg_xlate(a);
197 1.1 thorpej
198 1.1 thorpej snakestate = 0;
199 1.1 thorpej
200 1.1 thorpej WRITE(BRH_LED_VBASE, ch);
201 1.1 thorpej }
202 1.1 thorpej
203 1.1 thorpej static const uint8_t snakemap[] = {
204 1.1 thorpej
205 1.1 thorpej /* +#####+
206 1.1 thorpej * | |
207 1.1 thorpej * | |
208 1.1 thorpej * | |
209 1.1 thorpej * +-----+
210 1.1 thorpej * | |
211 1.1 thorpej * | |
212 1.1 thorpej * | |
213 1.1 thorpej * +-----+
214 1.1 thorpej */
215 1.1 thorpej ~SEG_A,
216 1.1 thorpej
217 1.1 thorpej /* +-----+
218 1.1 thorpej * # |
219 1.1 thorpej * # |
220 1.1 thorpej * # |
221 1.1 thorpej * +-----+
222 1.1 thorpej * | |
223 1.1 thorpej * | |
224 1.1 thorpej * | |
225 1.1 thorpej * +-----+
226 1.1 thorpej */
227 1.1 thorpej ~SEG_F,
228 1.1 thorpej
229 1.1 thorpej /* +-----+
230 1.1 thorpej * | |
231 1.1 thorpej * | |
232 1.1 thorpej * | |
233 1.1 thorpej * +#####+
234 1.1 thorpej * | |
235 1.1 thorpej * | |
236 1.1 thorpej * | |
237 1.1 thorpej * +-----+
238 1.1 thorpej */
239 1.1 thorpej ~SEG_G,
240 1.1 thorpej
241 1.1 thorpej /* +-----+
242 1.1 thorpej * | |
243 1.1 thorpej * | |
244 1.1 thorpej * | |
245 1.1 thorpej * +-----+
246 1.1 thorpej * | #
247 1.1 thorpej * | #
248 1.1 thorpej * | #
249 1.1 thorpej * +-----+
250 1.1 thorpej */
251 1.1 thorpej ~SEG_C,
252 1.1 thorpej
253 1.1 thorpej /* +-----+
254 1.1 thorpej * | |
255 1.1 thorpej * | |
256 1.1 thorpej * | |
257 1.1 thorpej * +-----+
258 1.1 thorpej * | |
259 1.1 thorpej * | |
260 1.1 thorpej * | |
261 1.1 thorpej * +#####+
262 1.1 thorpej */
263 1.1 thorpej ~SEG_D,
264 1.1 thorpej
265 1.1 thorpej /* +-----+
266 1.1 thorpej * | |
267 1.1 thorpej * | |
268 1.1 thorpej * | |
269 1.1 thorpej * +-----+
270 1.1 thorpej * # |
271 1.1 thorpej * # |
272 1.1 thorpej * # |
273 1.1 thorpej * +-----+
274 1.1 thorpej */
275 1.1 thorpej ~SEG_E,
276 1.1 thorpej
277 1.1 thorpej /* +-----+
278 1.1 thorpej * | |
279 1.1 thorpej * | |
280 1.1 thorpej * | |
281 1.1 thorpej * +#####+
282 1.1 thorpej * | |
283 1.1 thorpej * | |
284 1.1 thorpej * | |
285 1.1 thorpej * +-----+
286 1.1 thorpej */
287 1.1 thorpej ~SEG_G,
288 1.1 thorpej
289 1.1 thorpej /* +-----+
290 1.1 thorpej * | #
291 1.1 thorpej * | #
292 1.1 thorpej * | #
293 1.1 thorpej * +-----+
294 1.1 thorpej * | |
295 1.1 thorpej * | |
296 1.1 thorpej * | |
297 1.1 thorpej * +-----+
298 1.1 thorpej */
299 1.1 thorpej ~SEG_B,
300 1.1 thorpej };
301 1.1 thorpej
302 1.1 thorpej void
303 1.1 thorpej brh_7seg_snake(void)
304 1.1 thorpej {
305 1.1 thorpej int cur = snakestate;
306 1.1 thorpej
307 1.1 thorpej WRITE(BRH_LED_VBASE, snakemap[cur]);
308 1.1 thorpej
309 1.1 thorpej snakestate = (cur + 1) & 7;
310 1.1 thorpej }
311