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