ecos: packages/kernel/current/tests/kclock1.c annotate

annotate packages/kernel/current/tests/kclock1.c @ 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	bf00f99aec69
children	d2c90368aeef

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 // kclock1.c
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 // Kernel C API Clock test 1 - Real Time Clock
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: 66 diff changeset	8 //####ECOSGPLCOPYRIGHTBEGIN####
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 66 diff changeset	9 // -------------------------------------------
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 66 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: 66 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: 66 diff changeset	12 //
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 66 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: 66 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: 66 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: 66 diff changeset	16 //
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 66 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: 66 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: 66 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: 66 diff changeset	20 // for more details.
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 66 diff changeset	21 //
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 66 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: 66 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: 66 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: 66 diff changeset	25 //
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 66 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: 66 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: 66 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: 66 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: 66 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: 66 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: 66 diff changeset	32 //
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 66 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: 66 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: 66 diff changeset	35 //
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 66 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: 66 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: 66 diff changeset	38 // -------------------------------------------
e0c0827131d1 Merge from eCos master repository on 2002-05-20-20:11:54-BST jlarmour parents: 66 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): dsm
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	44 // Contributors: dsm
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	45 // Date: 1998-03-20
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	46 // Description: Tests the Kernel Real Time Clock
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	47 // This test creates a thread, starts the scheduler and
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	48 // delays for a time of about 5 seconds. This test should
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	49 // be expected to run for about this length of time.
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	50 // Omissions:
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	51 // Doesn't test alarms attached to RTC.
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	52 // Assumptions:
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	53 // CYGVAR_KERNEL_COUNTERS_CLOCK must be set.
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	54 // Resolution of clock small compared with 5s.
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	55 // Overhead small compared with 5s.
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	56 // Options:
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	57 // CYGIMP_KERNEL_COUNTERS_SINGLE_LIST
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	58 // CYGIMP_KERNEL_COUNTERS_MULTI_LIST
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	59 // CYGVAR_KERNEL_COUNTERS_CLOCK
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	60 // CYGNUM_KERNEL_COUNTERS_MULTI_LIST_SIZE
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	61 //####DESCRIPTIONEND####
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	62 */
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	63
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: 0 diff changeset	64 #include <cyg/hal/hal_arch.h> // CYGNUM_HAL_STACK_SIZE_TYPICAL
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: 0 diff changeset	65
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	66 #include <cyg/kernel/kapi.h>
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	67
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	68 #include <cyg/infra/testcase.h>
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	69
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	70
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: 0 diff changeset	71 static cyg_uint64 TEST_DELAY;
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	72
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: 0 diff changeset	73 #ifdef CYGFUN_KERNEL_THREADS_TIMER
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	74
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	75 #ifdef CYGFUN_KERNEL_API_C
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	76
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	77 #include "testaux.h"
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	78
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	79 #define NTHREADS 1
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: 0 diff changeset	80 #define STACKSIZE CYGNUM_HAL_STACK_SIZE_TYPICAL
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	81
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	82 static cyg_handle_t thread[NTHREADS];
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	83
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	84 static cyg_thread thread_obj[NTHREADS];
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	85 static char stack[NTHREADS][STACKSIZE];
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	86
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	87 static void entry0( cyg_addrword_t data )
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	88 {
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	89 cyg_resolution_t res;
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	90 cyg_uint32 ticks;
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	91 cyg_tick_count_t count0, count1;
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	92 cyg_handle_t rtclock, rtcounter;
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	93
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	94 rtclock = cyg_real_time_clock();
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	95 cyg_clock_to_counter(rtclock, &rtcounter);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	96
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	97 res = cyg_clock_get_resolution (rtclock);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	98
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	99 /* RTC takes res.dividend/res.divisor ns/tick */
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	100 ticks = ((cyg_uint64)TEST_DELAY * res.divisor) / res.dividend;
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	101
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	102 count0 = cyg_counter_current_value(rtcounter);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	103 cyg_thread_delay(ticks);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	104 count1 = cyg_counter_current_value(rtcounter);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	105
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	106 CYG_TEST_CHECK(count0+ticks <= count1,
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	107 "real time clock's counter not counting");
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	108
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	109 CYG_TEST_CHECK(count1 <= cyg_current_time(),"cyg_current_time()");
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	110
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	111 CYG_TEST_PASS_FINISH("Kernel C API Clock 1 OK");
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	112 }
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	113
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	114 void kclock1_main( void )
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	115 {
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	116 CYG_TEST_INIT();
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	117
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: 0 diff changeset	118 if (cyg_test_is_simulator) {
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: 0 diff changeset	119 TEST_DELAY = 100000000ll;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: 0 diff changeset	120 } else {
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: 0 diff changeset	121 TEST_DELAY = 3000000000ll;
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: 0 diff changeset	122 }
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: 0 diff changeset	123
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	124 cyg_thread_create(4, entry0 , (cyg_addrword_t)0, "kclock1",
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: 0 diff changeset	125 (void *)stack[0], STACKSIZE, &thread[0], &thread_obj[0]);
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	126 cyg_thread_resume(thread[0]);
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	127
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	128 cyg_scheduler_start();
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	129 }
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	130
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	131 externC void
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	132 cyg_start( void )
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	133 {
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	134 kclock1_main();
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	135 }
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	136
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: 0 diff changeset	137 #else // def CYGFUN_KERNEL_API_C
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	138 #define N_A_MSG "Kernel C API layer disabled"
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	139 #endif // def CYGFUN_KERNEL_API_C
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: 0 diff changeset	140 #else // def CYGFUN_KERNEL_THREADS_TIMER
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: 0 diff changeset	141 #define N_A_MSG "Kernel threads timer disabled"
443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: 0 diff changeset	142 #endif // def CYGFUN_KERNEL_THREADS_TIMER
0 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 #ifdef N_A_MSG
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	145 externC void
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	146 cyg_start( void )
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	147 {
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	148 CYG_TEST_INIT();
2 443894e2e912 Block commit of eCos version 1.2.1 jlarmour parents: 0 diff changeset	149 CYG_TEST_NA( N_A_MSG );
0 3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	150 }
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	151 #endif // N_A_MSG
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	152
3111d98ba7b3 Initial commit of eCos version 1.1 jlarmour parents: diff changeset	153 // EOF kclock1.c

Mercurial > ecos

annotate packages/kernel/current/tests/kclock1.c @ 208:e0c0827131d1 ecos