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