File: rtlsetfp_test.c

package info (click to toggle)
rtlinux 3.1pre3-2
  • links: PTS
  • area: non-free
  • in suites: sarge, woody
  • size: 4,892 kB
  • ctags: 4,228
  • sloc: ansic: 26,204; sh: 2,069; makefile: 1,414; perl: 855; tcl: 489; asm: 380; cpp: 42
file content (58 lines) | stat: -rw-r--r-- 1,349 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
/*
 * (C) Finite State Machine Labs Inc. 2000 business@fsmlabs.com
 *
 * Released under the terms of GPL 2.
 * Open RTLinux makes use of a patented process described in
 * US Patent 5,995,745. Use of this process is governed
 * by the Open RTLinux Patent License which can be obtained from
 * www.fsmlabs.com/PATENT or by sending email to
 * licensequestions@fsmlabs.com
 */

#include <stdio.h>
#include <errno.h>
#include <string.h>
#include <rtlinux_signal.h>

float marker = 0;
volatile float *marker_ptr = &marker;

void handler(int unused)
{
	*marker_ptr = .5;
	*marker_ptr += .25;
}

int main(void)
{
	struct rtlinux_sigaction sig, oldsig;
	rtlinux_sigset_t myset, oldset;

	/* setup for a test of floating point */
	sig.sa_handler = handler;
	sig.sa_flags = RTLINUX_SA_ONESHOT;
	sig.sa_period = NSECS_PER_SEC / 4;

	/* install our handler for oneshot */
	if (rtlinux_sigaction(RTLINUX_SIGTIMER0, &sig, &oldsig)) {
		perror("rtlinux_sigaction");
		return errno;
	}

	/* wait for the _handler_ to go off plus a bit extra in case
	 * oneshot is messing up and becoming periodic
	 */
	sleep(2);

	if (marker != (0.75))
		fprintf(stderr, "marker is %f\n", marker);

	/* free the timer */
	sig.sa_handler = RTLINUX_SIG_IGN;
	if (rtlinux_sigaction(RTLINUX_SIGTIMER0, &sig, &oldsig)) {
		perror("rtlinux_sigaction");
		return errno;
	}

	return 0;
}