source: rtems/cpukit/rtems/src/semdelete.c @ 90f1265

Last change on this file since 90f1265 was 90f1265, checked in by Sebastian Huber <sebastian.huber@…>, on Apr 18, 2016 at 4:23:27 AM

score: Fix _CORE_semaphore_Flush()

Use proper CORE_semaphore_Status for _CORE_semaphore_Flush() and
_CORE_semaphore_Destroy() operations.

Close #2696.

  • Property mode set to 100644
File size: 3.2 KB
Line 
1/**
2 *  @file
3 *
4 *  @brief RTEMS Delete Semaphore
5 *  @ingroup ClassicSem
6 */
7
8/*
9 *  COPYRIGHT (c) 1989-2014.
10 *  On-Line Applications Research Corporation (OAR).
11 *
12 *  The license and distribution terms for this file may be
13 *  found in the file LICENSE in this distribution or at
14 *  http://www.rtems.org/license/LICENSE.
15 */
16
17#if HAVE_CONFIG_H
18#include "config.h"
19#endif
20
21#include <rtems/system.h>
22#include <rtems/rtems/status.h>
23#include <rtems/rtems/support.h>
24#include <rtems/rtems/attrimpl.h>
25#include <rtems/score/isr.h>
26#include <rtems/rtems/options.h>
27#include <rtems/rtems/semimpl.h>
28#include <rtems/score/coremuteximpl.h>
29#include <rtems/score/coresemimpl.h>
30#include <rtems/score/thread.h>
31
32#include <rtems/score/interr.h>
33
34rtems_status_code rtems_semaphore_delete(
35  rtems_id   id
36)
37{
38  Semaphore_Control          *the_semaphore;
39  Objects_Locations           location;
40  rtems_attribute             attribute_set;
41
42  _Objects_Allocator_lock();
43
44  the_semaphore = _Semaphore_Get( id, &location );
45  switch ( location ) {
46
47    case OBJECTS_LOCAL:
48      attribute_set = the_semaphore->attribute_set;
49#if defined(RTEMS_SMP)
50      if ( _Attributes_Is_multiprocessor_resource_sharing( attribute_set ) ) {
51        MRSP_Status mrsp_status = _MRSP_Destroy(
52          &the_semaphore->Core_control.mrsp
53        );
54        if ( mrsp_status != MRSP_SUCCESSFUL ) {
55          _Objects_Put( &the_semaphore->Object );
56          _Objects_Allocator_unlock();
57          return _Semaphore_Translate_MRSP_status_code( mrsp_status );
58        }
59      } else
60#endif
61      if ( !_Attributes_Is_counting_semaphore( attribute_set ) ) {
62        if ( _CORE_mutex_Is_locked( &the_semaphore->Core_control.mutex ) &&
63             !_Attributes_Is_simple_binary_semaphore( attribute_set ) ) {
64          _Objects_Put( &the_semaphore->Object );
65          _Objects_Allocator_unlock();
66          return RTEMS_RESOURCE_IN_USE;
67        }
68        _CORE_mutex_Flush(
69          &the_semaphore->Core_control.mutex,
70          CORE_MUTEX_WAS_DELETED,
71          _Semaphore_MP_Send_object_was_deleted,
72          id
73        );
74        _CORE_mutex_Destroy( &the_semaphore->Core_control.mutex );
75      } else {
76        _CORE_semaphore_Destroy(
77          &the_semaphore->Core_control.semaphore,
78          _Semaphore_MP_Send_object_was_deleted,
79          id
80        );
81      }
82
83      _Objects_Close( &_Semaphore_Information, &the_semaphore->Object );
84
85#if defined(RTEMS_MULTIPROCESSING)
86      if ( _Attributes_Is_global( attribute_set ) ) {
87
88        _Objects_MP_Close( &_Semaphore_Information, the_semaphore->Object.id );
89
90        _Semaphore_MP_Send_process_packet(
91          SEMAPHORE_MP_ANNOUNCE_DELETE,
92          the_semaphore->Object.id,
93          0,                         /* Not used */
94          0                          /* Not used */
95        );
96      }
97#endif
98
99      _Objects_Put( &the_semaphore->Object );
100      _Semaphore_Free( the_semaphore );
101      _Objects_Allocator_unlock();
102      return RTEMS_SUCCESSFUL;
103
104#if defined(RTEMS_MULTIPROCESSING)
105    case OBJECTS_REMOTE:
106      _Objects_Allocator_unlock();
107      return RTEMS_ILLEGAL_ON_REMOTE_OBJECT;
108#endif
109
110    case OBJECTS_ERROR:
111      break;
112  }
113
114  _Objects_Allocator_unlock();
115  return RTEMS_INVALID_ID;
116}
Note: See TracBrowser for help on using the repository browser.