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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [rtos/] [rtems/] [c/] [src/] [exec/] [rtems/] [src/] [regiongetsegmentsize.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
 *  Region 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
 *  $Id: regiongetsegmentsize.c,v 1.2 2001-09-27 11:59:19 chris Exp $
13
 */
14
 
15
#include <rtems/system.h>
16
#include <rtems/rtems/status.h>
17
#include <rtems/rtems/support.h>
18
#include <rtems/score/object.h>
19
#include <rtems/rtems/options.h>
20
#include <rtems/rtems/region.h>
21
#include <rtems/score/states.h>
22
#include <rtems/score/thread.h>
23
 
24
/*PAGE
25
 *
26
 *  rtems_region_get_segment_size
27
 *
28
 *  This directive will return the size of the segment indicated
29
 *
30
 *  Input parameters:
31
 *    id         - region id
32
 *    segment    - segment address
33
 *    size       - pointer to segment size in bytes
34
 *
35
 *  Output parameters:
36
 *    size       - segment size in bytes filled in
37
 *    RTEMS_SUCCESSFUL - if successful
38
 *    error code - if unsuccessful
39
 */
40
 
41
rtems_status_code rtems_region_get_segment_size(
42
  Objects_Id         id,
43
  void              *segment,
44
  unsigned32        *size
45
)
46
{
47
  register Region_Control *the_region;
48
  Objects_Locations        location;
49
  Thread_Control          *executing;
50
 
51
  executing  = _Thread_Executing;
52
  the_region = _Region_Get( id, &location );
53
  switch ( location ) {
54
    case OBJECTS_REMOTE:        /* this error cannot be returned */
55
      return RTEMS_INTERNAL_ERROR;
56
 
57
    case OBJECTS_ERROR:
58
      return RTEMS_INVALID_ID;
59
 
60
    case OBJECTS_LOCAL:
61
 
62
      if ( _Heap_Size_of_user_area( &the_region->Memory, segment, size ) ) {
63
        _Thread_Enable_dispatch();
64
        return RTEMS_SUCCESSFUL;
65
      }
66
      _Thread_Enable_dispatch();
67
      return RTEMS_INVALID_ADDRESS;
68
  }
69
 
70
  return RTEMS_INTERNAL_ERROR;   /* unreached - only to remove warnings */
71
}

powered by: WebSVN 2.1.0

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