iq80321_7seg.c revision 1.2 1 1.2 thorpej /* $NetBSD: iq80321_7seg.c,v 1.2 2002/04/12 20:50:27 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 Intel IQ80321.
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/iq80321/iq80321reg.h>
48 1.1 thorpej #include <evbarm/iq80321/iq80321var.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.2 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.2 thorpej static uint8_t
177 1.2 thorpej iq80321_7seg_xlate(char c)
178 1.2 thorpej {
179 1.2 thorpej uint8_t rv;
180 1.2 thorpej
181 1.2 thorpej if (c >= '0' && c <= '9')
182 1.2 thorpej rv = digitmap[c - '0'];
183 1.2 thorpej else if (c == '.')
184 1.2 thorpej rv = ~SEG_DP;
185 1.2 thorpej else
186 1.2 thorpej rv = 0xff;
187 1.2 thorpej
188 1.2 thorpej return (rv);
189 1.2 thorpej }
190 1.2 thorpej
191 1.1 thorpej void
192 1.1 thorpej iq80321_7seg(char a, char b)
193 1.1 thorpej {
194 1.1 thorpej uint8_t msb, lsb;
195 1.1 thorpej
196 1.2 thorpej msb = iq80321_7seg_xlate(a);
197 1.2 thorpej lsb = iq80321_7seg_xlate(b);
198 1.1 thorpej
199 1.1 thorpej snakestate = 0;
200 1.1 thorpej
201 1.1 thorpej WRITE(IQ80321_7SEG_MSB, msb);
202 1.1 thorpej WRITE(IQ80321_7SEG_LSB, lsb);
203 1.1 thorpej }
204 1.1 thorpej
205 1.1 thorpej static const uint8_t snakemap[][2] = {
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 * +-----+ +-----+
216 1.1 thorpej */
217 1.1 thorpej { ~SEG_A & 0xff, ~SEG_A & 0xff },
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 * +-----+ +-----+
228 1.1 thorpej */
229 1.1 thorpej { ~SEG_F, ~SEG_B },
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 * +-----+ +-----+
240 1.1 thorpej */
241 1.1 thorpej { ~SEG_G, ~SEG_G },
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 * +-----+ +-----+
252 1.1 thorpej */
253 1.1 thorpej { ~SEG_C, ~SEG_E },
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 * +#####+ +#####+
264 1.1 thorpej */
265 1.1 thorpej { ~SEG_D, ~SEG_D },
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 * +-----+ +-----+
276 1.1 thorpej */
277 1.1 thorpej { ~SEG_E, ~SEG_C },
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 * +-----+ +-----+
288 1.1 thorpej */
289 1.1 thorpej { ~SEG_G, ~SEG_G },
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 * +-----+ +-----+
300 1.1 thorpej */
301 1.1 thorpej { ~SEG_B, ~SEG_F },
302 1.1 thorpej };
303 1.1 thorpej
304 1.1 thorpej void
305 1.1 thorpej iq80321_7seg_snake(void)
306 1.1 thorpej {
307 1.1 thorpej int cur = snakestate;
308 1.1 thorpej
309 1.1 thorpej WRITE(IQ80321_7SEG_MSB, snakemap[cur][0]);
310 1.1 thorpej WRITE(IQ80321_7SEG_LSB, snakemap[cur][1]);
311 1.1 thorpej
312 1.1 thorpej snakestate = (cur + 1) & 7;
313 1.1 thorpej }
314