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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [rtos/] [rtems/] [c/] [src/] [exec/] [rtems/] [src/] [semrelease.c] - Blame information for rev 373

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


/*
 *  Semaphore Manager
 *
 *  DESCRIPTION:
 *
 *  This package is the implementation of the Semaphore Manager.
 *  This manager utilizes standard Dijkstra counting semaphores to provide
 *  synchronization and mutual exclusion capabilities.
 *
 *  Directives provided are:
 *
 *     + create a semaphore
 *     + get an ID of a semaphore
 *     + delete a semaphore
 *     + acquire a semaphore
 *     + release a semaphore
 *
 *  COPYRIGHT (c) 1989-1999.
 *  On-Line Applications Research Corporation (OAR).
 *
 *  The license and distribution terms for this file may be
 *  found in the file LICENSE in this distribution or at
 *  http://www.OARcorp.com/rtems/license.html.
 *
 *  $Id: semrelease.c,v 1.2 2001-09-27 11:59:19 chris Exp $
 */
 
#include <rtems/system.h>
#include <rtems/rtems/status.h>
#include <rtems/rtems/support.h>
#include <rtems/rtems/attr.h>
#include <rtems/score/isr.h>
#include <rtems/score/object.h>
#include <rtems/rtems/options.h>
#include <rtems/rtems/sem.h>
#include <rtems/score/coremutex.h>
#include <rtems/score/coresem.h>
#include <rtems/score/states.h>
#include <rtems/score/thread.h>
#include <rtems/score/threadq.h>
#if defined(RTEMS_MULTIPROCESSING)
#include <rtems/score/mpci.h>
#endif
#include <rtems/score/sysstate.h>
 
#include <rtems/score/interr.h>
 
/*PAGE
 *
 *  rtems_semaphore_release
 *
 *  This directive allows a thread to release a semaphore.
 *
 *  Input parameters:
 *    id - semaphore id
 *
 *  Output parameters:
 *    RTEMS_SUCCESSFUL - if successful
 *    error code        - if unsuccessful
 */
 
rtems_status_code rtems_semaphore_release(
  Objects_Id id
)
{
  register Semaphore_Control *the_semaphore;
  Objects_Locations           location;
  CORE_mutex_Status           mutex_status;
  CORE_semaphore_Status       semaphore_status;
 
  the_semaphore = _Semaphore_Get( id, &location );
  switch ( location ) {
 
    case OBJECTS_REMOTE:
#if defined(RTEMS_MULTIPROCESSING)
      return _Semaphore_MP_Send_request_packet(
        SEMAPHORE_MP_RELEASE_REQUEST,
        id,
        0,                               /* Not used */
        MPCI_DEFAULT_TIMEOUT
      );
#endif
 
    case OBJECTS_ERROR:
      return RTEMS_INVALID_ID;
 
    case OBJECTS_LOCAL:
      if ( !_Attributes_Is_counting_semaphore(the_semaphore->attribute_set) ) {
        mutex_status = _CORE_mutex_Surrender(
                         &the_semaphore->Core_control.mutex,
                         id,
#if defined(RTEMS_MULTIPROCESSING)
                         _Semaphore_Core_mutex_mp_support
#else
                         NULL
#endif
                       );
        _Thread_Enable_dispatch();
        return _Semaphore_Translate_core_mutex_return_code( mutex_status );
      }
      else
        semaphore_status = _CORE_semaphore_Surrender(
                             &the_semaphore->Core_control.semaphore,
                             id,
#if defined(RTEMS_MULTIPROCESSING)
                             _Semaphore_Core_semaphore_mp_support
#else
                             NULL
#endif
                           );
        _Thread_Enable_dispatch();
        return
          _Semaphore_Translate_core_semaphore_return_code( semaphore_status );
  }
 
  return RTEMS_INTERNAL_ERROR;   /* unreached - only to remove warnings */
}

Line No.	Rev	Author	Line
1	30	unneback	`/*`
2			`* Semaphore Manager`
3			`*`
4			`* DESCRIPTION:`
5			`*`
6			`* This package is the implementation of the Semaphore Manager.`
7			`* This manager utilizes standard Dijkstra counting semaphores to provide`
8			`* synchronization and mutual exclusion capabilities.`
9			`*`
10			`* Directives provided are:`
11			`*`
12			`* + create a semaphore`
13			`* + get an ID of a semaphore`
14			`* + delete a semaphore`
15			`* + acquire a semaphore`
16			`* + release a semaphore`
17			`*`
18			`* COPYRIGHT (c) 1989-1999.`
19			`* On-Line Applications Research Corporation (OAR).`
20			`*`
21			`* The license and distribution terms for this file may be`
22			`* found in the file LICENSE in this distribution or at`
23			`* http://www.OARcorp.com/rtems/license.html.`
24			`*`
25			`* $Id: semrelease.c,v 1.2 2001-09-27 11:59:19 chris Exp $`
26			`*/`
27
28			`#include <rtems/system.h>`
29			`#include <rtems/rtems/status.h>`
30			`#include <rtems/rtems/support.h>`
31			`#include <rtems/rtems/attr.h>`
32			`#include <rtems/score/isr.h>`
33			`#include <rtems/score/object.h>`
34			`#include <rtems/rtems/options.h>`
35			`#include <rtems/rtems/sem.h>`
36			`#include <rtems/score/coremutex.h>`
37			`#include <rtems/score/coresem.h>`
38			`#include <rtems/score/states.h>`
39			`#include <rtems/score/thread.h>`
40			`#include <rtems/score/threadq.h>`
41			`#if defined(RTEMS_MULTIPROCESSING)`
42			`#include <rtems/score/mpci.h>`
43			`#endif`
44			`#include <rtems/score/sysstate.h>`
45
46			`#include <rtems/score/interr.h>`
47
48			`/*PAGE`
49			`*`
50			`* rtems_semaphore_release`
51			`*`
52			`* This directive allows a thread to release a semaphore.`
53			`*`
54			`* Input parameters:`
55			`* id - semaphore id`
56			`*`
57			`* Output parameters:`
58			`* RTEMS_SUCCESSFUL - if successful`
59			`* error code - if unsuccessful`
60			`*/`
61
62			`rtems_status_code rtems_semaphore_release(`
63			`Objects_Id id`
64			`)`
65			`{`
66			`register Semaphore_Control *the_semaphore;`
67			`Objects_Locations location;`
68			`CORE_mutex_Status mutex_status;`
69			`CORE_semaphore_Status semaphore_status;`
70
71			`the_semaphore = _Semaphore_Get( id, &location );`
72			`switch ( location ) {`
73
74			`case OBJECTS_REMOTE:`
75			`#if defined(RTEMS_MULTIPROCESSING)`
76			`return _Semaphore_MP_Send_request_packet(`
77			`SEMAPHORE_MP_RELEASE_REQUEST,`
78			`id,`
79			`0, /* Not used */`
80			`MPCI_DEFAULT_TIMEOUT`
81			`);`
82			`#endif`
83
84			`case OBJECTS_ERROR:`
85			`return RTEMS_INVALID_ID;`
86
87			`case OBJECTS_LOCAL:`
88			`if ( !_Attributes_Is_counting_semaphore(the_semaphore->attribute_set) ) {`
89			`mutex_status = _CORE_mutex_Surrender(`
90			`&the_semaphore->Core_control.mutex,`
91			`id,`
92			`#if defined(RTEMS_MULTIPROCESSING)`
93			`_Semaphore_Core_mutex_mp_support`
94			`#else`
95			`NULL`
96			`#endif`
97			`);`
98			`_Thread_Enable_dispatch();`
99			`return _Semaphore_Translate_core_mutex_return_code( mutex_status );`
100			`}`
101			`else`
102			`semaphore_status = _CORE_semaphore_Surrender(`
103			`&the_semaphore->Core_control.semaphore,`
104			`id,`
105			`#if defined(RTEMS_MULTIPROCESSING)`
106			`_Semaphore_Core_semaphore_mp_support`
107			`#else`
108			`NULL`
109			`#endif`
110			`);`
111			`_Thread_Enable_dispatch();`
112			`return`
113			`_Semaphore_Translate_core_semaphore_return_code( semaphore_status );`
114			`}`
115
116			`return RTEMS_INTERNAL_ERROR; /* unreached - only to remove warnings */`
117			`}`

Browse

Tools

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [rtos/] [rtems/] [c/] [src/] [exec/] [rtems/] [src/] [semrelease.c] - Blame information for rev 373