author | Tero Marttila <terom@paivola.fi> |
Fri, 04 Apr 2014 01:04:41 +0300 | |
changeset 56 | 3b837eaf1b6d |
parent 55 | 04c625712e35 |
child 57 | ee412c5be8b1 |
permissions | -rw-r--r-- |
47
7f930a94ee1e
bravely step into the modern world of C-programming, using avr-gcc for a hello world...
Tero Marttila <terom@paivola.fi>
parents:
diff
changeset
|
1 |
#include <avr/io.h> |
49 | 2 |
|
52
237d1f5c1c32
hello: split out timer; add serial
Tero Marttila <terom@paivola.fi>
parents:
50
diff
changeset
|
3 |
#include "stdlib.h" |
237d1f5c1c32
hello: split out timer; add serial
Tero Marttila <terom@paivola.fi>
parents:
50
diff
changeset
|
4 |
#include "timer.c" // XXX |
237d1f5c1c32
hello: split out timer; add serial
Tero Marttila <terom@paivola.fi>
parents:
50
diff
changeset
|
5 |
#include "serial.c" // XXX |
55 | 6 |
#include "spi.c" // XXX |
47
7f930a94ee1e
bravely step into the modern world of C-programming, using avr-gcc for a hello world...
Tero Marttila <terom@paivola.fi>
parents:
diff
changeset
|
7 |
|
54 | 8 |
static enum state { |
9 |
START = '\n', |
|
10 |
CMD_SET = 's', |
|
11 |
ARG_CHAR = '0', |
|
12 |
ERROR = '!', |
|
13 |
} state = START, cmd = 0; |
|
14 |
||
15 |
static enum { |
|
16 |
CMD_LED_1 = 0, |
|
17 |
} cmd_led = 0; |
|
18 |
||
19 |
static char arg_char; |
|
20 |
||
21 |
static unsigned char led_state = 0; |
|
22 |
||
23 |
int command (enum state cmd) |
|
24 |
{ |
|
25 |
switch (cmd) { |
|
26 |
case CMD_SET: |
|
27 |
led_state = arg_char; |
|
28 |
||
29 |
return 0; |
|
30 |
||
31 |
default: |
|
32 |
return 1; |
|
33 |
} |
|
34 |
} |
|
35 |
||
36 |
char input (char c) |
|
37 |
{ |
|
38 |
if (c == '\r') { |
|
39 |
char ret = '?'; |
|
40 |
||
41 |
// command state |
|
42 |
switch (state) { |
|
43 |
case START: |
|
44 |
cmd = 0; |
|
45 |
break; |
|
46 |
||
47 |
case CMD_SET: |
|
48 |
break; |
|
49 |
||
50 |
case ARG_CHAR: |
|
51 |
break; |
|
52 |
||
53 |
case ERROR: |
|
54 |
cmd = 0; |
|
55 |
break; |
|
56 |
} |
|
57 |
||
58 |
// command |
|
59 |
if (!cmd) { |
|
60 |
ret = ' '; |
|
61 |
} else if (command(cmd)) { |
|
62 |
ret = '!'; |
|
63 |
} else { |
|
64 |
ret = '\n'; |
|
65 |
} |
|
66 |
||
67 |
// return to START with response |
|
68 |
state = START; |
|
69 |
return ret; |
|
70 |
||
71 |
} else if (31 < c && c < 128) { |
|
72 |
// process input char |
|
73 |
switch (state) { |
|
74 |
case START: |
|
75 |
if (c == 's') { |
|
76 |
cmd = CMD_SET; |
|
77 |
state = ARG_CHAR; |
|
78 |
arg_char = 0; |
|
79 |
return state; |
|
80 |
||
81 |
} else if (c == 'S') { |
|
82 |
cmd = state = CMD_SET; |
|
83 |
arg_char = 255; |
|
84 |
return state; |
|
85 |
} |
|
86 |
break; |
|
87 |
||
88 |
/* |
|
89 |
case CMD_SET: |
|
90 |
if (c == '1') { |
|
91 |
cmd_led = CMD_LED_1; |
|
92 |
state = ARG_CHAR; |
|
93 |
arg_char = 0; |
|
94 |
} else { |
|
95 |
state = ERROR; |
|
96 |
} |
|
97 |
||
98 |
break; |
|
99 |
*/ |
|
100 |
case ARG_CHAR: |
|
101 |
if (c >= '0' && c <= '9') { |
|
102 |
arg_char *= 10; |
|
103 |
arg_char += (c - '0'); |
|
104 |
||
105 |
return c; |
|
106 |
} |
|
107 |
break; |
|
108 |
} |
|
109 |
||
110 |
// reject |
|
111 |
state = ERROR; |
|
112 |
return ERROR; |
|
113 |
||
114 |
} else { |
|
115 |
// ignore |
|
116 |
return ' '; |
|
117 |
} |
|
118 |
} |
|
119 |
||
55 | 120 |
#define LED7_DDR DDRB |
121 |
#define LED7_PORT PORTB |
|
122 |
#define LED7_OE PORTB1 |
|
123 |
||
124 |
// common anode? |
|
56
3b837eaf1b6d
hello: expand to two led7seg displays
Tero Marttila <terom@paivola.fi>
parents:
55
diff
changeset
|
125 |
#define LED7_ANODE 0 |
3b837eaf1b6d
hello: expand to two led7seg displays
Tero Marttila <terom@paivola.fi>
parents:
55
diff
changeset
|
126 |
|
3b837eaf1b6d
hello: expand to two led7seg displays
Tero Marttila <terom@paivola.fi>
parents:
55
diff
changeset
|
127 |
#define LED7_OFFSET 0 |
3b837eaf1b6d
hello: expand to two led7seg displays
Tero Marttila <terom@paivola.fi>
parents:
55
diff
changeset
|
128 |
#define LED7_COUNT 2 |
55 | 129 |
|
130 |
static const uint8_t LED7SEG_FONT[] = { |
|
131 |
0b00111111, // 0 |
|
132 |
0b00000110, // 1 |
|
133 |
0b01011011, // 2 |
|
134 |
0b01001111, // 3 |
|
135 |
0b01100110, // 4 |
|
136 |
0b01101101, // 5 |
|
137 |
0b01111101, // 6 |
|
138 |
0b00000111, // 7 |
|
139 |
0b01111111, // 8 |
|
140 |
0b01100111, // 9 |
|
141 |
0b01110111, // A |
|
142 |
0b01111100, // B |
|
143 |
0b00111001, // C |
|
144 |
0b01011110, // D |
|
145 |
0b01111001, // E |
|
146 |
0b01110001, // F |
|
147 |
}; |
|
148 |
||
149 |
enum { |
|
150 |
LED7SEG_DOT = 0b10000000, |
|
151 |
}; |
|
152 |
||
153 |
void led7_init (void) |
|
154 |
{ |
|
155 |
sbi(&LED7_PORT, LED7_OE); // disabled (low) |
|
156 |
sbi(&LED7_DDR, LED7_OE); // out |
|
157 |
} |
|
158 |
||
159 |
/* |
|
160 |
* Update external IO. |
|
161 |
*/ |
|
56
3b837eaf1b6d
hello: expand to two led7seg displays
Tero Marttila <terom@paivola.fi>
parents:
55
diff
changeset
|
162 |
void led7_update_raw (uint8_t *led7, char count) |
55 | 163 |
{ |
56
3b837eaf1b6d
hello: expand to two led7seg displays
Tero Marttila <terom@paivola.fi>
parents:
55
diff
changeset
|
164 |
int i; |
3b837eaf1b6d
hello: expand to two led7seg displays
Tero Marttila <terom@paivola.fi>
parents:
55
diff
changeset
|
165 |
|
3b837eaf1b6d
hello: expand to two led7seg displays
Tero Marttila <terom@paivola.fi>
parents:
55
diff
changeset
|
166 |
for (i = 0; i < count; i++) { |
3b837eaf1b6d
hello: expand to two led7seg displays
Tero Marttila <terom@paivola.fi>
parents:
55
diff
changeset
|
167 |
char raw = LED7SEG_FONT[led7[i]]; |
3b837eaf1b6d
hello: expand to two led7seg displays
Tero Marttila <terom@paivola.fi>
parents:
55
diff
changeset
|
168 |
|
3b837eaf1b6d
hello: expand to two led7seg displays
Tero Marttila <terom@paivola.fi>
parents:
55
diff
changeset
|
169 |
spi_tx[LED7_OFFSET + i] = LED7_ANODE ? ~raw : raw; |
3b837eaf1b6d
hello: expand to two led7seg displays
Tero Marttila <terom@paivola.fi>
parents:
55
diff
changeset
|
170 |
} |
3b837eaf1b6d
hello: expand to two led7seg displays
Tero Marttila <terom@paivola.fi>
parents:
55
diff
changeset
|
171 |
} |
3b837eaf1b6d
hello: expand to two led7seg displays
Tero Marttila <terom@paivola.fi>
parents:
55
diff
changeset
|
172 |
|
3b837eaf1b6d
hello: expand to two led7seg displays
Tero Marttila <terom@paivola.fi>
parents:
55
diff
changeset
|
173 |
void led7_update_hex (unsigned char c) |
3b837eaf1b6d
hello: expand to two led7seg displays
Tero Marttila <terom@paivola.fi>
parents:
55
diff
changeset
|
174 |
{ |
3b837eaf1b6d
hello: expand to two led7seg displays
Tero Marttila <terom@paivola.fi>
parents:
55
diff
changeset
|
175 |
uint8_t led7[2]; |
3b837eaf1b6d
hello: expand to two led7seg displays
Tero Marttila <terom@paivola.fi>
parents:
55
diff
changeset
|
176 |
|
3b837eaf1b6d
hello: expand to two led7seg displays
Tero Marttila <terom@paivola.fi>
parents:
55
diff
changeset
|
177 |
led7[0] = c >> 4; |
3b837eaf1b6d
hello: expand to two led7seg displays
Tero Marttila <terom@paivola.fi>
parents:
55
diff
changeset
|
178 |
led7[1] = c & 0xF; |
3b837eaf1b6d
hello: expand to two led7seg displays
Tero Marttila <terom@paivola.fi>
parents:
55
diff
changeset
|
179 |
|
3b837eaf1b6d
hello: expand to two led7seg displays
Tero Marttila <terom@paivola.fi>
parents:
55
diff
changeset
|
180 |
return led7_update_raw(led7, sizeof(led7)); |
3b837eaf1b6d
hello: expand to two led7seg displays
Tero Marttila <terom@paivola.fi>
parents:
55
diff
changeset
|
181 |
} |
3b837eaf1b6d
hello: expand to two led7seg displays
Tero Marttila <terom@paivola.fi>
parents:
55
diff
changeset
|
182 |
|
3b837eaf1b6d
hello: expand to two led7seg displays
Tero Marttila <terom@paivola.fi>
parents:
55
diff
changeset
|
183 |
void led7_update () |
3b837eaf1b6d
hello: expand to two led7seg displays
Tero Marttila <terom@paivola.fi>
parents:
55
diff
changeset
|
184 |
{ |
3b837eaf1b6d
hello: expand to two led7seg displays
Tero Marttila <terom@paivola.fi>
parents:
55
diff
changeset
|
185 |
static unsigned char i = 0; |
55 | 186 |
|
187 |
if (i) { |
|
188 |
// enable display |
|
189 |
cbi(&LED7_PORT, LED7_OE); |
|
190 |
} |
|
191 |
||
56
3b837eaf1b6d
hello: expand to two led7seg displays
Tero Marttila <terom@paivola.fi>
parents:
55
diff
changeset
|
192 |
led7_update_hex(led_state); |
55 | 193 |
|
194 |
i++; |
|
195 |
} |
|
196 |
||
197 |
#define DEBUG_DDR DDRB |
|
198 |
#define DEBUG_PORT PORTB |
|
199 |
#define DEBUG_LED 0 |
|
200 |
||
47
7f930a94ee1e
bravely step into the modern world of C-programming, using avr-gcc for a hello world...
Tero Marttila <terom@paivola.fi>
parents:
diff
changeset
|
201 |
int main (void) |
7f930a94ee1e
bravely step into the modern world of C-programming, using avr-gcc for a hello world...
Tero Marttila <terom@paivola.fi>
parents:
diff
changeset
|
202 |
{ |
55 | 203 |
led7_init(); |
49 | 204 |
timer_init(); |
52
237d1f5c1c32
hello: split out timer; add serial
Tero Marttila <terom@paivola.fi>
parents:
50
diff
changeset
|
205 |
serial_init(); |
55 | 206 |
spi_init(); |
49 | 207 |
|
54 | 208 |
// led_init(); |
55 | 209 |
sbi(&DEBUG_DDR, DEBUG_LED); |
49 | 210 |
|
211 |
sei(); |
|
212 |
||
54 | 213 |
// start |
214 |
char c; |
|
215 |
unsigned short timeout = 0; |
|
216 |
||
217 |
serial_write(state); |
|
47
7f930a94ee1e
bravely step into the modern world of C-programming, using avr-gcc for a hello world...
Tero Marttila <terom@paivola.fi>
parents:
diff
changeset
|
218 |
|
7f930a94ee1e
bravely step into the modern world of C-programming, using avr-gcc for a hello world...
Tero Marttila <terom@paivola.fi>
parents:
diff
changeset
|
219 |
while (true) { |
55 | 220 |
// TODO: SPI timer |
221 |
led7_update(); |
|
222 |
spi_update(); |
|
223 |
||
53
dfe67409fbcd
hello: interruptable timer sleep, with buffered serial IO
Tero Marttila <terom@paivola.fi>
parents:
52
diff
changeset
|
224 |
// toggle |
54 | 225 |
if (led_state == 0) { |
226 |
timeout = 0; |
|
55 | 227 |
cbi(&DEBUG_PORT, DEBUG_LED); |
54 | 228 |
|
229 |
} else if (led_state == 255) { |
|
230 |
timeout = 0; |
|
55 | 231 |
sbi(&DEBUG_PORT, DEBUG_LED); |
54 | 232 |
|
233 |
} else { |
|
234 |
// as Hz |
|
235 |
timeout = (16000 / led_state); |
|
55 | 236 |
xbi(&DEBUG_PORT, DEBUG_LED); |
54 | 237 |
} |
47
7f930a94ee1e
bravely step into the modern world of C-programming, using avr-gcc for a hello world...
Tero Marttila <terom@paivola.fi>
parents:
diff
changeset
|
238 |
|
53
dfe67409fbcd
hello: interruptable timer sleep, with buffered serial IO
Tero Marttila <terom@paivola.fi>
parents:
52
diff
changeset
|
239 |
// sleep |
dfe67409fbcd
hello: interruptable timer sleep, with buffered serial IO
Tero Marttila <terom@paivola.fi>
parents:
52
diff
changeset
|
240 |
if (timer_sleep(timeout)) { |
dfe67409fbcd
hello: interruptable timer sleep, with buffered serial IO
Tero Marttila <terom@paivola.fi>
parents:
52
diff
changeset
|
241 |
c = '.'; |
dfe67409fbcd
hello: interruptable timer sleep, with buffered serial IO
Tero Marttila <terom@paivola.fi>
parents:
52
diff
changeset
|
242 |
|
dfe67409fbcd
hello: interruptable timer sleep, with buffered serial IO
Tero Marttila <terom@paivola.fi>
parents:
52
diff
changeset
|
243 |
} else if ((c = serial_read())) { |
dfe67409fbcd
hello: interruptable timer sleep, with buffered serial IO
Tero Marttila <terom@paivola.fi>
parents:
52
diff
changeset
|
244 |
// got serial data |
54 | 245 |
c = input(c); |
246 |
||
53
dfe67409fbcd
hello: interruptable timer sleep, with buffered serial IO
Tero Marttila <terom@paivola.fi>
parents:
52
diff
changeset
|
247 |
} else { |
dfe67409fbcd
hello: interruptable timer sleep, with buffered serial IO
Tero Marttila <terom@paivola.fi>
parents:
52
diff
changeset
|
248 |
c = '?'; |
dfe67409fbcd
hello: interruptable timer sleep, with buffered serial IO
Tero Marttila <terom@paivola.fi>
parents:
52
diff
changeset
|
249 |
} |
49 | 250 |
|
53
dfe67409fbcd
hello: interruptable timer sleep, with buffered serial IO
Tero Marttila <terom@paivola.fi>
parents:
52
diff
changeset
|
251 |
// output... |
dfe67409fbcd
hello: interruptable timer sleep, with buffered serial IO
Tero Marttila <terom@paivola.fi>
parents:
52
diff
changeset
|
252 |
serial_write(c); |
47
7f930a94ee1e
bravely step into the modern world of C-programming, using avr-gcc for a hello world...
Tero Marttila <terom@paivola.fi>
parents:
diff
changeset
|
253 |
} |
7f930a94ee1e
bravely step into the modern world of C-programming, using avr-gcc for a hello world...
Tero Marttila <terom@paivola.fi>
parents:
diff
changeset
|
254 |
} |