iq80321_7seg.c revision 1.4 1 1.4 lukem /* $NetBSD: iq80321_7seg.c,v 1.4 2003/07/15 00:25:04 lukem 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 Intel IQ80321.
40 1.1 thorpej */
41 1.4 lukem
42 1.4 lukem #include <sys/cdefs.h>
43 1.4 lukem __KERNEL_RCSID(0, "$NetBSD: iq80321_7seg.c,v 1.4 2003/07/15 00:25:04 lukem Exp $");
44 1.1 thorpej
45 1.1 thorpej #include <sys/param.h>
46 1.1 thorpej #include <sys/systm.h>
47 1.1 thorpej
48 1.1 thorpej #include <machine/bus.h>
49 1.1 thorpej
50 1.1 thorpej #include <evbarm/iq80321/iq80321reg.h>
51 1.1 thorpej #include <evbarm/iq80321/iq80321var.h>
52 1.1 thorpej
53 1.1 thorpej #define WRITE(x, v) *((__volatile uint8_t *) (x)) = (v)
54 1.1 thorpej
55 1.1 thorpej static int snakestate;
56 1.3 thorpej
57 1.3 thorpej /*
58 1.3 thorpej * The 7-segment display looks like so:
59 1.3 thorpej *
60 1.3 thorpej * A
61 1.3 thorpej * +-----+
62 1.3 thorpej * | |
63 1.3 thorpej * F | | B
64 1.3 thorpej * | G |
65 1.3 thorpej * +-----+
66 1.3 thorpej * | |
67 1.3 thorpej * E | | C
68 1.3 thorpej * | D |
69 1.3 thorpej * +-----+ o DP
70 1.3 thorpej *
71 1.3 thorpej * Setting a bit clears the corresponding segment on the
72 1.3 thorpej * display.
73 1.3 thorpej */
74 1.3 thorpej #define SEG_A (1 << 7)
75 1.3 thorpej #define SEG_B (1 << 6)
76 1.3 thorpej #define SEG_C (1 << 5)
77 1.3 thorpej #define SEG_D (1 << 4)
78 1.3 thorpej #define SEG_E (1 << 3)
79 1.3 thorpej #define SEG_F (1 << 2)
80 1.3 thorpej #define SEG_G (1 << 1)
81 1.3 thorpej #define SEG_DP (1 << 0)
82 1.1 thorpej
83 1.2 thorpej static const uint8_t digitmap[] = {
84 1.1 thorpej /* +#####+
85 1.1 thorpej * # #
86 1.1 thorpej * # #
87 1.1 thorpej * # #
88 1.1 thorpej * +-----+
89 1.1 thorpej * # #
90 1.1 thorpej * # #
91 1.1 thorpej * # #
92 1.1 thorpej * +#####+
93 1.1 thorpej */
94 1.1 thorpej SEG_G,
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 * | #
102 1.1 thorpej * | #
103 1.1 thorpej * | #
104 1.1 thorpej * +-----+
105 1.1 thorpej */
106 1.1 thorpej SEG_A|SEG_D|SEG_E|SEG_F|SEG_G,
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 * # |
114 1.1 thorpej * # |
115 1.1 thorpej * # |
116 1.1 thorpej * +#####+
117 1.1 thorpej */
118 1.1 thorpej SEG_C|SEG_F,
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 * | #
126 1.1 thorpej * | #
127 1.1 thorpej * | #
128 1.1 thorpej * +#####+
129 1.1 thorpej */
130 1.1 thorpej SEG_E|SEG_F,
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 * | #
138 1.1 thorpej * | #
139 1.1 thorpej * | #
140 1.1 thorpej * +-----+
141 1.1 thorpej */
142 1.1 thorpej SEG_A|SEG_D|SEG_E,
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 * | #
150 1.1 thorpej * | #
151 1.1 thorpej * | #
152 1.1 thorpej * +#####+
153 1.1 thorpej */
154 1.1 thorpej SEG_B|SEG_E,
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 * # #
162 1.1 thorpej * # #
163 1.1 thorpej * # #
164 1.1 thorpej * +#####+
165 1.1 thorpej */
166 1.1 thorpej SEG_B,
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 * | #
174 1.1 thorpej * | #
175 1.1 thorpej * | #
176 1.1 thorpej * +-----+
177 1.1 thorpej */
178 1.1 thorpej SEG_D|SEG_E|SEG_F,
179 1.1 thorpej
180 1.1 thorpej /* +#####+
181 1.1 thorpej * # #
182 1.1 thorpej * # #
183 1.1 thorpej * # #
184 1.1 thorpej * +#####+
185 1.1 thorpej * # #
186 1.1 thorpej * # #
187 1.1 thorpej * # #
188 1.1 thorpej * +#####+
189 1.1 thorpej */
190 1.1 thorpej 0,
191 1.1 thorpej
192 1.1 thorpej /* +#####+
193 1.1 thorpej * # #
194 1.1 thorpej * # #
195 1.1 thorpej * # #
196 1.1 thorpej * +#####+
197 1.1 thorpej * | #
198 1.1 thorpej * | #
199 1.1 thorpej * | #
200 1.1 thorpej * +-----+
201 1.1 thorpej */
202 1.1 thorpej SEG_D|SEG_E,
203 1.1 thorpej };
204 1.1 thorpej
205 1.2 thorpej static uint8_t
206 1.2 thorpej iq80321_7seg_xlate(char c)
207 1.2 thorpej {
208 1.2 thorpej uint8_t rv;
209 1.2 thorpej
210 1.2 thorpej if (c >= '0' && c <= '9')
211 1.2 thorpej rv = digitmap[c - '0'];
212 1.2 thorpej else if (c == '.')
213 1.2 thorpej rv = ~SEG_DP;
214 1.2 thorpej else
215 1.2 thorpej rv = 0xff;
216 1.2 thorpej
217 1.2 thorpej return (rv);
218 1.2 thorpej }
219 1.2 thorpej
220 1.1 thorpej void
221 1.1 thorpej iq80321_7seg(char a, char b)
222 1.1 thorpej {
223 1.1 thorpej uint8_t msb, lsb;
224 1.1 thorpej
225 1.2 thorpej msb = iq80321_7seg_xlate(a);
226 1.2 thorpej lsb = iq80321_7seg_xlate(b);
227 1.1 thorpej
228 1.1 thorpej snakestate = 0;
229 1.1 thorpej
230 1.1 thorpej WRITE(IQ80321_7SEG_MSB, msb);
231 1.1 thorpej WRITE(IQ80321_7SEG_LSB, lsb);
232 1.1 thorpej }
233 1.1 thorpej
234 1.1 thorpej static const uint8_t snakemap[][2] = {
235 1.1 thorpej
236 1.1 thorpej /* +#####+ +#####+
237 1.1 thorpej * | | | |
238 1.1 thorpej * | | | |
239 1.1 thorpej * | | | |
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 { ~SEG_A & 0xff, ~SEG_A & 0xff },
247 1.1 thorpej
248 1.1 thorpej /* +-----+ +-----+
249 1.1 thorpej * # | | #
250 1.1 thorpej * # | | #
251 1.1 thorpej * # | | #
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 { ~SEG_F, ~SEG_B },
259 1.1 thorpej
260 1.1 thorpej /* +-----+ +-----+
261 1.1 thorpej * | | | |
262 1.1 thorpej * | | | |
263 1.1 thorpej * | | | |
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 { ~SEG_G, ~SEG_G },
271 1.1 thorpej
272 1.1 thorpej /* +-----+ +-----+
273 1.1 thorpej * | | | |
274 1.1 thorpej * | | | |
275 1.1 thorpej * | | | |
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 { ~SEG_C, ~SEG_E },
283 1.1 thorpej
284 1.1 thorpej /* +-----+ +-----+
285 1.1 thorpej * | | | |
286 1.1 thorpej * | | | |
287 1.1 thorpej * | | | |
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 { ~SEG_D, ~SEG_D },
295 1.1 thorpej
296 1.1 thorpej /* +-----+ +-----+
297 1.1 thorpej * | | | |
298 1.1 thorpej * | | | |
299 1.1 thorpej * | | | |
300 1.1 thorpej * +-----+ +-----+
301 1.1 thorpej * # | | #
302 1.1 thorpej * # | | #
303 1.1 thorpej * # | | #
304 1.1 thorpej * +-----+ +-----+
305 1.1 thorpej */
306 1.1 thorpej { ~SEG_E, ~SEG_C },
307 1.1 thorpej
308 1.1 thorpej /* +-----+ +-----+
309 1.1 thorpej * | | | |
310 1.1 thorpej * | | | |
311 1.1 thorpej * | | | |
312 1.1 thorpej * +#####+ +#####+
313 1.1 thorpej * | | | |
314 1.1 thorpej * | | | |
315 1.1 thorpej * | | | |
316 1.1 thorpej * +-----+ +-----+
317 1.1 thorpej */
318 1.1 thorpej { ~SEG_G, ~SEG_G },
319 1.1 thorpej
320 1.1 thorpej /* +-----+ +-----+
321 1.1 thorpej * | # # |
322 1.1 thorpej * | # # |
323 1.1 thorpej * | # # |
324 1.1 thorpej * +-----+ +-----+
325 1.1 thorpej * | | | |
326 1.1 thorpej * | | | |
327 1.1 thorpej * | | | |
328 1.1 thorpej * +-----+ +-----+
329 1.1 thorpej */
330 1.1 thorpej { ~SEG_B, ~SEG_F },
331 1.1 thorpej };
332 1.1 thorpej
333 1.1 thorpej void
334 1.1 thorpej iq80321_7seg_snake(void)
335 1.1 thorpej {
336 1.1 thorpej int cur = snakestate;
337 1.1 thorpej
338 1.1 thorpej WRITE(IQ80321_7SEG_MSB, snakemap[cur][0]);
339 1.1 thorpej WRITE(IQ80321_7SEG_LSB, snakemap[cur][1]);
340 1.1 thorpej
341 1.1 thorpej snakestate = (cur + 1) & 7;
342 1.1 thorpej }
343