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

Subversion Repositories openrisc

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

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

Line No. Rev Author Line
1 30 unneback
/*
2
 *  CORE Semaphore Handler
3
 *
4
 *  DESCRIPTION:
5
 *
6
 *  This package is the implementation of the CORE Semaphore Handler.
7
 *  This core object utilizes standard Dijkstra counting semaphores to provide
8
 *  synchronization and mutual exclusion capabilities.
9
 *
10
 *  COPYRIGHT (c) 1989-1999.
11
 *  On-Line Applications Research Corporation (OAR).
12
 *
13
 *  The license and distribution terms for this file may be
14
 *  found in the file LICENSE in this distribution or at
15
 *  http://www.OARcorp.com/rtems/license.html.
16
 *
17
 *  $Id: coresemsurrender.c,v 1.2 2001-09-27 11:59:34 chris Exp $
18
 */
19
 
20
#include <rtems/system.h>
21
#include <rtems/score/isr.h>
22
#include <rtems/score/coresem.h>
23
#include <rtems/score/states.h>
24
#include <rtems/score/thread.h>
25
#include <rtems/score/threadq.h>
26
#if defined(RTEMS_MULTIPROCESSING)
27
#include <rtems/score/mpci.h>
28
#endif
29
 
30
/*PAGE
31
 *
32
 *  _CORE_semaphore_Surrender
33
 *
34
 *  Input parameters:
35
 *    the_semaphore            - the semaphore to be flushed
36
 *    id                       - id of parent semaphore
37
 *    api_semaphore_mp_support - api dependent MP support actions
38
 *
39
 *  Output parameters:
40
 *    CORE_SEMAPHORE_STATUS_SUCCESSFUL - if successful
41
 *    core error code                  - if unsuccessful
42
 *
43
 *  Output parameters:
44
 */
45
 
46
CORE_semaphore_Status _CORE_semaphore_Surrender(
47
  CORE_semaphore_Control                *the_semaphore,
48
  Objects_Id                             id,
49
  CORE_semaphore_API_mp_support_callout  api_semaphore_mp_support
50
)
51
{
52
  Thread_Control *the_thread;
53
  ISR_Level       level;
54
  CORE_semaphore_Status status;
55
 
56
  status = CORE_SEMAPHORE_STATUS_SUCCESSFUL;
57
 
58
  if ( (the_thread = _Thread_queue_Dequeue(&the_semaphore->Wait_queue)) ) {
59
 
60
    if ( !_Objects_Is_local_id( the_thread->Object.id ) )
61
      (*api_semaphore_mp_support) ( the_thread, id );
62
 
63
  } else {
64
    _ISR_Disable( level );
65
      if ( the_semaphore->count <= the_semaphore->Attributes.maximum_count )
66
        the_semaphore->count += 1;
67
      else
68
        status = CORE_SEMAPHORE_MAXIMUM_COUNT_EXCEEDED;
69
    _ISR_Enable( level );
70
  }
71
 
72
  return status;
73
}
74
 

powered by: WebSVN 2.1.0

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