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

Subversion Repositories or1k

[/] [or1k/] [trunk/] [rtems-20020807/] [cpukit/] [score/] [src/] [objectgetbyindex.c] - Blame information for rev 1780

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

Line No. Rev Author Line
1 1026 ivang
/*
2
 *  Object Handler
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
 *  objectgetbyindex.c,v 1.4 2000/09/20 13:27:01 joel Exp
13
 */
14
 
15
#include <rtems/system.h>
16
#include <rtems/score/address.h>
17
#include <rtems/score/chain.h>
18
#include <rtems/score/object.h>
19
#if defined(RTEMS_MULTIPROCESSING)
20
#include <rtems/score/objectmp.h>
21
#endif
22
#include <rtems/score/thread.h>
23
#include <rtems/score/wkspace.h>
24
#include <rtems/score/sysstate.h>
25
#include <rtems/score/isr.h>
26
 
27
/*PAGE
28
 *
29
 * _Objects_Get_by_index
30
 *
31
 * This routine sets the object pointer for the given
32
 * object id based on the given object information structure.
33
 *
34
 * Input parameters:
35
 *   information - pointer to entry in table for this class
36
 *   index       - object index to check for
37
 *   location    - address of where to store the location
38
 *
39
 * Output parameters:
40
 *   returns  - address of object if local
41
 *   location - one of the following:
42
 *                  OBJECTS_ERROR  - invalid object ID
43
 *                  OBJECTS_REMOTE - remote object
44
 *                  OBJECTS_LOCAL  - local object
45
 */
46
 
47
Objects_Control *_Objects_Get_by_index(
48
  Objects_Information *information,
49
  unsigned32           index,
50
  Objects_Locations   *location
51
)
52
{
53
  Objects_Control *the_object;
54
 
55
  if ( information->maximum >= index ) {
56
    _Thread_Disable_dispatch();
57
    the_object = information->local_table[ index ];
58
    if ( the_object ) {
59
      *location = OBJECTS_LOCAL;
60
      return( the_object );
61
    }
62
    _Thread_Enable_dispatch();
63
    *location = OBJECTS_ERROR;
64
    return( NULL );
65
  }
66
 
67
  /*
68
   *  With just an index, you can't access a remote object.
69
   */
70
 
71
  *location = OBJECTS_ERROR;
72
  return NULL;
73
}

powered by: WebSVN 2.1.0

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