OpenCores
URL https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [rtos/] [rtems/] [c/] [src/] [exec/] [score/] [src/] [threadqtimeout.c] - Blame information for rev 30

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 30 unneback
/*
2
 *  Thread Queue Handler
3
 *
4
 *
5
 *  COPYRIGHT (c) 1989-1999.
6
 *  On-Line Applications Research Corporation (OAR).
7
 *
8
 *  The license and distribution terms for this file may be
9
 *  found in the file LICENSE in this distribution or at
10
 *  http://www.OARcorp.com/rtems/license.html.
11
 *
12
 *  $Id: threadqtimeout.c,v 1.2 2001-09-27 11:59:34 chris Exp $
13
 */
14
 
15
#include <rtems/system.h>
16
#include <rtems/score/chain.h>
17
#include <rtems/score/isr.h>
18
#include <rtems/score/object.h>
19
#include <rtems/score/states.h>
20
#include <rtems/score/thread.h>
21
#include <rtems/score/threadq.h>
22
#include <rtems/score/tqdata.h>
23
 
24
/*PAGE
25
 *
26
 *  _Thread_queue_Timeout
27
 *
28
 *  This routine processes a thread which timeouts while waiting on
29
 *  a thread queue. It is called by the watchdog handler.
30
 *
31
 *  Input parameters:
32
 *    id - thread id
33
 *
34
 *  Output parameters: NONE
35
 */
36
 
37
void _Thread_queue_Timeout(
38
  Objects_Id  id,
39
  void       *ignored
40
)
41
{
42
  Thread_Control       *the_thread;
43
  Thread_queue_Control *the_thread_queue;
44
  Objects_Locations     location;
45
 
46
  the_thread = _Thread_Get( id, &location );
47
  switch ( location ) {
48
    case OBJECTS_ERROR:
49
    case OBJECTS_REMOTE:  /* impossible */
50
      break;
51
    case OBJECTS_LOCAL:
52
      the_thread_queue = the_thread->Wait.queue;
53
 
54
      /*
55
       *  If the_thread_queue is not synchronized, then it is either
56
       *  "nothing happened", "timeout", or "satisfied".   If the_thread
57
       *  is the executing thread, then it is in the process of blocking
58
       *  and it is the thread which is responsible for the synchronization
59
       *  process.
60
       *
61
       *  If it is not satisfied, then it is "nothing happened" and
62
       *  this is the "timeout" transition.  After a request is satisfied,
63
       *  a timeout is not allowed to occur.
64
       */
65
 
66
      if ( the_thread_queue->sync_state != THREAD_QUEUE_SYNCHRONIZED &&
67
           _Thread_Is_executing( the_thread ) ) {
68
        if ( the_thread_queue->sync_state != THREAD_QUEUE_SATISFIED )
69
          the_thread_queue->sync_state = THREAD_QUEUE_TIMEOUT;
70
      } else {
71
        the_thread->Wait.return_code = the_thread->Wait.queue->timeout_status;
72
        _Thread_queue_Extract( the_thread->Wait.queue, the_thread );
73
      }
74
      _Thread_Unnest_dispatch();
75
      break;
76
  }
77
}
78
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.