Back to home page

LXR

 
 

    


File indexing completed on 2025-05-11 08:24:35

0001 /* SPDX-License-Identifier: BSD-2-Clause */
0002 
0003 /*  Delayed_events_task
0004  *
0005  *  This task continuously sends itself events at one tick
0006  *  intervals.
0007  *
0008  *  Input parameters:
0009  *    argument - task argument
0010  *
0011  *  Output parameters:  NONE
0012  *
0013  *  COPYRIGHT (c) 1989-1999.
0014  *  On-Line Applications Research Corporation (OAR).
0015  *
0016  * Redistribution and use in source and binary forms, with or without
0017  * modification, are permitted provided that the following conditions
0018  * are met:
0019  * 1. Redistributions of source code must retain the above copyright
0020  *    notice, this list of conditions and the following disclaimer.
0021  * 2. Redistributions in binary form must reproduce the above copyright
0022  *    notice, this list of conditions and the following disclaimer in the
0023  *    documentation and/or other materials provided with the distribution.
0024  *
0025  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
0026  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
0027  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
0028  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
0029  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
0030  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
0031  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
0032  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
0033  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
0034  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
0035  * POSSIBILITY OF SUCH DAMAGE.
0036  */
0037 
0038 #ifdef HAVE_CONFIG_H
0039 #include "config.h"
0040 #endif
0041 
0042 #include "system.h"
0043 
0044 rtems_task Delayed_events_task(
0045   rtems_task_argument argument
0046 )
0047 {
0048   uint32_t          count;
0049   uint32_t          previous_mode;
0050   rtems_status_code status;
0051   rtems_event_set   events;
0052   rtems_id          self;
0053 
0054   status = rtems_task_mode(
0055     RTEMS_PREEMPT | RTEMS_TIMESLICE,
0056     RTEMS_PREEMPT_MASK | RTEMS_TIMESLICE_MASK,
0057     &previous_mode
0058   );
0059   directive_failed( status, "rtems_task_mode" );
0060 
0061   status = rtems_timer_create( Timer_name[ 1 ], &Timer_id[ 1 ] );
0062   directive_failed( status, "rtems_timer_create" );
0063 
0064   self = rtems_task_self();
0065 
0066   while ( Stop_Test == false ) {
0067     for ( count=DELAYED_EVENT_DOT_COUNT; Stop_Test == false && count; count-- ){
0068       status = rtems_timer_fire_after(
0069         Timer_id[ 1 ],
0070         1,
0071         Delayed_send_event,
0072         &self
0073       );
0074       directive_failed( status, "rtems_timer_reset" );
0075 
0076       status = rtems_event_receive(
0077         RTEMS_EVENT_16,
0078         RTEMS_DEFAULT_OPTIONS,
0079         RTEMS_NO_TIMEOUT,
0080         &events
0081       );
0082       directive_failed( status, "rtems_event_receive" );
0083     }
0084     put_dot('.');
0085   }
0086 
0087   Exit_test();
0088 }