source: rtems/c/src/tests/sptests/sp29/init.c @ bfded728

4.104.114.84.95
Last change on this file since bfded728 was bfded728, checked in by Joel Sherrill <joel.sherrill@…>, on Jan 4, 2000 at 2:16:00 PM

Fixed warnings.

  • Property mode set to 100644
File size: 5.7 KB
Line 
1/*
2 *  Test for rtems_semaphore_flush
3 *
4 *  $Id$
5 */
6
7#include <bsp.h>
8
9rtems_task Init (rtems_task_argument argument);
10
11#define CONFIGURE_RTEMS_INIT_TASKS_TABLE
12
13#define CONFIGURE_TEST_NEEDS_CONSOLE_DRIVER
14#define CONFIGURE_TEST_NEEDS_CLOCK_DRIVER
15
16#define CONFIGURE_INIT
17
18#include <confdefs.h>
19
20#include <rtems/error.h>
21#include <stdio.h>
22
23rtems_interval ticksPerSecond;
24
25rtems_task
26subtask (rtems_task_argument arg)
27{
28        rtems_status_code sc;
29        rtems_id sem = (rtems_id)arg;
30
31        for (;;) {
32                rtems_task_wake_after (ticksPerSecond * 2);
33
34                sc = rtems_semaphore_release (sem);
35                if (sc != RTEMS_SUCCESSFUL)
36                        printf ("%d: Can't release semaphore: %s\n", __LINE__, rtems_status_text (sc));
37        }
38}
39
40void
41startTask (rtems_id arg)
42{
43        rtems_id tid;
44        rtems_status_code sc;
45
46        sc = rtems_task_create (rtems_build_name ('S', 'R', 'V', 'A'),
47                100,
48                10000,
49                RTEMS_PREEMPT|RTEMS_NO_TIMESLICE|RTEMS_NO_ASR|RTEMS_INTERRUPT_LEVEL(0),
50                RTEMS_NO_FLOATING_POINT|RTEMS_LOCAL,
51                &tid);
52        if (sc != RTEMS_SUCCESSFUL) {
53                printf ("Can't create task: %s\n", rtems_status_text (sc));
54                rtems_task_suspend (RTEMS_SELF);
55        }
56        sc = rtems_task_start (tid, subtask, arg);
57        if (sc != RTEMS_SUCCESSFUL) {
58                printf ("Can't start task: %s\n", rtems_status_text (sc));
59                rtems_task_suspend (RTEMS_SELF);
60        }
61}
62
63rtems_task Init (rtems_task_argument ignored)
64{
65        int i;
66        rtems_id semrec, semnorec;
67        rtems_status_code sc;
68        rtems_interval then, now;
69
70        sc = rtems_clock_get (RTEMS_CLOCK_GET_TICKS_PER_SECOND, &ticksPerSecond);
71        if (sc != RTEMS_SUCCESSFUL) {
72                printf ("Can't get ticks per second: %s\n", rtems_status_text (sc));
73                exit (1);
74        }
75        sc = rtems_semaphore_create (rtems_build_name ('S', 'M', 'r', 'c'),
76                1,
77                RTEMS_PRIORITY|RTEMS_BINARY_SEMAPHORE|RTEMS_INHERIT_PRIORITY |RTEMS_NO_PRIORITY_CEILING|RTEMS_LOCAL,
78                0,
79                &semrec);
80        if (sc != RTEMS_SUCCESSFUL) {
81                printf ("%d: Can't create recursive-lock semaphore: %s\n", __LINE__, rtems_status_text (sc));
82                exit (1);
83        }
84        sc = rtems_semaphore_create (rtems_build_name ('S', 'M', 'n', 'c'),
85                1,
86                RTEMS_PRIORITY|RTEMS_BINARY_SEMAPHORE|RTEMS_NO_NESTING_ALLOWED|RTEMS_INHERIT_PRIORITY |RTEMS_NO_PRIORITY_CEILING|RTEMS_LOCAL,
87                0,
88                &semnorec);
89        if (sc != RTEMS_SUCCESSFUL) {
90                printf ("%d: Can't create non-recursive-lock semaphore: %s\n", __LINE__, rtems_status_text (sc));
91                exit (1);
92        }
93
94        sc = rtems_semaphore_obtain (semrec, RTEMS_NO_WAIT, 0);
95        if (sc != RTEMS_SUCCESSFUL) {
96                printf ("%d: Can't obtain recursive-lock semaphore: %s\n", __LINE__, rtems_status_text (sc));
97        }
98        sc = rtems_semaphore_obtain (semrec, RTEMS_NO_WAIT, 0);
99        if (sc != RTEMS_SUCCESSFUL) {
100                printf ("%d: Can't reobtain recursive-lock semaphore: %s\n", __LINE__, rtems_status_text (sc));
101        }
102
103        sc = rtems_semaphore_obtain (semnorec, RTEMS_NO_WAIT, 0);
104        if (sc != RTEMS_SUCCESSFUL) {
105                printf ("%d: Can't obtain non-recursive-lock semaphore: %s\n", __LINE__, rtems_status_text (sc));
106        }
107        sc = rtems_semaphore_obtain (semnorec, RTEMS_NO_WAIT, 0);
108        if (sc == RTEMS_SUCCESSFUL) {
109                printf ("%d: Reobtain non-recursive-lock semaphore -- and should not have.\n", __LINE__);
110        }
111
112        sc = rtems_semaphore_release (semnorec);
113        if (sc != RTEMS_SUCCESSFUL) {
114                printf ("%d: Can't release non-recursive-lock semaphore: %s\n", __LINE__, rtems_status_text (sc));
115        }
116        sc = rtems_semaphore_release (semnorec);
117        if (sc != RTEMS_SUCCESSFUL) {
118                printf ("%d: Can't rerelease non-recursive-lock semaphore: %s\n", __LINE__, rtems_status_text (sc));
119        }
120        sc = rtems_semaphore_obtain (semnorec, RTEMS_NO_WAIT, 0);
121        if (sc != RTEMS_SUCCESSFUL) {
122                printf ("%d: Can't obtain non-recursive-lock semaphore: %s\n", __LINE__, rtems_status_text (sc));
123        }
124        sc = rtems_semaphore_obtain (semnorec, RTEMS_NO_WAIT, 0);
125        if (sc == RTEMS_SUCCESSFUL) {
126                printf ("%d: Reobtain non-recursive-lock semaphore -- and should not have.\n", __LINE__);
127        }
128        else if (sc != RTEMS_UNSATISFIED) {
129                printf ("%d: Reobtain non-recursive-lock semaphore failed, but error is %d (%s), not RTEMS_UNSATISFIED.\n", __LINE__, sc, rtems_status_text (sc));
130        }
131
132        sc = rtems_semaphore_release (semnorec);
133        if (sc != RTEMS_SUCCESSFUL) {
134                printf ("%d: Can't release non-recursive-lock semaphore: %s\n", __LINE__, rtems_status_text (sc));
135        }
136        sc = rtems_semaphore_release (semnorec);
137        if (sc != RTEMS_SUCCESSFUL) {
138                printf ("%d: Can't rerelease non-recursive-lock semaphore: %s\n", __LINE__, rtems_status_text (sc));
139        }
140        sc = rtems_semaphore_obtain (semnorec, RTEMS_NO_WAIT, 0);
141        if (sc != RTEMS_SUCCESSFUL) {
142                printf ("%d: Can't obtain non-recursive-lock semaphore: %s\n", __LINE__, rtems_status_text (sc));
143        }
144        /*
145         *  Since this task is holding this, there is no reason to block.
146         *  It is obviously an error to reobtain it.
147         */
148        rtems_clock_get (RTEMS_CLOCK_GET_TICKS_SINCE_BOOT, &then);
149        sc = rtems_semaphore_obtain (semnorec, RTEMS_WAIT, 5);
150        rtems_clock_get (RTEMS_CLOCK_GET_TICKS_SINCE_BOOT, &now);
151        if (sc == RTEMS_SUCCESSFUL) {
152                printf ("%d: Reobtain non-recursive-lock semaphore -- and should not have.\n", __LINE__);
153        }
154        else if (sc != RTEMS_UNSATISFIED) {
155                printf ("%d: Reobtain non-recursive-lock semaphore failed, but error is %d (%s), not RTEMS_UNSATISFIED.\n", __LINE__, sc, rtems_status_text (sc));
156        }
157        if ((then - now) < 4)
158                printf ("%d: Reobtain non-recursive-lock semaphore failed without timeout.\n", __LINE__);
159
160        startTask (semnorec);
161        rtems_clock_get (RTEMS_CLOCK_GET_TICKS_SINCE_BOOT, &then);
162        for (i = 0 ; i < 5 ; i++) {
163                int diff;
164
165                sc = rtems_semaphore_obtain (semnorec, RTEMS_WAIT, RTEMS_NO_TIMEOUT);
166                rtems_clock_get (RTEMS_CLOCK_GET_TICKS_SINCE_BOOT, &now);
167                diff = now - then;
168                then = now;
169                if (sc != RTEMS_SUCCESSFUL)
170                        printf ("%d: Failed to obtain non-recursive-lock semaphore: %s\n", __LINE__, rtems_status_text (sc));
171                else if (diff < (2 * ticksPerSecond + 1))
172                        printf ("%d: Obtained obtain non-recursive-lock semaphore too quickly -- %d ticks\n", __LINE__, diff);
173        }
174               
175        exit (0);
176}
Note: See TracBrowser for help on using the repository browser.