annotate packages/kernel/current/tests/tm_basic.cxx @ 208:e0c0827131d1 ecos

Merge from eCos master repository on 2002-05-20-20:11:54-BST
author jlarmour
date Mon, 20 May 2002 22:19:26 +0000
parents 4c750ce71ae3
children d2c90368aeef
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1 //==========================================================================
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
2 //
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
3 // tm_basic.cxx
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
4 //
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
5 // Basic timing test / scaffolding
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
6 //
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
7 //==========================================================================
208
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 177
diff changeset
8 //####ECOSGPLCOPYRIGHTBEGIN####
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 177
diff changeset
9 // -------------------------------------------
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 177
diff changeset
10 // This file is part of eCos, the Embedded Configurable Operating System.
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 177
diff changeset
11 // Copyright (C) 1998, 1999, 2000, 2001, 2002 Red Hat, Inc.
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 177
diff changeset
12 //
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 177
diff changeset
13 // eCos is free software; you can redistribute it and/or modify it under
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 177
diff changeset
14 // the terms of the GNU General Public License as published by the Free
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 177
diff changeset
15 // Software Foundation; either version 2 or (at your option) any later version.
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 177
diff changeset
16 //
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 177
diff changeset
17 // eCos is distributed in the hope that it will be useful, but WITHOUT ANY
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 177
diff changeset
18 // WARRANTY; without even the implied warranty of MERCHANTABILITY or
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 177
diff changeset
19 // FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 177
diff changeset
20 // for more details.
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 177
diff changeset
21 //
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 177
diff changeset
22 // You should have received a copy of the GNU General Public License along
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 177
diff changeset
23 // with eCos; if not, write to the Free Software Foundation, Inc.,
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 177
diff changeset
24 // 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 177
diff changeset
25 //
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 177
diff changeset
26 // As a special exception, if other files instantiate templates or use macros
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 177
diff changeset
27 // or inline functions from this file, or you compile this file and link it
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 177
diff changeset
28 // with other works to produce a work based on this file, this file does not
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 177
diff changeset
29 // by itself cause the resulting work to be covered by the GNU General Public
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 177
diff changeset
30 // License. However the source code for this file must still be made available
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 177
diff changeset
31 // in accordance with section (3) of the GNU General Public License.
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 177
diff changeset
32 //
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 177
diff changeset
33 // This exception does not invalidate any other reasons why a work based on
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 177
diff changeset
34 // this file might be covered by the GNU General Public License.
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 177
diff changeset
35 //
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 177
diff changeset
36 // Alternative licenses for eCos may be arranged by contacting Red Hat, Inc.
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 177
diff changeset
37 // at http://sources.redhat.com/ecos/ecos-license
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 177
diff changeset
38 // -------------------------------------------
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST
jlarmour
parents: 177
diff changeset
39 //####ECOSGPLCOPYRIGHTEND####
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
40 //==========================================================================
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
41 //#####DESCRIPTIONBEGIN####
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
42 //
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
43 // Author(s): gthomas
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
44 // Contributors: gthomas
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
45 // Date: 1998-10-19
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
46 // Description: Very simple kernel timing test
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
47 //####DESCRIPTIONEND####
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
48
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
49 #include <pkgconf/kernel.h>
56
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
50 #include <pkgconf/hal.h>
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
51
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
52 #include <cyg/kernel/sched.hxx>
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
53 #include <cyg/kernel/thread.hxx>
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
54 #include <cyg/kernel/thread.inl>
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
55 #include <cyg/kernel/mutex.hxx>
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
56 #include <cyg/kernel/sema.hxx>
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
57 #include <cyg/kernel/sched.inl>
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
58 #include <cyg/kernel/clock.hxx>
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
59 #include <cyg/kernel/clock.inl>
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
60 #include <cyg/kernel/kapi.h>
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
61
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
62 #include <cyg/infra/testcase.h>
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
63
10
d3fbcdfa1b2f Merge from eCos master repository on 1999-05-29-00:13:11-BST
jlarmour
parents: 8
diff changeset
64 #include <cyg/kernel/test/stackmon.h>
56
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
65 #include CYGHWR_MEMORY_LAYOUT_H
8
ece80412419a Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents: 4
diff changeset
66
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
67 // Define this to see the statistics with the first sample datum removed.
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
68 // This can expose the effects of caches on the speed of operations.
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
69 #undef STATS_WITHOUT_FIRST_SAMPLE
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
70
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
71 #if defined(CYGFUN_KERNEL_API_C) && \
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
72 defined(CYGSEM_KERNEL_SCHED_MLQUEUE) && \
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
73 defined(CYGVAR_KERNEL_COUNTERS_CLOCK) && \
76
435cced73e2f eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST
jlarmour
parents: 66
diff changeset
74 !defined(CYGDBG_INFRA_DIAG_USE_DEVICE) && \
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
75 (CYGNUM_KERNEL_SCHED_PRIORITIES > 12)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
76
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
77 #define NTHREADS 1
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
78 #include "testaux.hxx"
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
79
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
80 // Structure used to keep track of times
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
81 typedef struct fun_times {
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
82 cyg_uint32 start;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
83 cyg_uint32 end;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
84 } fun_times;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
85
56
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
86 #define STACK_SIZE CYGNUM_HAL_STACK_SIZE_MINIMUM
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
87
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
88 #ifdef CYGMEM_REGION_ram_SIZE
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
89 #define CYG_THREAD_OVERHEAD (STACK_SIZE+sizeof(cyg_thread)+(sizeof(fun_times)*2))
66
bf00f99aec69 Merge from eCos master repository on 2000-02-02-19:16:44-GMT
jlarmour
parents: 64
diff changeset
90 #define NTEST_THREADS ((CYGMEM_REGION_ram_SIZE/16)/CYG_THREAD_OVERHEAD)
56
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
91 #define CYG_MUTEX_OVERHEAD (sizeof(cyg_mutex_t)+sizeof(fun_times))
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
92 #define NMUTEXES ((CYGMEM_REGION_ram_SIZE/16)/CYG_MUTEX_OVERHEAD)
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
93 #define CYG_MBOX_OVERHEAD (sizeof(cyg_mbox)+sizeof(fun_times))
66
bf00f99aec69 Merge from eCos master repository on 2000-02-02-19:16:44-GMT
jlarmour
parents: 64
diff changeset
94 #define NMBOXES ((CYGMEM_REGION_ram_SIZE/24)/CYG_MBOX_OVERHEAD)
56
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
95 #define CYG_SEMAPHORE_OVERHEAD (sizeof(cyg_sem_t)+sizeof(fun_times))
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
96 #define NSEMAPHORES ((CYGMEM_REGION_ram_SIZE/16)/CYG_SEMAPHORE_OVERHEAD)
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
97 #define CYG_COUNTER_OVERHEAD (sizeof(cyg_counter)+sizeof(fun_times))
66
bf00f99aec69 Merge from eCos master repository on 2000-02-02-19:16:44-GMT
jlarmour
parents: 64
diff changeset
98 #define NCOUNTERS ((CYGMEM_REGION_ram_SIZE/24)/CYG_COUNTER_OVERHEAD)
56
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
99 #define CYG_ALARM_OVERHEAD (sizeof(cyg_alarm)+sizeof(fun_times))
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
100 #define NALARMS ((CYGMEM_REGION_ram_SIZE/16)/CYG_ALARM_OVERHEAD)
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
101 #else
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
102 // Defaults
4
1d7f19c9e4d1 Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents: 2
diff changeset
103 #define NTEST_THREADS 16
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
104 #define NMUTEXES 32
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
105 #define NMBOXES 32
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
106 #define NSEMAPHORES 32
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
107 #define NCOUNTERS 32
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
108 #define NALARMS 32
56
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
109 #endif
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
110
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
111 #define NSAMPLES 32
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
112 #define NTHREAD_SWITCHES 128
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
113 #define NSCHEDS 128
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
114
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
115 #define NSAMPLES_SIM 2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
116 #define NTEST_THREADS_SIM 2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
117 #define NTHREAD_SWITCHES_SIM 4
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
118 #define NMUTEXES_SIM 2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
119 #define NMBOXES_SIM 2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
120 #define NSEMAPHORES_SIM 2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
121 #define NSCHEDS_SIM 4
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
122 #define NCOUNTERS_SIM 2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
123 #define NALARMS_SIM 2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
124
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
125 static int nsamples;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
126 static int ntest_threads;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
127 static int nthread_switches;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
128 static int nmutexes;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
129 static int nmboxes;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
130 static int nsemaphores;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
131 static int nscheds;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
132 static int ncounters;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
133 static int nalarms;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
134
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
135 static char stacks[NTEST_THREADS][STACK_SIZE];
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
136 static cyg_thread test_threads[NTEST_THREADS];
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
137 static cyg_handle_t threads[NTEST_THREADS];
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
138 static int overhead;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
139 static cyg_sem_t synchro;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
140 static fun_times thread_ft[NTEST_THREADS];
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
141
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
142 static fun_times test2_ft[NTHREAD_SWITCHES];
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
143
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
144 static cyg_mutex_t test_mutexes[NMUTEXES];
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
145 static fun_times mutex_ft[NMUTEXES];
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
146 static cyg_thread mutex_test_thread;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
147 static cyg_handle_t mutex_test_thread_handle;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
148
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
149 static cyg_mbox test_mboxes[NMBOXES];
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
150 static cyg_handle_t test_mbox_handles[NMBOXES];
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
151 static fun_times mbox_ft[NMBOXES];
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
152 static cyg_thread mbox_test_thread;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
153 static cyg_handle_t mbox_test_thread_handle;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
154
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
155 static cyg_sem_t test_semaphores[NSEMAPHORES];
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
156 static fun_times semaphore_ft[NSEMAPHORES];
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
157 static cyg_thread semaphore_test_thread;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
158 static cyg_handle_t semaphore_test_thread_handle;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
159
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
160 static fun_times sched_ft[NSCHEDS];
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
161
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
162 static cyg_counter test_counters[NCOUNTERS];
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
163 static cyg_handle_t counters[NCOUNTERS];
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
164 static fun_times counter_ft[NCOUNTERS];
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
165
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
166 static cyg_alarm test_alarms[NALARMS];
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
167 static cyg_handle_t alarms[NALARMS];
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
168 static fun_times alarm_ft[NALARMS];
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
169
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
170 static long rtc_resolution[] = CYGNUM_KERNEL_COUNTERS_RTC_RESOLUTION;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
171 static long ns_per_system_clock;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
172
34
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents: 10
diff changeset
173 #if defined(CYGVAR_KERNEL_COUNTERS_CLOCK_LATENCY)
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
174 // Data kept by kernel real time clock measuring clock interrupt latency
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
175 extern cyg_tick_count total_clock_latency, total_clock_interrupts;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
176 extern cyg_int32 min_clock_latency, max_clock_latency;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
177 extern bool measure_clock_latency;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
178 #endif
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
179
34
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents: 10
diff changeset
180 #if defined(CYGVAR_KERNEL_COUNTERS_CLOCK_DSR_LATENCY)
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents: 10
diff changeset
181 extern cyg_tick_count total_clock_dsr_latency, total_clock_dsr_calls;
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents: 10
diff changeset
182 extern cyg_int32 min_clock_dsr_latency, max_clock_dsr_latency;
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents: 10
diff changeset
183 extern bool measure_clock_latency;
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents: 10
diff changeset
184 #endif
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents: 10
diff changeset
185
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
186 externC void diag_printf(const char *, ...);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
187
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
188 void run_sched_tests(void);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
189 void run_thread_tests(void);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
190 void run_thread_switch_test(void);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
191 void run_mutex_tests(void);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
192 void run_mutex_circuit_test(void);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
193 void run_mbox_tests(void);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
194 void run_mbox_circuit_test(void);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
195 void run_semaphore_tests(void);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
196 void run_semaphore_circuit_test(void);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
197 void run_counter_tests(void);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
198 void run_alarm_tests(void);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
199
56
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
200 #ifndef max
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
201 #define max(n,m) (m > n ? n : m)
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
202 #endif
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
203
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
204 // Wait until a clock tick [real time clock] has passed. This should keep it
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
205 // from happening again during a measurement, thus minimizing any fluctuations
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
206 void
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
207 wait_for_tick(void)
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
208 {
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
209 cyg_tick_count_t tv0, tv1;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
210 tv0 = cyg_current_time();
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
211 while (true) {
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
212 tv1 = cyg_current_time();
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
213 if (tv1 != tv0) break;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
214 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
215 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
216
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
217 // Display a number of ticks as microseconds
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
218 // Note: for improved calculation significance, values are kept in ticks*1000
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
219 void
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
220 show_ticks_in_us(cyg_uint32 ticks)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
221 {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
222 long long ns;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
223 ns = (ns_per_system_clock * (long long)ticks) / CYGNUM_KERNEL_COUNTERS_RTC_PERIOD;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
224 ns += 5; // for rounding to .01us
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
225 diag_printf("%5d.%02d", (int)(ns/1000), (int)((ns%1000)/10));
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
226 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
227
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
228 //
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
229 // If the kernel is instrumented to measure clock interrupt latency, these
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
230 // measurements can be drastically perturbed by printing via "diag_printf()"
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
231 // since that code may run with interrupts disabled for long periods.
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
232 //
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
233 // In order to get accurate/reasonable latency figures _for the kernel
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
234 // primitive functions beint tested_, the kernel's latency measurements
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
235 // are suspended while the printing actually takes place.
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
236 //
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
237 // The measurements are reenabled after the printing, thus allowing for
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
238 // fair measurements of the kernel primitives, which are not distorted
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
239 // by the printing mechanisms.
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
240
34
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents: 10
diff changeset
241 #if defined(CYGVAR_KERNEL_COUNTERS_CLOCK_LATENCY) && defined(HAL_CLOCK_LATENCY)
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
242 void
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
243 disable_clock_latency_measurement(void)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
244 {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
245 wait_for_tick();
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
246 measure_clock_latency = false;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
247 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
248
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
249 void
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
250 enable_clock_latency_measurement(void)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
251 {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
252 wait_for_tick();
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
253 measure_clock_latency = true;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
254 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
255
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
256 // Ensure that the measurements are reasonable (no startup anomalies)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
257 void
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
258 reset_clock_latency_measurement(void)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
259 {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
260 disable_clock_latency_measurement();
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
261 total_clock_latency = 0;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
262 total_clock_interrupts = 0;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
263 min_clock_latency = 0x7FFFFFFF;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
264 max_clock_latency = 0;
34
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents: 10
diff changeset
265 #if defined(CYGVAR_KERNEL_COUNTERS_CLOCK_DSR_LATENCY)
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents: 10
diff changeset
266 total_clock_dsr_latency = 0;
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents: 10
diff changeset
267 total_clock_dsr_calls = 0;
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents: 10
diff changeset
268 min_clock_dsr_latency = 0x7FFFFFFF;
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents: 10
diff changeset
269 max_clock_dsr_latency = 0;
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents: 10
diff changeset
270 #endif
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
271 enable_clock_latency_measurement();
34
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents: 10
diff changeset
272
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
273 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
274 #else
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
275 #define disable_clock_latency_measurement()
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
276 #define enable_clock_latency_measurement()
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
277 #define reset_clock_latency_measurement()
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
278 #endif
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
279
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
280 void
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
281 show_times_hdr(void)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
282 {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
283 disable_clock_latency_measurement();
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
284 diag_printf("\n");
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
285 diag_printf(" Confidence\n");
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
286 diag_printf(" Ave Min Max Var Ave Min Function\n");
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
287 diag_printf(" ====== ====== ====== ====== ========== ========\n");
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
288 enable_clock_latency_measurement();
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
289 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
290
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
291 void
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
292 show_times_detail(fun_times ft[], int nsamples, char *title, bool ignore_first)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
293 {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
294 int i, delta, min, max, con_ave, con_min, ave_dev;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
295 int start_sample, total_samples;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
296 cyg_int32 total, ave;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
297
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
298 if (ignore_first) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
299 start_sample = 1;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
300 total_samples = nsamples-1;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
301 } else {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
302 start_sample = 0;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
303 total_samples = nsamples;
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
304 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
305 total = 0;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
306 min = 0x7FFFFFFF;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
307 max = 0;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
308 for (i = start_sample; i < nsamples; i++) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
309 if (ft[i].end < ft[i].start) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
310 // Clock wrapped around (timer tick)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
311 delta = (ft[i].end+CYGNUM_KERNEL_COUNTERS_RTC_PERIOD) - ft[i].start;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
312 } else {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
313 delta = ft[i].end - ft[i].start;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
314 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
315 delta -= overhead;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
316 if (delta < 0) delta = 0;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
317 delta *= 1000;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
318 total += delta;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
319 if (delta < min) min = delta;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
320 if (delta > max) max = delta;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
321 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
322 ave = total / total_samples;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
323 total = 0;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
324 ave_dev = 0;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
325 for (i = start_sample; i < nsamples; i++) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
326 if (ft[i].end < ft[i].start) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
327 // Clock wrapped around (timer tick)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
328 delta = (ft[i].end+CYGNUM_KERNEL_COUNTERS_RTC_PERIOD) - ft[i].start;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
329 } else {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
330 delta = ft[i].end - ft[i].start;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
331 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
332 delta -= overhead;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
333 if (delta < 0) delta = 0;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
334 delta *= 1000;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
335 delta = delta - ave;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
336 if (delta < 0) delta = -delta;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
337 ave_dev += delta;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
338 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
339 ave_dev /= total_samples;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
340 con_ave = 0;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
341 con_min = 0;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
342 for (i = start_sample; i < nsamples; i++) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
343 if (ft[i].end < ft[i].start) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
344 // Clock wrapped around (timer tick)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
345 delta = (ft[i].end+CYGNUM_KERNEL_COUNTERS_RTC_PERIOD) - ft[i].start;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
346 } else {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
347 delta = ft[i].end - ft[i].start;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
348 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
349 delta -= overhead;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
350 if (delta < 0) delta = 0;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
351 delta *= 1000;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
352 if ((delta <= (ave+ave_dev)) && (delta >= (ave-ave_dev))) con_ave++;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
353 if ((delta <= (min+ave_dev)) && (delta >= (min-ave_dev))) con_min++;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
354 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
355 con_ave = (con_ave * 100) / total_samples;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
356 con_min = (con_min * 100) / total_samples;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
357 show_ticks_in_us(ave);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
358 show_ticks_in_us(min);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
359 show_ticks_in_us(max);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
360 show_ticks_in_us(ave_dev);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
361 disable_clock_latency_measurement();
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
362 diag_printf(" %3d%% %3d%%", con_ave, con_min);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
363 diag_printf(" %s\n", title);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
364 enable_clock_latency_measurement();
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
365 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
366
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
367 void
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
368 show_times(fun_times ft[], int nsamples, char *title)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
369 {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
370 show_times_detail(ft, nsamples, title, false);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
371 #ifdef STATS_WITHOUT_FIRST_SAMPLE
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
372 show_times_detail(ft, nsamples, "", true);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
373 #endif
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
374 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
375
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
376 void
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
377 show_test_parameters(void)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
378 {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
379 disable_clock_latency_measurement();
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
380 diag_printf("\nTesting parameters:\n");
56
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
381 diag_printf(" Clock samples: %5d\n", nsamples);
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
382 diag_printf(" Threads: %5d\n", ntest_threads);
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
383 diag_printf(" Thread switches: %5d\n", nthread_switches);
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
384 diag_printf(" Mutexes: %5d\n", nmutexes);
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
385 diag_printf(" Mailboxes: %5d\n", nmboxes);
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
386 diag_printf(" Semaphores: %5d\n", nsemaphores);
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
387 diag_printf(" Scheduler operations: %5d\n", nscheds);
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
388 diag_printf(" Counters: %5d\n", ncounters);
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
389 diag_printf(" Alarms: %5d\n", nalarms);
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
390 diag_printf("\n");
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
391 enable_clock_latency_measurement();
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
392 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
393
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
394 void
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
395 end_of_test_group(void)
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
396 {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
397 disable_clock_latency_measurement();
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
398 diag_printf("\n");
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
399 enable_clock_latency_measurement();
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
400 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
401
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
402 // Compute a name for a thread
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
403 char *
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
404 thread_name(char *basename, int indx) {
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
405 return "<<NULL>>"; // Not currently used
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
406 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
407
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
408 // test0 - null test, never executed
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
409 void
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
410 test0(cyg_uint32 indx)
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
411 {
177
4c750ce71ae3 Merge from eCos master repository on 2001-08-10-19:22:57-BST
jlarmour
parents: 161
diff changeset
412 #ifndef CYGPKG_KERNEL_SMP_SUPPORT
4c750ce71ae3 Merge from eCos master repository on 2001-08-10-19:22:57-BST
jlarmour
parents: 161
diff changeset
413 // In SMP, somw of these threads will execute
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
414 diag_printf("test0.%d executed?\n", indx);
177
4c750ce71ae3 Merge from eCos master repository on 2001-08-10-19:22:57-BST
jlarmour
parents: 161
diff changeset
415 #endif
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
416 cyg_thread_exit();
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
417 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
418
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
419 // test1 - empty test, simply exit. Last thread signals parent.
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
420 void
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
421 test1(cyg_uint32 indx)
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
422 {
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
423 if (indx == (cyg_uint32)(ntest_threads-1)) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
424 cyg_semaphore_post(&synchro); // Signal that last thread is dying
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
425 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
426 cyg_thread_exit();
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
427 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
428
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
429 // test2 - measure thread switch times
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
430 void
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
431 test2(cyg_uint32 indx)
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
432 {
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
433 int i;
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
434 for (i = 0; i < nthread_switches; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
435 if (indx == 0) {
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
436 HAL_CLOCK_READ(&test2_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
437 } else {
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
438 HAL_CLOCK_READ(&test2_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
439 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
440 cyg_thread_yield();
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
441 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
442 if (indx == 1) {
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
443 cyg_semaphore_post(&synchro);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
444 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
445 cyg_thread_exit();
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
446 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
447
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
448 // Full-circuit mutex unlock/lock test
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
449 void
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
450 mutex_test(cyg_uint32 indx)
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
451 {
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
452 int i;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
453 cyg_mutex_lock(&test_mutexes[0]);
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
454 for (i = 0; i < nmutexes; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
455 cyg_semaphore_wait(&synchro);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
456 wait_for_tick(); // Wait until the next clock tick to minimize aberations
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
457 HAL_CLOCK_READ(&mutex_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
458 cyg_mutex_unlock(&test_mutexes[0]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
459 cyg_mutex_lock(&test_mutexes[0]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
460 cyg_semaphore_post(&synchro);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
461 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
462 cyg_thread_exit();
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
463 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
464
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
465 // Full-circuit mbox put/get test
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
466 void
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
467 mbox_test(cyg_uint32 indx)
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
468 {
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
469 void *item;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
470 do {
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
471 item = cyg_mbox_get(test_mbox_handles[0]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
472 HAL_CLOCK_READ(&mbox_ft[(int)item].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
473 cyg_semaphore_post(&synchro);
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
474 } while ((int)item != (nmboxes-1));
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
475 cyg_thread_exit();
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
476 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
477
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
478 // Full-circuit semaphore post/wait test
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
479 void
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
480 semaphore_test(cyg_uint32 indx)
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
481 {
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
482 int i;
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
483 for (i = 0; i < nsemaphores; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
484 cyg_semaphore_wait(&test_semaphores[0]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
485 HAL_CLOCK_READ(&semaphore_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
486 cyg_semaphore_post(&synchro);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
487 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
488 cyg_thread_exit();
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
489 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
490
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
491 //
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
492 // This set of tests is used to measure kernel primitives that deal with threads
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
493 //
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
494 void
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
495 run_thread_tests(void)
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
496 {
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
497 int i;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
498 cyg_priority_t prio;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
499
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
500 // Set my priority higher than any I plan to create
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
501 cyg_thread_set_priority(cyg_thread_self(), 2);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
502
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
503 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
504 for (i = 0; i < ntest_threads; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
505 HAL_CLOCK_READ(&thread_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
506 cyg_thread_create(10, // Priority - just a number
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
507 test0, // entry
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
508 i, // index
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
509 thread_name("thread", i), // Name
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
510 &stacks[i][0], // Stack
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
511 STACK_SIZE, // Size
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
512 &threads[i], // Handle
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
513 &test_threads[i] // Thread data structure
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
514 );
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
515 HAL_CLOCK_READ(&thread_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
516 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
517 show_times(thread_ft, ntest_threads, "Create thread");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
518
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
519 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
520 for (i = 0; i < ntest_threads; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
521 HAL_CLOCK_READ(&thread_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
522 cyg_thread_yield();
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
523 HAL_CLOCK_READ(&thread_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
524 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
525 show_times(thread_ft, ntest_threads, "Yield thread [all suspended]");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
526
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
527 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
528 for (i = 0; i < ntest_threads; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
529 HAL_CLOCK_READ(&thread_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
530 cyg_thread_suspend(threads[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
531 HAL_CLOCK_READ(&thread_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
532 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
533 show_times(thread_ft, ntest_threads, "Suspend [suspended] thread");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
534
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
535 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
536 for (i = 0; i < ntest_threads; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
537 HAL_CLOCK_READ(&thread_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
538 cyg_thread_resume(threads[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
539 HAL_CLOCK_READ(&thread_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
540 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
541 show_times(thread_ft, ntest_threads, "Resume thread");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
542
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
543 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
544 for (i = 0; i < ntest_threads; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
545 HAL_CLOCK_READ(&thread_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
546 cyg_thread_set_priority(threads[i], 11);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
547 HAL_CLOCK_READ(&thread_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
548 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
549 show_times(thread_ft, ntest_threads, "Set priority");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
550
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
551 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
552 for (i = 0; i < ntest_threads; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
553 HAL_CLOCK_READ(&thread_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
554 prio = cyg_thread_get_priority(threads[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
555 HAL_CLOCK_READ(&thread_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
556 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
557 show_times(thread_ft, ntest_threads, "Get priority");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
558
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
559 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
560 for (i = 0; i < ntest_threads; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
561 HAL_CLOCK_READ(&thread_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
562 cyg_thread_kill(threads[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
563 HAL_CLOCK_READ(&thread_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
564 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
565 show_times(thread_ft, ntest_threads, "Kill [suspended] thread");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
566
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
567 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
568 for (i = 0; i < ntest_threads; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
569 HAL_CLOCK_READ(&thread_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
570 cyg_thread_yield();
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
571 HAL_CLOCK_READ(&thread_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
572 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
573 show_times(thread_ft, ntest_threads, "Yield [no other] thread");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
574
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
575 // Set my priority higher than any I plan to create
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
576 cyg_thread_set_priority(cyg_thread_self(), 2);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
577
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
578 // Recreate the test set
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
579 for (i = 0; i < ntest_threads; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
580 cyg_thread_create(10, // Priority - just a number
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
581 test0, // entry
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
582 i, // index
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
583 thread_name("thread", i), // Name
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
584 &stacks[i][0], // Stack
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
585 STACK_SIZE, // Size
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
586 &threads[i], // Handle
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
587 &test_threads[i] // Thread data structure
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
588 );
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
589 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
590
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
591 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
592 for (i = 0; i < ntest_threads; i++) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
593 HAL_CLOCK_READ(&thread_ft[i].start);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
594 cyg_thread_resume(threads[i]);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
595 HAL_CLOCK_READ(&thread_ft[i].end);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
596 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
597 show_times(thread_ft, ntest_threads, "Resume [suspended low prio] thread");
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
598
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
599 wait_for_tick(); // Wait until the next clock tick to minimize aberations
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
600 for (i = 0; i < ntest_threads; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
601 HAL_CLOCK_READ(&thread_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
602 cyg_thread_resume(threads[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
603 HAL_CLOCK_READ(&thread_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
604 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
605 show_times(thread_ft, ntest_threads, "Resume [runnable low prio] thread");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
606
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
607 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
608 for (i = 0; i < ntest_threads; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
609 HAL_CLOCK_READ(&thread_ft[i].start);
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
610 cyg_thread_suspend(threads[i]);
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
611 HAL_CLOCK_READ(&thread_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
612 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
613 show_times(thread_ft, ntest_threads, "Suspend [runnable] thread");
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
614
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
615
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
616 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
617 for (i = 0; i < ntest_threads; i++) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
618 HAL_CLOCK_READ(&thread_ft[i].start);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
619 cyg_thread_yield();
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
620 HAL_CLOCK_READ(&thread_ft[i].end);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
621 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
622 show_times(thread_ft, ntest_threads, "Yield [only low prio] thread");
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
623
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
624 wait_for_tick(); // Wait until the next clock tick to minimize aberations
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
625 for (i = 0; i < ntest_threads; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
626 HAL_CLOCK_READ(&thread_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
627 cyg_thread_suspend(threads[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
628 HAL_CLOCK_READ(&thread_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
629 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
630 show_times(thread_ft, ntest_threads, "Suspend [runnable->not runnable]");
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
631 for (i = 0; i < ntest_threads; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
632 cyg_thread_resume(threads[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
633 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
634
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
635 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
636 for (i = 0; i < ntest_threads; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
637 HAL_CLOCK_READ(&thread_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
638 cyg_thread_kill(threads[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
639 HAL_CLOCK_READ(&thread_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
640 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
641 show_times(thread_ft, ntest_threads, "Kill [runnable] thread");
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
642
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
643 wait_for_tick(); // Wait until the next clock tick to minimize aberations
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
644 for (i = 0; i < ntest_threads; i++) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
645 HAL_CLOCK_READ(&thread_ft[i].start);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
646 cyg_thread_delete(threads[i]);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
647 HAL_CLOCK_READ(&thread_ft[i].end);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
648 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
649 show_times(thread_ft, ntest_threads, "Destroy [dead] thread");
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
650
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
651 // Recreate the test set
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
652 for (i = 0; i < ntest_threads; i++) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
653 cyg_thread_create(10, // Priority - just a number
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
654 test0, // entry
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
655 i, // index
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
656 thread_name("thread", i), // Name
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
657 &stacks[i][0], // Stack
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
658 STACK_SIZE, // Size
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
659 &threads[i], // Handle
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
660 &test_threads[i] // Thread data structure
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
661 );
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
662 cyg_thread_resume(threads[i]);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
663 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
664
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
665 wait_for_tick(); // Wait until the next clock tick to minimize aberations
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
666 for (i = 0; i < ntest_threads; i++) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
667 HAL_CLOCK_READ(&thread_ft[i].start);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
668 cyg_thread_delete(threads[i]);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
669 HAL_CLOCK_READ(&thread_ft[i].end);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
670 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
671 show_times(thread_ft, ntest_threads, "Destroy [runnable] thread");
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
672
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
673 // Set my priority lower than any I plan to create
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
674 cyg_thread_set_priority(cyg_thread_self(), 3);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
675
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
676 // Set up the end-of-threads synchronizer
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
677 cyg_semaphore_init(&synchro, 0);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
678
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
679 // Recreate the test set
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
680 for (i = 0; i < ntest_threads; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
681 cyg_thread_create(2, // Priority - just a number
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
682 test1, // entry
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
683 i, // index
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
684 thread_name("thread", i), // Name
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
685 &stacks[i][0], // Stack
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
686 STACK_SIZE, // Size
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
687 &threads[i], // Handle
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
688 &test_threads[i] // Thread data structure
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
689 );
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
690 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
691
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
692 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
693 for (i = 0; i < ntest_threads; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
694 HAL_CLOCK_READ(&thread_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
695 cyg_thread_resume(threads[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
696 HAL_CLOCK_READ(&thread_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
697 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
698 show_times(thread_ft, ntest_threads, "Resume [high priority] thread");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
699 cyg_semaphore_wait(&synchro); // Wait for all threads to finish
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
700 // Make sure they are all dead
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
701 for (i = 0; i < ntest_threads; i++) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
702 cyg_thread_delete(threads[i]);
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
703 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
704
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
705 run_thread_switch_test();
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
706 end_of_test_group();
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
707 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
708
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
709 void
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
710 run_thread_switch_test(void)
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
711 {
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
712 int i;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
713
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
714 // Set up for thread context switch
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
715 for (i = 0; i < 2; i++) {
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
716 cyg_thread_create(10, // Priority - just a number
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
717 test2, // entry
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
718 i, // index
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
719 thread_name("thread", i), // Name
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
720 &stacks[i][0], // Stack
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
721 STACK_SIZE, // Size
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
722 &threads[i], // Handle
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
723 &test_threads[i] // Thread data structure
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
724 );
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
725 cyg_thread_resume(threads[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
726 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
727 // Set up the end-of-threads synchronizer
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
728 cyg_semaphore_init(&synchro, 0);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
729 cyg_semaphore_wait(&synchro);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
730 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
731 show_times(test2_ft, nthread_switches, "Thread switch");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
732 // Clean up
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
733 for (i = 0; i < 2; i++) {
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
734 cyg_thread_delete(threads[i]);
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
735 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
736 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
737
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
738 void
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
739 run_mutex_tests(void)
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
740 {
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
741 int i;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
742
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
743 // Mutex primitives
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
744 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
745 for (i = 0; i < nmutexes; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
746 HAL_CLOCK_READ(&mutex_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
747 cyg_mutex_init(&test_mutexes[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
748 HAL_CLOCK_READ(&mutex_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
749 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
750 show_times(mutex_ft, nmutexes, "Init mutex");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
751
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
752 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
753 for (i = 0; i < nmutexes; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
754 HAL_CLOCK_READ(&mutex_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
755 cyg_mutex_lock(&test_mutexes[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
756 HAL_CLOCK_READ(&mutex_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
757 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
758 show_times(mutex_ft, nmutexes, "Lock [unlocked] mutex");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
759
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
760 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
761 for (i = 0; i < nmutexes; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
762 HAL_CLOCK_READ(&mutex_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
763 cyg_mutex_unlock(&test_mutexes[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
764 HAL_CLOCK_READ(&mutex_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
765 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
766 show_times(mutex_ft, nmutexes, "Unlock [locked] mutex");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
767
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
768 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
769 for (i = 0; i < nmutexes; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
770 HAL_CLOCK_READ(&mutex_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
771 cyg_mutex_trylock(&test_mutexes[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
772 HAL_CLOCK_READ(&mutex_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
773 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
774 show_times(mutex_ft, nmutexes, "Trylock [unlocked] mutex");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
775
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
776 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
777 for (i = 0; i < nmutexes; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
778 HAL_CLOCK_READ(&mutex_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
779 cyg_mutex_trylock(&test_mutexes[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
780 HAL_CLOCK_READ(&mutex_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
781 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
782 show_times(mutex_ft, nmutexes, "Trylock [locked] mutex");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
783
38
e7ba79f6d3a8 Merge from eCos master repository on 1999-09-23-20:10:25-BST
jlarmour
parents: 34
diff changeset
784 // Must unlock mutices before destroying them.
e7ba79f6d3a8 Merge from eCos master repository on 1999-09-23-20:10:25-BST
jlarmour
parents: 34
diff changeset
785 for (i = 0; i < nmutexes; i++) {
e7ba79f6d3a8 Merge from eCos master repository on 1999-09-23-20:10:25-BST
jlarmour
parents: 34
diff changeset
786 cyg_mutex_unlock(&test_mutexes[i]);
e7ba79f6d3a8 Merge from eCos master repository on 1999-09-23-20:10:25-BST
jlarmour
parents: 34
diff changeset
787 }
e7ba79f6d3a8 Merge from eCos master repository on 1999-09-23-20:10:25-BST
jlarmour
parents: 34
diff changeset
788
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
789 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
790 for (i = 0; i < nmutexes; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
791 HAL_CLOCK_READ(&mutex_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
792 cyg_mutex_destroy(&test_mutexes[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
793 HAL_CLOCK_READ(&mutex_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
794 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
795 show_times(mutex_ft, nmutexes, "Destroy mutex");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
796 run_mutex_circuit_test();
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
797 end_of_test_group();
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
798 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
799
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
800 void
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
801 run_mutex_circuit_test(void)
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
802 {
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
803 int i;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
804 // Set my priority lower than any I plan to create
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
805 cyg_thread_set_priority(cyg_thread_self(), 4);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
806 // Set up for full mutex unlock/lock test
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
807 cyg_mutex_init(&test_mutexes[0]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
808 cyg_semaphore_init(&synchro, 0);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
809 cyg_thread_create(3, // Priority - just a number
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
810 mutex_test, // entry
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
811 0, // index
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
812 thread_name("thread", 0), // Name
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
813 &stacks[0][0], // Stack
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
814 STACK_SIZE, // Size
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
815 &mutex_test_thread_handle, // Handle
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
816 &mutex_test_thread // Thread data structure
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
817 );
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
818 cyg_thread_resume(mutex_test_thread_handle);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
819 // Need to raise priority so that this thread will block on the "lock"
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
820 cyg_thread_set_priority(cyg_thread_self(), 2);
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
821 for (i = 0; i < nmutexes; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
822 cyg_semaphore_post(&synchro);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
823 cyg_mutex_lock(&test_mutexes[0]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
824 HAL_CLOCK_READ(&mutex_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
825 cyg_mutex_unlock(&test_mutexes[0]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
826 cyg_semaphore_wait(&synchro);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
827 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
828 cyg_thread_delete(mutex_test_thread_handle);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
829 show_times(mutex_ft, nmutexes, "Unlock/Lock mutex");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
830 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
831
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
832 void
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
833 run_mbox_tests(void)
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
834 {
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
835 int i, cnt;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
836 void *item;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
837 // Mailbox primitives
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
838 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
839 for (i = 0; i < nmboxes; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
840 HAL_CLOCK_READ(&mbox_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
841 cyg_mbox_create(&test_mbox_handles[i], &test_mboxes[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
842 HAL_CLOCK_READ(&mbox_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
843 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
844 show_times(mbox_ft, nmboxes, "Create mbox");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
845
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
846 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
847 for (i = 0; i < nmboxes; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
848 HAL_CLOCK_READ(&mbox_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
849 cnt = cyg_mbox_peek(test_mbox_handles[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
850 HAL_CLOCK_READ(&mbox_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
851 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
852 show_times(mbox_ft, nmboxes, "Peek [empty] mbox");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
853
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
854 #ifdef CYGMFN_KERNEL_SYNCH_MBOXT_PUT_CAN_WAIT
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
855 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
856 for (i = 0; i < nmboxes; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
857 HAL_CLOCK_READ(&mbox_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
858 cyg_mbox_put(test_mbox_handles[i], (void *)i);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
859 HAL_CLOCK_READ(&mbox_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
860 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
861 show_times(mbox_ft, nmboxes, "Put [first] mbox");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
862
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
863 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
864 for (i = 0; i < nmboxes; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
865 HAL_CLOCK_READ(&mbox_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
866 cnt = cyg_mbox_peek(test_mbox_handles[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
867 HAL_CLOCK_READ(&mbox_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
868 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
869 show_times(mbox_ft, nmboxes, "Peek [1 msg] mbox");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
870
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
871 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
872 for (i = 0; i < nmboxes; i++) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
873 HAL_CLOCK_READ(&mbox_ft[i].start);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
874 cyg_mbox_put(test_mbox_handles[i], (void *)i);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
875 HAL_CLOCK_READ(&mbox_ft[i].end);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
876 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
877 show_times(mbox_ft, nmboxes, "Put [second] mbox");
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
878
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
879 wait_for_tick(); // Wait until the next clock tick to minimize aberations
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
880 for (i = 0; i < nmboxes; i++) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
881 HAL_CLOCK_READ(&mbox_ft[i].start);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
882 cnt = cyg_mbox_peek(test_mbox_handles[i]);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
883 HAL_CLOCK_READ(&mbox_ft[i].end);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
884 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
885 show_times(mbox_ft, nmboxes, "Peek [2 msgs] mbox");
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
886
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
887 wait_for_tick(); // Wait until the next clock tick to minimize aberations
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
888 for (i = 0; i < nmboxes; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
889 HAL_CLOCK_READ(&mbox_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
890 item = cyg_mbox_get(test_mbox_handles[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
891 HAL_CLOCK_READ(&mbox_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
892 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
893 show_times(mbox_ft, nmboxes, "Get [first] mbox");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
894
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
895 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
896 for (i = 0; i < nmboxes; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
897 HAL_CLOCK_READ(&mbox_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
898 item = cyg_mbox_get(test_mbox_handles[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
899 HAL_CLOCK_READ(&mbox_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
900 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
901 show_times(mbox_ft, nmboxes, "Get [second] mbox");
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
902 #endif // ifdef CYGMFN_KERNEL_SYNCH_MBOXT_PUT_CAN_WAIT
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
903
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
904 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
905 for (i = 0; i < nmboxes; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
906 HAL_CLOCK_READ(&mbox_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
907 cyg_mbox_tryput(test_mbox_handles[i], (void *)i);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
908 HAL_CLOCK_READ(&mbox_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
909 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
910 show_times(mbox_ft, nmboxes, "Tryput [first] mbox");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
911
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
912 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
913 for (i = 0; i < nmboxes; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
914 HAL_CLOCK_READ(&mbox_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
915 item = cyg_mbox_peek_item(test_mbox_handles[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
916 HAL_CLOCK_READ(&mbox_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
917 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
918 show_times(mbox_ft, nmboxes, "Peek item [non-empty] mbox");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
919
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
920 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
921 for (i = 0; i < nmboxes; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
922 HAL_CLOCK_READ(&mbox_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
923 item = cyg_mbox_tryget(test_mbox_handles[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
924 HAL_CLOCK_READ(&mbox_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
925 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
926 show_times(mbox_ft, nmboxes, "Tryget [non-empty] mbox");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
927
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
928 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
929 for (i = 0; i < nmboxes; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
930 HAL_CLOCK_READ(&mbox_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
931 item = cyg_mbox_peek_item(test_mbox_handles[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
932 HAL_CLOCK_READ(&mbox_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
933 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
934 show_times(mbox_ft, nmboxes, "Peek item [empty] mbox");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
935
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
936 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
937 for (i = 0; i < nmboxes; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
938 HAL_CLOCK_READ(&mbox_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
939 item = cyg_mbox_tryget(test_mbox_handles[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
940 HAL_CLOCK_READ(&mbox_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
941 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
942 show_times(mbox_ft, nmboxes, "Tryget [empty] mbox");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
943
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
944 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
945 for (i = 0; i < nmboxes; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
946 HAL_CLOCK_READ(&mbox_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
947 cyg_mbox_waiting_to_get(test_mbox_handles[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
948 HAL_CLOCK_READ(&mbox_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
949 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
950 show_times(mbox_ft, nmboxes, "Waiting to get mbox");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
951
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
952 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
953 for (i = 0; i < nmboxes; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
954 HAL_CLOCK_READ(&mbox_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
955 cyg_mbox_waiting_to_put(test_mbox_handles[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
956 HAL_CLOCK_READ(&mbox_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
957 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
958 show_times(mbox_ft, nmboxes, "Waiting to put mbox");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
959
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
960 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
961 for (i = 0; i < nmboxes; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
962 HAL_CLOCK_READ(&mbox_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
963 cyg_mbox_delete(test_mbox_handles[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
964 HAL_CLOCK_READ(&mbox_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
965 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
966 show_times(mbox_ft, nmboxes, "Delete mbox");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
967
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
968 run_mbox_circuit_test();
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
969 end_of_test_group();
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
970 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
971
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
972 void
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
973 run_mbox_circuit_test(void)
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
974 {
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
975 #ifdef CYGMFN_KERNEL_SYNCH_MBOXT_PUT_CAN_WAIT
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
976 int i;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
977 // Set my priority lower than any I plan to create
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
978 cyg_thread_set_priority(cyg_thread_self(), 3);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
979 // Set up for full mbox put/get test
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
980 cyg_mbox_create(&test_mbox_handles[0], &test_mboxes[0]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
981 cyg_semaphore_init(&synchro, 0);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
982 cyg_thread_create(2, // Priority - just a number
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
983 mbox_test, // entry
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
984 0, // index
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
985 thread_name("thread", 0), // Name
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
986 &stacks[0][0], // Stack
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
987 STACK_SIZE, // Size
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
988 &mbox_test_thread_handle, // Handle
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
989 &mbox_test_thread // Thread data structure
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
990 );
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
991 cyg_thread_resume(mbox_test_thread_handle);
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
992 for (i = 0; i < nmboxes; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
993 wait_for_tick(); // Wait until the next clock tick to minimize aberations
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
994 HAL_CLOCK_READ(&mbox_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
995 cyg_mbox_put(test_mbox_handles[0], (void *)i);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
996 cyg_semaphore_wait(&synchro);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
997 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
998 cyg_thread_delete(mbox_test_thread_handle);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
999 show_times(mbox_ft, nmboxes, "Put/Get mbox");
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1000 #endif
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1001 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1002
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1003 void
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1004 run_semaphore_tests(void)
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1005 {
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1006 int i;
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1007 cyg_count32 sem_val;
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1008 // Semaphore primitives
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1009 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1010 for (i = 0; i < nsemaphores; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1011 HAL_CLOCK_READ(&semaphore_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1012 cyg_semaphore_init(&test_semaphores[i], 0);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1013 HAL_CLOCK_READ(&semaphore_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1014 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1015 show_times(semaphore_ft, nsemaphores, "Init semaphore");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1016
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1017 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1018 for (i = 0; i < nsemaphores; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1019 HAL_CLOCK_READ(&semaphore_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1020 cyg_semaphore_post(&test_semaphores[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1021 HAL_CLOCK_READ(&semaphore_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1022 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1023 show_times(semaphore_ft, nsemaphores, "Post [0] semaphore");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1024
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1025 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1026 for (i = 0; i < nsemaphores; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1027 HAL_CLOCK_READ(&semaphore_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1028 cyg_semaphore_wait(&test_semaphores[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1029 HAL_CLOCK_READ(&semaphore_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1030 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1031 show_times(semaphore_ft, nsemaphores, "Wait [1] semaphore");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1032
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1033 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1034 for (i = 0; i < nsemaphores; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1035 HAL_CLOCK_READ(&semaphore_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1036 cyg_semaphore_trywait(&test_semaphores[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1037 HAL_CLOCK_READ(&semaphore_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1038 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1039 show_times(semaphore_ft, nsemaphores, "Trywait [0] semaphore");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1040
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1041 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1042 for (i = 0; i < nsemaphores; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1043 cyg_semaphore_post(&test_semaphores[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1044 HAL_CLOCK_READ(&semaphore_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1045 cyg_semaphore_trywait(&test_semaphores[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1046 HAL_CLOCK_READ(&semaphore_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1047 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1048 show_times(semaphore_ft, nsemaphores, "Trywait [1] semaphore");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1049
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1050 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1051 for (i = 0; i < nsemaphores; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1052 HAL_CLOCK_READ(&semaphore_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1053 cyg_semaphore_peek(&test_semaphores[i], &sem_val);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1054 HAL_CLOCK_READ(&semaphore_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1055 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1056 show_times(semaphore_ft, nsemaphores, "Peek semaphore");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1057
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1058 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1059 for (i = 0; i < nsemaphores; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1060 HAL_CLOCK_READ(&semaphore_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1061 cyg_semaphore_destroy(&test_semaphores[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1062 HAL_CLOCK_READ(&semaphore_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1063 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1064 show_times(semaphore_ft, nsemaphores, "Destroy semaphore");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1065
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1066 run_semaphore_circuit_test();
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1067 end_of_test_group();
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1068 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1069
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1070 void
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1071 run_semaphore_circuit_test(void)
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1072 {
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1073 int i;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1074 // Set my priority lower than any I plan to create
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1075 cyg_thread_set_priority(cyg_thread_self(), 3);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1076 // Set up for full semaphore post/wait test
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1077 cyg_semaphore_init(&test_semaphores[0], 0);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1078 cyg_semaphore_init(&synchro, 0);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1079 cyg_thread_create(2, // Priority - just a number
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1080 semaphore_test, // entry
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1081 0, // index
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1082 thread_name("thread", 0), // Name
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1083 &stacks[0][0], // Stack
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1084 STACK_SIZE, // Size
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1085 &semaphore_test_thread_handle, // Handle
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1086 &semaphore_test_thread // Thread data structure
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1087 );
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1088 cyg_thread_resume(semaphore_test_thread_handle);
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1089 for (i = 0; i < nsemaphores; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1090 wait_for_tick(); // Wait until the next clock tick to minimize aberations
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1091 HAL_CLOCK_READ(&semaphore_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1092 cyg_semaphore_post(&test_semaphores[0]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1093 cyg_semaphore_wait(&synchro);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1094 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1095 cyg_thread_delete(semaphore_test_thread_handle);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1096 show_times(semaphore_ft, nsemaphores, "Post/Wait semaphore");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1097 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1098
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1099 void
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1100 run_counter_tests(void)
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1101 {
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1102 int i;
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1103 cyg_tick_count_t val=0;
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1104
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1105 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1106 for (i = 0; i < ncounters; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1107 HAL_CLOCK_READ(&counter_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1108 cyg_counter_create(&counters[i], &test_counters[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1109 HAL_CLOCK_READ(&counter_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1110 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1111 show_times(counter_ft, ncounters, "Create counter");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1112
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1113 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1114 for (i = 0; i < ncounters; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1115 HAL_CLOCK_READ(&counter_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1116 val = cyg_counter_current_value(counters[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1117 HAL_CLOCK_READ(&counter_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1118 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1119 show_times(counter_ft, ncounters, "Get counter value");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1120
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1121 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1122 for (i = 0; i < ncounters; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1123 HAL_CLOCK_READ(&counter_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1124 cyg_counter_set_value(counters[i], val);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1125 HAL_CLOCK_READ(&counter_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1126 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1127 show_times(counter_ft, ncounters, "Set counter value");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1128
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1129 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1130 for (i = 0; i < ncounters; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1131 HAL_CLOCK_READ(&counter_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1132 cyg_counter_tick(counters[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1133 HAL_CLOCK_READ(&counter_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1134 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1135 show_times(counter_ft, ncounters, "Tick counter");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1136
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1137 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1138 for (i = 0; i < ncounters; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1139 HAL_CLOCK_READ(&counter_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1140 cyg_counter_delete(counters[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1141 HAL_CLOCK_READ(&counter_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1142 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1143 show_times(counter_ft, ncounters, "Delete counter");
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1144 end_of_test_group();
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1145 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1146
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1147 // Alarm callback function
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1148 void
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1149 alarm_cb(cyg_handle_t alarm, cyg_addrword_t val)
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1150 {
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1151 // empty call back
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1152 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1153
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1154 // Callback used to test determinancy
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1155 static volatile int alarm_cnt;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1156 void
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1157 alarm_cb2(cyg_handle_t alarm, cyg_addrword_t indx)
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1158 {
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1159 if (alarm_cnt == nscheds) return;
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1160 sched_ft[alarm_cnt].start = 0;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1161 HAL_CLOCK_READ(&sched_ft[alarm_cnt++].end);
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1162 if (alarm_cnt == nscheds) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1163 cyg_semaphore_post(&synchro);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1164 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1165 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1166
60
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1167 static void
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1168 alarm_cb3(cyg_handle_t alarm, cyg_addrword_t indx)
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1169 {
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1170 if (alarm_cnt == nscheds) {
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1171 cyg_semaphore_post(&synchro);
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1172 } else {
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1173 sched_ft[alarm_cnt].start = 0;
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1174 cyg_thread_resume((cyg_handle_t)indx);
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1175 }
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1176 }
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1177
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1178 // Null thread, used to keep scheduler busy
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1179 void
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1180 alarm_test(cyg_uint32 id)
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1181 {
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1182 while (true) {
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1183 cyg_thread_yield();
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1184 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1185 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1186
60
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1187 // Thread that suspends itself at the first opportunity
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1188 void
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1189 alarm_test2(cyg_uint32 id)
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1190 {
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1191 cyg_handle_t me = cyg_thread_self();
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1192 while (true) {
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1193 HAL_CLOCK_READ(&sched_ft[alarm_cnt++].end);
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1194 cyg_thread_suspend(me);
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1195 }
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1196 }
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1197
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1198 void
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1199 run_alarm_tests(void)
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1200 {
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1201 int i;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1202 cyg_tick_count_t init_val, step_val;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1203 cyg_handle_t rtc_handle;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1204
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1205 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1206 for (i = 0; i < ncounters; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1207 cyg_counter_create(&counters[i], &test_counters[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1208 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1209 for (i = 0; i < nalarms; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1210 HAL_CLOCK_READ(&alarm_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1211 cyg_alarm_create(counters[0], alarm_cb, 0, &alarms[i], &test_alarms[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1212 HAL_CLOCK_READ(&alarm_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1213 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1214 show_times(alarm_ft, nalarms, "Create alarm");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1215
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1216 wait_for_tick(); // Wait until the next clock tick to minimize aberations
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1217 init_val = 0; step_val = 0;
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1218 for (i = 0; i < nalarms; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1219 HAL_CLOCK_READ(&alarm_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1220 cyg_alarm_initialize(alarms[i], init_val, step_val);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1221 HAL_CLOCK_READ(&alarm_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1222 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1223 show_times(alarm_ft, nalarms, "Initialize alarm");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1224
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1225 wait_for_tick(); // Wait until the next clock tick to minimize aberations
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1226 init_val = 0; step_val = 0;
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1227 for (i = 0; i < nalarms; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1228 HAL_CLOCK_READ(&alarm_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1229 cyg_alarm_disable(alarms[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1230 HAL_CLOCK_READ(&alarm_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1231 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1232 show_times(alarm_ft, nalarms, "Disable alarm");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1233
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1234 wait_for_tick(); // Wait until the next clock tick to minimize aberations
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1235 init_val = 0; step_val = 0;
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1236 for (i = 0; i < nalarms; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1237 HAL_CLOCK_READ(&alarm_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1238 cyg_alarm_enable(alarms[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1239 HAL_CLOCK_READ(&alarm_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1240 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1241 show_times(alarm_ft, nalarms, "Enable alarm");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1242
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1243 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1244 for (i = 0; i < nalarms; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1245 HAL_CLOCK_READ(&alarm_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1246 cyg_alarm_delete(alarms[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1247 HAL_CLOCK_READ(&alarm_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1248 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1249 show_times(alarm_ft, nalarms, "Delete alarm");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1250
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1251 wait_for_tick(); // Wait until the next clock tick to minimize aberations
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1252 cyg_counter_create(&counters[0], &test_counters[0]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1253 cyg_alarm_create(counters[0], alarm_cb, 0, &alarms[0], &test_alarms[0]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1254 init_val = 9999; step_val = 9999;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1255 cyg_alarm_initialize(alarms[0], init_val, step_val);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1256 cyg_alarm_enable(alarms[0]);
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1257 for (i = 0; i < ncounters; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1258 HAL_CLOCK_READ(&counter_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1259 cyg_counter_tick(counters[0]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1260 HAL_CLOCK_READ(&counter_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1261 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1262 show_times(counter_ft, ncounters, "Tick counter [1 alarm]");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1263
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1264 wait_for_tick(); // Wait until the next clock tick to minimize aberations
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1265 cyg_counter_create(&counters[0], &test_counters[0]);
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1266 for (i = 0; i < nalarms; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1267 cyg_alarm_create(counters[0], alarm_cb, 0, &alarms[i], &test_alarms[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1268 init_val = 9999; step_val = 9999;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1269 cyg_alarm_initialize(alarms[i], init_val, step_val);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1270 cyg_alarm_enable(alarms[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1271 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1272 for (i = 0; i < ncounters; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1273 HAL_CLOCK_READ(&counter_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1274 cyg_counter_tick(counters[0]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1275 HAL_CLOCK_READ(&counter_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1276 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1277 show_times(counter_ft, ncounters, "Tick counter [many alarms]");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1278
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1279 wait_for_tick(); // Wait until the next clock tick to minimize aberations
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1280 cyg_counter_create(&counters[0], &test_counters[0]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1281 cyg_alarm_create(counters[0], alarm_cb, 0, &alarms[0], &test_alarms[0]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1282 init_val = 1; step_val = 1;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1283 cyg_alarm_initialize(alarms[0], init_val, step_val);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1284 cyg_alarm_enable(alarms[0]);
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1285 for (i = 0; i < ncounters; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1286 HAL_CLOCK_READ(&counter_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1287 cyg_counter_tick(counters[0]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1288 HAL_CLOCK_READ(&counter_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1289 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1290 show_times(counter_ft, ncounters, "Tick & fire counter [1 alarm]");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1291
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1292 wait_for_tick(); // Wait until the next clock tick to minimize aberations
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1293 cyg_counter_create(&counters[0], &test_counters[0]);
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1294 for (i = 0; i < nalarms; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1295 cyg_alarm_create(counters[0], alarm_cb, i, &alarms[i], &test_alarms[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1296 init_val = 1; step_val = 1;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1297 cyg_alarm_initialize(alarms[i], init_val, step_val);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1298 cyg_alarm_enable(alarms[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1299 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1300 for (i = 0; i < nalarms; i++) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1301 HAL_CLOCK_READ(&alarm_ft[i].start);
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1302 cyg_counter_tick(counters[0]);
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1303 HAL_CLOCK_READ(&alarm_ft[i].end);
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1304 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1305 for (i = 0; i < nalarms; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1306 cyg_alarm_delete(alarms[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1307 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1308 show_times(alarm_ft, nalarms, "Tick & fire counters [>1 together]");
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1309
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1310 wait_for_tick(); // Wait until the next clock tick to minimize aberations
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1311 cyg_counter_create(&counters[0], &test_counters[0]);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1312 for (i = 0; i < nalarms; i++) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1313 cyg_alarm_create(counters[0], alarm_cb, i, &alarms[i], &test_alarms[i]);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1314 init_val = i+1; step_val = nalarms+1;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1315 cyg_alarm_initialize(alarms[i], init_val, step_val);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1316 cyg_alarm_enable(alarms[i]);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1317 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1318 for (i = 0; i < nalarms; i++) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1319 HAL_CLOCK_READ(&alarm_ft[i].start);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1320 cyg_counter_tick(counters[0]);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1321 HAL_CLOCK_READ(&alarm_ft[i].end);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1322 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1323 for (i = 0; i < nalarms; i++) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1324 cyg_alarm_delete(alarms[i]);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1325 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1326 show_times(alarm_ft, nalarms, "Tick & fire counters [>1 separately]");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1327
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1328 wait_for_tick(); // Wait until the next clock tick to minimize aberations
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1329 cyg_clock_to_counter(cyg_real_time_clock(), &rtc_handle);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1330 cyg_alarm_create(rtc_handle, alarm_cb2, 0, &alarms[0], &test_alarms[0]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1331 init_val = 5; step_val = 5; alarm_cnt = 0;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1332 cyg_alarm_initialize(alarms[0], init_val, step_val);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1333 cyg_semaphore_init(&synchro, 0);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1334 cyg_alarm_enable(alarms[0]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1335 cyg_semaphore_wait(&synchro);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1336 cyg_alarm_disable(alarms[0]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1337 cyg_alarm_delete(alarms[0]);
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1338 show_times(sched_ft, nscheds, "Alarm latency [0 threads]");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1339
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1340 // Set my priority higher than any I plan to create
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1341 cyg_thread_set_priority(cyg_thread_self(), 2);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1342 for (i = 0; i < 2; i++) {
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1343 cyg_thread_create(10, // Priority - just a number
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1344 alarm_test, // entry
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1345 i, // index
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1346 thread_name("thread", i), // Name
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1347 &stacks[i][0], // Stack
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1348 STACK_SIZE, // Size
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1349 &threads[i], // Handle
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1350 &test_threads[i] // Thread data structure
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1351 );
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1352 cyg_thread_resume(threads[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1353 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1354 wait_for_tick(); // Wait until the next clock tick to minimize aberations
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1355 cyg_clock_to_counter(cyg_real_time_clock(), &rtc_handle);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1356 cyg_alarm_create(rtc_handle, alarm_cb2, 0, &alarms[0], &test_alarms[0]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1357 init_val = 5; step_val = 5; alarm_cnt = 0;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1358 cyg_alarm_initialize(alarms[0], init_val, step_val);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1359 cyg_semaphore_init(&synchro, 0);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1360 cyg_alarm_enable(alarms[0]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1361 cyg_semaphore_wait(&synchro);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1362 cyg_alarm_disable(alarms[0]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1363 cyg_alarm_delete(alarms[0]);
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1364 show_times(sched_ft, nscheds, "Alarm latency [2 threads]");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1365 for (i = 0; i < 2; i++) {
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1366 cyg_thread_suspend(threads[i]);
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1367 cyg_thread_delete(threads[i]);
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1368 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1369
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1370 // Set my priority higher than any I plan to create
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1371 cyg_thread_set_priority(cyg_thread_self(), 2);
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1372 for (i = 0; i < ntest_threads; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1373 cyg_thread_create(10, // Priority - just a number
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1374 alarm_test, // entry
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1375 i, // index
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1376 thread_name("thread", i), // Name
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1377 &stacks[i][0], // Stack
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1378 STACK_SIZE, // Size
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1379 &threads[i], // Handle
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1380 &test_threads[i] // Thread data structure
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1381 );
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1382 cyg_thread_resume(threads[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1383 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1384 wait_for_tick(); // Wait until the next clock tick to minimize aberations
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1385 cyg_clock_to_counter(cyg_real_time_clock(), &rtc_handle);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1386 cyg_alarm_create(rtc_handle, alarm_cb2, 0, &alarms[0], &test_alarms[0]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1387 init_val = 5; step_val = 5; alarm_cnt = 0;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1388 cyg_alarm_initialize(alarms[0], init_val, step_val);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1389 cyg_semaphore_init(&synchro, 0);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1390 cyg_alarm_enable(alarms[0]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1391 cyg_semaphore_wait(&synchro);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1392 cyg_alarm_disable(alarms[0]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1393 cyg_alarm_delete(alarms[0]);
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1394 show_times(sched_ft, nscheds, "Alarm latency [many threads]");
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1395 for (i = 0; i < ntest_threads; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1396 cyg_thread_suspend(threads[i]);
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1397 cyg_thread_delete(threads[i]);
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1398 }
60
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1399
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1400 // Set my priority higher than any I plan to create
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1401 cyg_thread_set_priority(cyg_thread_self(), 2);
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1402 cyg_thread_create(10, // Priority - just a number
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1403 alarm_test2, // entry
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1404 i, // index
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1405 thread_name("thread", 0), // Name
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1406 &stacks[0][0], // Stack
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1407 STACK_SIZE, // Size
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1408 &threads[0], // Handle
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1409 &test_threads[0] // Thread data structure
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1410 );
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1411 wait_for_tick(); // Wait until the next clock tick to minimize aberations
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1412 cyg_clock_to_counter(cyg_real_time_clock(), &rtc_handle);
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1413 cyg_alarm_create(rtc_handle, alarm_cb3, threads[0], &alarms[0],
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1414 &test_alarms[0]);
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1415 init_val = 5; step_val = 5; alarm_cnt = 0;
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1416 cyg_alarm_initialize(alarms[0], init_val, step_val);
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1417 cyg_semaphore_init(&synchro, 0);
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1418 cyg_alarm_enable(alarms[0]);
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1419 cyg_semaphore_wait(&synchro);
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1420 cyg_alarm_disable(alarms[0]);
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1421 cyg_alarm_delete(alarms[0]);
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1422 show_times(sched_ft, nscheds, "Alarm -> thread resume latency");
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1423 cyg_thread_suspend(threads[0]);
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1424 cyg_thread_delete(threads[0]);
3836136e7743 Merge from eCos master repository on 1999-12-17-19:44:58-GMT
jlarmour
parents: 56
diff changeset
1425
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1426 end_of_test_group();
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1427 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1428
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1429 void
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1430 run_sched_tests(void)
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1431 {
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1432 int i;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1433
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1434 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1435 for (i = 0; i < nscheds; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1436 HAL_CLOCK_READ(&sched_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1437 cyg_scheduler_lock();
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1438 HAL_CLOCK_READ(&sched_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1439 cyg_scheduler_unlock();
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1440 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1441 show_times(sched_ft, nscheds, "Scheduler lock");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1442
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1443 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1444 for (i = 0; i < nscheds; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1445 cyg_scheduler_lock();
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1446 HAL_CLOCK_READ(&sched_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1447 cyg_scheduler_unlock();
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1448 HAL_CLOCK_READ(&sched_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1449 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1450 show_times(sched_ft, nscheds, "Scheduler unlock [0 threads]");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1451
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1452 // Set my priority higher than any I plan to create
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1453 cyg_thread_set_priority(cyg_thread_self(), 2);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1454 for (i = 0; i < 1; i++) {
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1455 cyg_thread_create(10, // Priority - just a number
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1456 test0, // entry
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1457 i, // index
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1458 thread_name("thread", i), // Name
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1459 &stacks[i][0], // Stack
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1460 STACK_SIZE, // Size
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1461 &threads[i], // Handle
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1462 &test_threads[i] // Thread data structure
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1463 );
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1464 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1465 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1466 for (i = 0; i < nscheds; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1467 cyg_scheduler_lock();
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1468 HAL_CLOCK_READ(&sched_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1469 cyg_scheduler_unlock();
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1470 HAL_CLOCK_READ(&sched_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1471 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1472 show_times(sched_ft, nscheds, "Scheduler unlock [1 suspended]");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1473 for (i = 0; i < 1; i++) {
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1474 cyg_thread_delete(threads[i]);
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1475 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1476
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1477 // Set my priority higher than any I plan to create
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1478 cyg_thread_set_priority(cyg_thread_self(), 2);
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1479 for (i = 0; i < ntest_threads; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1480 cyg_thread_create(10, // Priority - just a number
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1481 test0, // entry
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1482 i, // index
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1483 thread_name("thread", i), // Name
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1484 &stacks[i][0], // Stack
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1485 STACK_SIZE, // Size
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1486 &threads[i], // Handle
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1487 &test_threads[i] // Thread data structure
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1488 );
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1489 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1490 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1491 for (i = 0; i < nscheds; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1492 cyg_scheduler_lock();
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1493 HAL_CLOCK_READ(&sched_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1494 cyg_scheduler_unlock();
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1495 HAL_CLOCK_READ(&sched_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1496 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1497 show_times(sched_ft, nscheds, "Scheduler unlock [many suspended]");
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1498 for (i = 0; i < ntest_threads; i++) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1499 cyg_thread_delete(threads[i]);
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1500 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1501
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1502 // Set my priority higher than any I plan to create
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1503 cyg_thread_set_priority(cyg_thread_self(), 2);
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1504 for (i = 0; i < ntest_threads; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1505 cyg_thread_create(10, // Priority - just a number
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1506 test0, // entry
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1507 i, // index
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1508 thread_name("thread", i), // Name
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1509 &stacks[i][0], // Stack
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1510 STACK_SIZE, // Size
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1511 &threads[i], // Handle
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1512 &test_threads[i] // Thread data structure
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1513 );
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1514 cyg_thread_resume(threads[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1515 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1516 wait_for_tick(); // Wait until the next clock tick to minimize aberations
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1517 for (i = 0; i < nscheds; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1518 cyg_scheduler_lock();
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1519 HAL_CLOCK_READ(&sched_ft[i].start);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1520 cyg_scheduler_unlock();
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1521 HAL_CLOCK_READ(&sched_ft[i].end);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1522 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1523 show_times(sched_ft, nscheds, "Scheduler unlock [many low prio]");
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1524 for (i = 0; i < ntest_threads; i++) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1525 cyg_thread_delete(threads[i]);
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1526 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1527 end_of_test_group();
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1528 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1529
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1530 void
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1531 run_all_tests(CYG_ADDRESS id)
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1532 {
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1533 int i, j;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1534 cyg_uint32 tv[nsamples], tv0, tv1;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1535 cyg_uint32 min_stack, max_stack, total_stack, actual_stack;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1536 cyg_tick_count_t ticks, tick0, tick1;
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1537 #ifdef CYG_SCHEDULER_LOCK_TIMINGS
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1538 cyg_uint32 lock_ave, lock_max;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1539 #endif
34
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents: 10
diff changeset
1540 #if defined(CYGVAR_KERNEL_COUNTERS_CLOCK_LATENCY) && defined(HAL_CLOCK_LATENCY)
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1541 cyg_int32 clock_ave;
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1542 #endif
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1543
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1544 disable_clock_latency_measurement();
8
ece80412419a Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents: 4
diff changeset
1545
177
4c750ce71ae3 Merge from eCos master repository on 2001-08-10-19:22:57-BST
jlarmour
parents: 161
diff changeset
1546 #ifndef CYGPKG_KERNEL_SMP_SUPPORT
8
ece80412419a Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents: 4
diff changeset
1547 cyg_test_dump_thread_stack_stats( "Startup, main stack", thread[0] );
ece80412419a Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents: 4
diff changeset
1548 cyg_test_dump_interrupt_stack_stats( "Startup" );
ece80412419a Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents: 4
diff changeset
1549 cyg_test_dump_idlethread_stack_stats( "Startup" );
ece80412419a Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents: 4
diff changeset
1550 cyg_test_clear_interrupt_stack();
177
4c750ce71ae3 Merge from eCos master repository on 2001-08-10-19:22:57-BST
jlarmour
parents: 161
diff changeset
1551 #endif
4c750ce71ae3 Merge from eCos master repository on 2001-08-10-19:22:57-BST
jlarmour
parents: 161
diff changeset
1552
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1553 diag_printf("\neCos Kernel Timings\n");
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1554 diag_printf("Notes: all times are in microseconds (.000001) unless otherwise stated\n");
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1555 #ifdef STATS_WITHOUT_FIRST_SAMPLE
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1556 diag_printf(" second line of results have first sample removed\n");
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1557 #endif
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1558
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1559 cyg_thread_delay(2); // Make sure the clock is actually running
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1560
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1561 ns_per_system_clock = 1000000/rtc_resolution[1];
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1562
177
4c750ce71ae3 Merge from eCos master repository on 2001-08-10-19:22:57-BST
jlarmour
parents: 161
diff changeset
1563 wait_for_tick();
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1564 for (i = 0; i < nsamples; i++) {
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1565 HAL_CLOCK_READ(&tv[i]);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1566 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1567 tv0 = 0;
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1568 for (i = 1; i < nsamples; i++) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1569 tv0 += tv[i] - tv[i-1];
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1570 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1571 end_of_test_group();
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1572
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1573 overhead = tv0 / (nsamples-1);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1574 diag_printf("Reading the hardware clock takes %d 'ticks' overhead\n", overhead);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1575 diag_printf("... this value will be factored out of all other measurements\n");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1576
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1577 // Try and measure how long the clock interrupt handling takes
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1578 for (i = 0; i < nsamples; i++) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1579 tick0 = cyg_current_time();
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1580 while (true) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1581 tick1 = cyg_current_time();
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1582 if (tick0 != tick1) break;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1583 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1584 HAL_CLOCK_READ(&tv[i]);
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1585 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1586 tv1 = 0;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1587 for (i = 0; i < nsamples; i++) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1588 tv1 += tv[i] * 1000;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1589 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1590 tv1 = tv1 / nsamples;
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1591 tv1 -= overhead; // Adjust out the cost of getting the timer value
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1592 diag_printf("Clock interrupt took");
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1593 show_ticks_in_us(tv1);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1594 diag_printf(" microseconds (%d raw clock ticks)\n", tv1/1000);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1595 enable_clock_latency_measurement();
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1596
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1597 ticks = cyg_current_time();
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1598
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1599 show_test_parameters();
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1600 show_times_hdr();
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1601
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1602 reset_clock_latency_measurement();
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1603
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1604 run_thread_tests();
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1605 run_sched_tests();
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1606 run_mutex_tests();
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1607 run_mbox_tests();
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1608 run_semaphore_tests();
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1609 run_counter_tests();
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1610 run_alarm_tests();
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1611
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1612 #ifdef CYG_SCHEDULER_LOCK_TIMINGS
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1613 Cyg_Scheduler::get_lock_times(&lock_ave, &lock_max);
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1614 diag_printf("\nMax lock:");
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1615 show_ticks_in_us(lock_max);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1616 diag_printf(", Ave lock:");
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1617 show_ticks_in_us(lock_ave);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1618 diag_printf("\n");
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1619 #endif
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1620
34
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents: 10
diff changeset
1621 #if defined(CYGVAR_KERNEL_COUNTERS_CLOCK_LATENCY) && defined(HAL_CLOCK_LATENCY)
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1622 // Display latency figures in same format as all other numbers
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1623 disable_clock_latency_measurement();
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1624 clock_ave = (total_clock_latency*1000) / total_clock_interrupts;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1625 show_ticks_in_us(clock_ave);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1626 show_ticks_in_us(min_clock_latency*1000);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1627 show_ticks_in_us(max_clock_latency*1000);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1628 show_ticks_in_us(0);
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1629 diag_printf(" Clock/interrupt latency\n\n");
34
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents: 10
diff changeset
1630 enable_clock_latency_measurement();
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents: 10
diff changeset
1631 #endif
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents: 10
diff changeset
1632
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents: 10
diff changeset
1633 #if defined(CYGVAR_KERNEL_COUNTERS_CLOCK_DSR_LATENCY)
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents: 10
diff changeset
1634 disable_clock_latency_measurement();
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents: 10
diff changeset
1635 clock_ave = (total_clock_dsr_latency*1000) / total_clock_dsr_calls;
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents: 10
diff changeset
1636 show_ticks_in_us(clock_ave);
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents: 10
diff changeset
1637 show_ticks_in_us(min_clock_dsr_latency*1000);
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents: 10
diff changeset
1638 show_ticks_in_us(max_clock_dsr_latency*1000);
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents: 10
diff changeset
1639 show_ticks_in_us(0);
29bc183297e1 Merge from eCos master repository on 1999-09-02-16:26:10-BST
jlarmour
parents: 10
diff changeset
1640 diag_printf(" Clock DSR latency\n\n");
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1641 enable_clock_latency_measurement();
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1642 #endif
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1643
177
4c750ce71ae3 Merge from eCos master repository on 2001-08-10-19:22:57-BST
jlarmour
parents: 161
diff changeset
1644 #ifndef CYGPKG_KERNEL_SMP_SUPPORT
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1645 disable_clock_latency_measurement();
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1646 min_stack = STACK_SIZE;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1647 max_stack = 0;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1648 total_stack = 0;
56
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
1649 for (i = 0; i < (int)NTEST_THREADS; i++) {
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1650 for (j = 0; j < STACK_SIZE; j++) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1651 if (stacks[i][j]) break;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1652 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1653 actual_stack = STACK_SIZE-j;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1654 if (actual_stack < min_stack) min_stack = actual_stack;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1655 if (actual_stack > max_stack) max_stack = actual_stack;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1656 total_stack += actual_stack;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1657 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1658 for (j = 0; j < STACKSIZE; j++) {
8
ece80412419a Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents: 4
diff changeset
1659 if (((char *)stack[0])[j]) break;
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1660 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1661 diag_printf("%5d %5d %5d (main stack: %5d) Thread stack used (%d total)\n",
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1662 total_stack/NTEST_THREADS, min_stack, max_stack,
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1663 STACKSIZE - j, STACK_SIZE);
8
ece80412419a Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents: 4
diff changeset
1664
ece80412419a Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents: 4
diff changeset
1665 cyg_test_dump_thread_stack_stats( "All done, main stack", thread[0] );
ece80412419a Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents: 4
diff changeset
1666 cyg_test_dump_interrupt_stack_stats( "All done" );
ece80412419a Merge from eCos master repository on 1999-05-21-22:05:54-BST
jlarmour
parents: 4
diff changeset
1667 cyg_test_dump_idlethread_stack_stats( "All done" );
177
4c750ce71ae3 Merge from eCos master repository on 2001-08-10-19:22:57-BST
jlarmour
parents: 161
diff changeset
1668 #endif
4c750ce71ae3 Merge from eCos master repository on 2001-08-10-19:22:57-BST
jlarmour
parents: 161
diff changeset
1669
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1670 enable_clock_latency_measurement();
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1671
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1672 ticks = cyg_current_time();
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1673 diag_printf("\nTiming complete - %d ms total\n\n", (int)((ticks*ns_per_system_clock)/1000));
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1674
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1675 CYG_TEST_PASS_FINISH("Basic timing OK");
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1676 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1677
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1678 void tm_basic_main( void )
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1679 {
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1680 CYG_TEST_INIT();
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1681
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1682 if (cyg_test_is_simulator) {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1683 nsamples = NSAMPLES_SIM;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1684 ntest_threads = NTEST_THREADS_SIM;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1685 nthread_switches = NTHREAD_SWITCHES_SIM;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1686 nmutexes = NMUTEXES_SIM;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1687 nmboxes = NMBOXES_SIM;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1688 nsemaphores = NSEMAPHORES_SIM;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1689 nscheds = NSCHEDS_SIM;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1690 ncounters = NCOUNTERS_SIM;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1691 nalarms = NALARMS_SIM;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1692 } else {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1693 nsamples = NSAMPLES;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1694 ntest_threads = NTEST_THREADS;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1695 nthread_switches = NTHREAD_SWITCHES;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1696 nmutexes = NMUTEXES;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1697 nmboxes = NMBOXES;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1698 nsemaphores = NSEMAPHORES;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1699 nscheds = NSCHEDS;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1700 ncounters = NCOUNTERS;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1701 nalarms = NALARMS;
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1702 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1703
56
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
1704 // Sanity
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
1705 #ifdef WORKHORSE_TEST
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
1706 ntest_threads = max(512, ntest_threads);
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
1707 nmutexes = max(1024, nmutexes);
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
1708 nsemaphores = max(1024, nsemaphores);
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
1709 nmboxes = max(1024, nmboxes);
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
1710 ncounters = max(1024, ncounters);
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
1711 nalarms = max(1024, nalarms);
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
1712 #else
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
1713 ntest_threads = max(64, ntest_threads);
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
1714 nmutexes = max(32, nmutexes);
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
1715 nsemaphores = max(32, nsemaphores);
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
1716 nmboxes = max(32, nmboxes);
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
1717 ncounters = max(32, ncounters);
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
1718 nalarms = max(32, nalarms);
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
1719 #endif
755351606154 Merge from eCos master repository on 1999-12-01-18:03:05-GMT
jlarmour
parents: 38
diff changeset
1720
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1721 new_thread(run_all_tests, 0);
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1722
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1723 Cyg_Scheduler::scheduler.start();
4
1d7f19c9e4d1 Merge from eCos master repository on 1999-05-11-21:11:10-BST
jlarmour
parents: 2
diff changeset
1724
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1725 }
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1726
130
eb9fd8c04db3 Merge from eCos master repository on 2000-10-23-17:01:37-BST
jlarmour
parents: 76
diff changeset
1727 #ifdef CYGSEM_HAL_STOP_CONSTRUCTORS_ON_FLAG
eb9fd8c04db3 Merge from eCos master repository on 2000-10-23-17:01:37-BST
jlarmour
parents: 76
diff changeset
1728 externC void
eb9fd8c04db3 Merge from eCos master repository on 2000-10-23-17:01:37-BST
jlarmour
parents: 76
diff changeset
1729 cyg_hal_invoke_constructors();
eb9fd8c04db3 Merge from eCos master repository on 2000-10-23-17:01:37-BST
jlarmour
parents: 76
diff changeset
1730 #endif
eb9fd8c04db3 Merge from eCos master repository on 2000-10-23-17:01:37-BST
jlarmour
parents: 76
diff changeset
1731
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1732 externC void
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1733 cyg_start( void )
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1734 {
130
eb9fd8c04db3 Merge from eCos master repository on 2000-10-23-17:01:37-BST
jlarmour
parents: 76
diff changeset
1735 #ifdef CYGSEM_HAL_STOP_CONSTRUCTORS_ON_FLAG
eb9fd8c04db3 Merge from eCos master repository on 2000-10-23-17:01:37-BST
jlarmour
parents: 76
diff changeset
1736 cyg_hal_invoke_constructors();
eb9fd8c04db3 Merge from eCos master repository on 2000-10-23-17:01:37-BST
jlarmour
parents: 76
diff changeset
1737 #endif
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1738 tm_basic_main();
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1739 }
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1740
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1741 #else // CYGFUN_KERNEL_API_C
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1742
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1743 externC void
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1744 cyg_start( void )
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1745 {
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1746 CYG_TEST_INIT();
66
bf00f99aec69 Merge from eCos master repository on 2000-02-02-19:16:44-GMT
jlarmour
parents: 64
diff changeset
1747 CYG_TEST_NA("Timing tests require:\n"
bf00f99aec69 Merge from eCos master repository on 2000-02-02-19:16:44-GMT
jlarmour
parents: 64
diff changeset
1748 "CYGFUN_KERNEL_API_C && \n"
bf00f99aec69 Merge from eCos master repository on 2000-02-02-19:16:44-GMT
jlarmour
parents: 64
diff changeset
1749 "CYGSEM_KERNEL_SCHED_MLQUEUE &&\n"
bf00f99aec69 Merge from eCos master repository on 2000-02-02-19:16:44-GMT
jlarmour
parents: 64
diff changeset
1750 "CYGVAR_KERNEL_COUNTERS_CLOCK &&\n"
76
435cced73e2f eCos v1.3.1 merged from eCos master repository on 2000-03-27-23:22:51-BST
jlarmour
parents: 66
diff changeset
1751 "!CYGDBG_INFRA_DIAG_USE_DEVICE &&\n"
66
bf00f99aec69 Merge from eCos master repository on 2000-02-02-19:16:44-GMT
jlarmour
parents: 64
diff changeset
1752 "(CYGNUM_KERNEL_SCHED_PRIORITIES > 12)\n");
2
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1753 }
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1754 #endif // CYGFUN_KERNEL_API_C, etc.
443894e2e912 Block commit of eCos version 1.2.1
jlarmour
parents: 0
diff changeset
1755
0
3111d98ba7b3 Initial commit of eCos version 1.1
jlarmour
parents:
diff changeset
1756 // EOF tm_basic.cxx