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

Subversion Repositories or1k

[/] [or1k/] [trunk/] [rtems-20020807/] [cpukit/] [rtems/] [src/] [partdelete.c] - Blame information for rev 1765

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 1026 ivang
/*
2
 *  Partition Manager
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
 *  partdelete.c,v 1.2 1999/11/17 17:50:27 joel Exp
13
 */
14
 
15
#include <rtems/system.h>
16
#include <rtems/rtems/status.h>
17
#include <rtems/rtems/support.h>
18
#include <rtems/score/address.h>
19
#include <rtems/score/object.h>
20
#include <rtems/rtems/part.h>
21
#include <rtems/score/thread.h>
22
#include <rtems/score/sysstate.h>
23
 
24
/*PAGE
25
 *
26
 *  rtems_partition_delete
27
 *
28
 *  This directive allows a thread to delete a partition specified by
29
 *  the partition identifier, provided that none of its buffers are
30
 *  still allocated.
31
 *
32
 *  Input parameters:
33
 *    id - partition id
34
 *
35
 *  Output parameters:
36
 *    RTEMS_SUCCESSFUL - if successful
37
 *    error code        - if unsuccessful
38
 */
39
 
40
rtems_status_code rtems_partition_delete(
41
  Objects_Id id
42
)
43
{
44
  register Partition_Control *the_partition;
45
  Objects_Locations                  location;
46
 
47
  the_partition = _Partition_Get( id, &location );
48
  switch ( location ) {
49
    case OBJECTS_REMOTE:
50
#if defined(RTEMS_MULTIPROCESSING)
51
      _Thread_Dispatch();
52
      return RTEMS_ILLEGAL_ON_REMOTE_OBJECT;
53
#endif
54
 
55
    case OBJECTS_ERROR:
56
      return RTEMS_INVALID_ID;
57
 
58
    case OBJECTS_LOCAL:
59
      if ( the_partition->number_of_used_blocks == 0 ) {
60
        _Objects_Close( &_Partition_Information, &the_partition->Object );
61
        _Partition_Free( the_partition );
62
#if defined(RTEMS_MULTIPROCESSING)
63
        if ( _Attributes_Is_global( the_partition->attribute_set ) ) {
64
 
65
          _Objects_MP_Close(
66
            &_Partition_Information,
67
            the_partition->Object.id
68
          );
69
 
70
          _Partition_MP_Send_process_packet(
71
            PARTITION_MP_ANNOUNCE_DELETE,
72
            the_partition->Object.id,
73
            0,                         /* Not used */
74
 
75
          );
76
        }
77
#endif
78
 
79
        _Thread_Enable_dispatch();
80
        return RTEMS_SUCCESSFUL;
81
      }
82
      _Thread_Enable_dispatch();
83
      return RTEMS_RESOURCE_IN_USE;
84
  }
85
 
86
  return RTEMS_INTERNAL_ERROR;   /* unreached - only to remove warnings */
87
}

powered by: WebSVN 2.1.0

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