iq80310_7seg.c revision 1.7 1 1.7 thorpej /* $NetBSD: iq80310_7seg.c,v 1.7 2003/05/14 19:46:40 thorpej Exp $ */
2 1.1 thorpej
3 1.1 thorpej /*
4 1.6 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 IQ80310.
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/iq80310/iq80310reg.h>
48 1.5 thorpej #include <evbarm/iq80310/iq80310var.h>
49 1.1 thorpej #include <evbarm/iq80310/obiovar.h>
50 1.1 thorpej
51 1.3 thorpej static int snakestate;
52 1.7 thorpej
53 1.7 thorpej /*
54 1.7 thorpej * The 7-segment display looks like so:
55 1.7 thorpej *
56 1.7 thorpej * A
57 1.7 thorpej * +-----+
58 1.7 thorpej * | |
59 1.7 thorpej * F | | B
60 1.7 thorpej * | G |
61 1.7 thorpej * +-----+
62 1.7 thorpej * | |
63 1.7 thorpej * E | | C
64 1.7 thorpej * | D |
65 1.7 thorpej * +-----+ o DP
66 1.7 thorpej *
67 1.7 thorpej * Setting a bit clears the corresponding segment on the
68 1.7 thorpej * display.
69 1.7 thorpej */
70 1.7 thorpej #define SEG_A (1 << 0)
71 1.7 thorpej #define SEG_B (1 << 1)
72 1.7 thorpej #define SEG_C (1 << 2)
73 1.7 thorpej #define SEG_D (1 << 3)
74 1.7 thorpej #define SEG_E (1 << 4)
75 1.7 thorpej #define SEG_F (1 << 5)
76 1.7 thorpej #define SEG_G (1 << 6)
77 1.7 thorpej #define SEG_DP (1 << 7)
78 1.3 thorpej
79 1.6 thorpej static const uint8_t digitmap[] = {
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 */
90 1.1 thorpej SEG_G,
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 */
102 1.1 thorpej SEG_A|SEG_D|SEG_E|SEG_F|SEG_G,
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 */
114 1.1 thorpej SEG_C|SEG_F,
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 */
126 1.1 thorpej SEG_E|SEG_F,
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 */
138 1.1 thorpej SEG_A|SEG_D|SEG_E,
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 */
150 1.1 thorpej SEG_B|SEG_E,
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 */
162 1.1 thorpej SEG_B,
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 */
174 1.1 thorpej SEG_D|SEG_E|SEG_F,
175 1.1 thorpej
176 1.1 thorpej /* +#####+
177 1.1 thorpej * # #
178 1.1 thorpej * # #
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 0,
187 1.1 thorpej
188 1.1 thorpej /* +#####+
189 1.1 thorpej * # #
190 1.1 thorpej * # #
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 SEG_D|SEG_E,
199 1.1 thorpej };
200 1.1 thorpej
201 1.6 thorpej static uint8_t
202 1.6 thorpej iq80310_7seg_xlate(char c)
203 1.6 thorpej {
204 1.6 thorpej uint8_t rv;
205 1.6 thorpej
206 1.6 thorpej if (c >= '0' && c <= '9')
207 1.6 thorpej rv = digitmap[c - '0'];
208 1.6 thorpej else if (c == '.')
209 1.6 thorpej rv = (uint8_t) ~SEG_DP;
210 1.6 thorpej else
211 1.6 thorpej rv = 0xff;
212 1.6 thorpej
213 1.6 thorpej return (rv);
214 1.6 thorpej }
215 1.6 thorpej
216 1.1 thorpej void
217 1.1 thorpej iq80310_7seg(char a, char b)
218 1.1 thorpej {
219 1.1 thorpej uint8_t msb, lsb;
220 1.1 thorpej
221 1.6 thorpej msb = iq80310_7seg_xlate(a);
222 1.6 thorpej lsb = iq80310_7seg_xlate(b);
223 1.1 thorpej
224 1.3 thorpej snakestate = 0;
225 1.3 thorpej
226 1.2 thorpej CPLD_WRITE(IQ80310_7SEG_MSB, msb);
227 1.2 thorpej CPLD_WRITE(IQ80310_7SEG_LSB, lsb);
228 1.3 thorpej }
229 1.3 thorpej
230 1.3 thorpej static const uint8_t snakemap[][2] = {
231 1.3 thorpej
232 1.3 thorpej /* +#####+ +#####+
233 1.3 thorpej * | | | |
234 1.3 thorpej * | | | |
235 1.3 thorpej * | | | |
236 1.3 thorpej * +-----+ +-----+
237 1.3 thorpej * | | | |
238 1.3 thorpej * | | | |
239 1.3 thorpej * | | | |
240 1.3 thorpej * +-----+ +-----+
241 1.3 thorpej */
242 1.3 thorpej { ~SEG_A, ~SEG_A },
243 1.3 thorpej
244 1.3 thorpej /* +-----+ +-----+
245 1.3 thorpej * # | | #
246 1.3 thorpej * # | | #
247 1.3 thorpej * # | | #
248 1.3 thorpej * +-----+ +-----+
249 1.3 thorpej * | | | |
250 1.3 thorpej * | | | |
251 1.3 thorpej * | | | |
252 1.3 thorpej * +-----+ +-----+
253 1.3 thorpej */
254 1.3 thorpej { ~SEG_F, ~SEG_B },
255 1.3 thorpej
256 1.3 thorpej /* +-----+ +-----+
257 1.3 thorpej * | | | |
258 1.3 thorpej * | | | |
259 1.3 thorpej * | | | |
260 1.4 thorpej * +#####+ +#####+
261 1.4 thorpej * | | | |
262 1.4 thorpej * | | | |
263 1.4 thorpej * | | | |
264 1.3 thorpej * +-----+ +-----+
265 1.4 thorpej */
266 1.4 thorpej { ~SEG_G, ~SEG_G },
267 1.4 thorpej
268 1.4 thorpej /* +-----+ +-----+
269 1.4 thorpej * | | | |
270 1.4 thorpej * | | | |
271 1.4 thorpej * | | | |
272 1.4 thorpej * +-----+ +-----+
273 1.4 thorpej * | # # |
274 1.4 thorpej * | # # |
275 1.4 thorpej * | # # |
276 1.3 thorpej * +-----+ +-----+
277 1.3 thorpej */
278 1.4 thorpej { ~SEG_C, ~SEG_E },
279 1.3 thorpej
280 1.3 thorpej /* +-----+ +-----+
281 1.3 thorpej * | | | |
282 1.3 thorpej * | | | |
283 1.3 thorpej * | | | |
284 1.3 thorpej * +-----+ +-----+
285 1.3 thorpej * | | | |
286 1.3 thorpej * | | | |
287 1.3 thorpej * | | | |
288 1.3 thorpej * +#####+ +#####+
289 1.3 thorpej */
290 1.3 thorpej { ~SEG_D, ~SEG_D },
291 1.3 thorpej
292 1.3 thorpej /* +-----+ +-----+
293 1.3 thorpej * | | | |
294 1.3 thorpej * | | | |
295 1.3 thorpej * | | | |
296 1.3 thorpej * +-----+ +-----+
297 1.4 thorpej * # | | #
298 1.4 thorpej * # | | #
299 1.4 thorpej * # | | #
300 1.4 thorpej * +-----+ +-----+
301 1.4 thorpej */
302 1.4 thorpej { ~SEG_E, ~SEG_C },
303 1.4 thorpej
304 1.4 thorpej /* +-----+ +-----+
305 1.4 thorpej * | | | |
306 1.4 thorpej * | | | |
307 1.4 thorpej * | | | |
308 1.4 thorpej * +#####+ +#####+
309 1.4 thorpej * | | | |
310 1.4 thorpej * | | | |
311 1.4 thorpej * | | | |
312 1.3 thorpej * +-----+ +-----+
313 1.3 thorpej */
314 1.4 thorpej { ~SEG_G, ~SEG_G },
315 1.3 thorpej
316 1.3 thorpej /* +-----+ +-----+
317 1.3 thorpej * | # # |
318 1.3 thorpej * | # # |
319 1.3 thorpej * | # # |
320 1.3 thorpej * +-----+ +-----+
321 1.3 thorpej * | | | |
322 1.3 thorpej * | | | |
323 1.3 thorpej * | | | |
324 1.3 thorpej * +-----+ +-----+
325 1.3 thorpej */
326 1.3 thorpej { ~SEG_B, ~SEG_F },
327 1.3 thorpej };
328 1.3 thorpej
329 1.3 thorpej void
330 1.3 thorpej iq80310_7seg_snake(void)
331 1.3 thorpej {
332 1.3 thorpej int cur = snakestate;
333 1.3 thorpej
334 1.3 thorpej CPLD_WRITE(IQ80310_7SEG_MSB, snakemap[cur][0]);
335 1.3 thorpej CPLD_WRITE(IQ80310_7SEG_LSB, snakemap[cur][1]);
336 1.3 thorpej
337 1.4 thorpej snakestate = (cur + 1) & 7;
338 1.1 thorpej }
339