qmsk-dmx: src/timer.c@3b837eaf1b6d (annotated)

52 237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	1	#include <avr/interrupt.h>
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	2
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	3	#define TIMER_FLAGS GPIOR0
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	4	#define TIMER1_BUSY 1
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	5
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	6	/*
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	7	* Setup timers.
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	8	*/
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	9	void timer_init (void)
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	10	{
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	11	TCCR1A = (
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	12	// OC1A output pin disconnected
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	13	0b00 << COM1A0
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	14	// OC1B output pin disconnected
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	15	\| 0b00 << COM1B0
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	16	// no PWM
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	17	\| 0b00 << WGM10
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	18	);
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	19	TCCR1B = (
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	20	// CTC mode
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	21	0b01 << WGM12
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	22	);
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	23	TCCR1C = 0;
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	24	}
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	25
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	26	void timer1_start (short cycles)
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	27	{
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	28	// count up from zero...
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	29	TCNT1 = 0;
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	30
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	31	// ...to the given number of timer cycles
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	32	OCR1A = cycles;
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	33
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	34	// start!
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	35	sbi(&TIMER_FLAGS, TIMER1_BUSY);
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	36	TIMSK1 = (
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	37	// OCA interrupt
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	38	0b1 << OCIE1A // enable
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	39	);
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	40	TCCR1B = (
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	41	// WGM
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	42	0b01 << WGM12 // CTC
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	43
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	44	// clocksource
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	45	\| 0b101 << CS10 // 1024'th
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	46	);
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	47	}
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	48
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	49	static void timer1_stop ()
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	50	{
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	51	// WGM: normal
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	52	// clocksource: stop
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	53	TCCR1B = 0;
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	54
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	55	cbi(&TIMER_FLAGS, TIMER1_BUSY);
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	56	}
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	57
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	58	ISR(TIMER1_COMPA_vect)
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	59	{
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	60	timer1_stop();
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	61
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	62	// XXX: cpu will automatically wake up from sleep()
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	63	}
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	64
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	65	/*
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	66	* Sleep on timer1 interrupt.
53 dfe67409fbcd hello: interruptable timer sleep, with buffered serial IO Tero Marttila <terom@paivola.fi> parents: 52 diff changeset	67	*
dfe67409fbcd hello: interruptable timer sleep, with buffered serial IO Tero Marttila <terom@paivola.fi> parents: 52 diff changeset	68	* Returns 0 on interrupt, 1 on timeout.
52 237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	69	*/
53 dfe67409fbcd hello: interruptable timer sleep, with buffered serial IO Tero Marttila <terom@paivola.fi> parents: 52 diff changeset	70	char timer_sleep (int cycles)
52 237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	71	{
54 ec42f36d8614 hello: interactive console Tero Marttila <terom@paivola.fi> parents: 53 diff changeset	72	if (cycles) {
ec42f36d8614 hello: interactive console Tero Marttila <terom@paivola.fi> parents: 53 diff changeset	73	// set timer
ec42f36d8614 hello: interactive console Tero Marttila <terom@paivola.fi> parents: 53 diff changeset	74	timer1_start(cycles);
ec42f36d8614 hello: interactive console Tero Marttila <terom@paivola.fi> parents: 53 diff changeset	75	}
52 237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	76
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	77	// sleep
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	78	// TODO: PRR
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	79	SMCR = (
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	80	// idle sleep
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	81	(0b00 << SM0)
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	82
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	83	// enable sleep
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	84	\| (0b1 << SE)
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	85	);
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	86
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	87	// sleep
53 dfe67409fbcd hello: interruptable timer sleep, with buffered serial IO Tero Marttila <terom@paivola.fi> parents: 52 diff changeset	88	__asm__ ( "sleep" :: );
52 237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	89
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	90	// cleanup
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	91	SMCR = 0;
53 dfe67409fbcd hello: interruptable timer sleep, with buffered serial IO Tero Marttila <terom@paivola.fi> parents: 52 diff changeset	92
54 ec42f36d8614 hello: interactive console Tero Marttila <terom@paivola.fi> parents: 53 diff changeset	93	if (cycles && !tbi(&TIMER_FLAGS, TIMER1_BUSY)) {
ec42f36d8614 hello: interactive console Tero Marttila <terom@paivola.fi> parents: 53 diff changeset	94	// timeout
ec42f36d8614 hello: interactive console Tero Marttila <terom@paivola.fi> parents: 53 diff changeset	95	return 1;
ec42f36d8614 hello: interactive console Tero Marttila <terom@paivola.fi> parents: 53 diff changeset	96	} else {
53 dfe67409fbcd hello: interruptable timer sleep, with buffered serial IO Tero Marttila <terom@paivola.fi> parents: 52 diff changeset	97	timer1_stop();
dfe67409fbcd hello: interruptable timer sleep, with buffered serial IO Tero Marttila <terom@paivola.fi> parents: 52 diff changeset	98
dfe67409fbcd hello: interruptable timer sleep, with buffered serial IO Tero Marttila <terom@paivola.fi> parents: 52 diff changeset	99	// interrupt
dfe67409fbcd hello: interruptable timer sleep, with buffered serial IO Tero Marttila <terom@paivola.fi> parents: 52 diff changeset	100	return 0;
dfe67409fbcd hello: interruptable timer sleep, with buffered serial IO Tero Marttila <terom@paivola.fi> parents: 52 diff changeset	101	}
52 237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	102	}
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	103
237d1f5c1c32 hello: split out timer; add serial Tero Marttila <terom@paivola.fi> parents: diff changeset	104

author	Tero Marttila <terom@paivola.fi>
	Fri, 04 Apr 2014 01:04:41 +0300
changeset 56	3b837eaf1b6d
parent 54	ec42f36d8614
child 63	e9b478c817df
permissions	-rw-r--r--