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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [rtos/] [rtems/] [c/] [src/] [exec/] [score/] [src/] [coremutex.c] - Blame information for rev 778

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


/*
 *  Mutex Handler
 *
 *  DESCRIPTION:
 *
 *  This package is the implementation of the Mutex Handler.
 *  This handler provides synchronization and mutual exclusion capabilities.
 *
 *  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: coremutex.c,v 1.2 2001-09-27 11:59:34 chris Exp $
 */
 
#include <rtems/system.h>
#include <rtems/score/isr.h>
#include <rtems/score/coremutex.h>
#include <rtems/score/states.h>
#include <rtems/score/thread.h>
#include <rtems/score/threadq.h>
 
/*PAGE
 *
 *  _CORE_mutex_Initialize
 *
 *  This routine initializes a mutex at create time and set the control
 *  structure according to the values passed.
 *
 *  Input parameters:
 *    the_mutex             - the mutex control block to initialize
 *    the_class             - the API class of the object
 *    the_mutex_attributes  - the mutex attributes specified at create time
 *    initial_lock          - mutex initial lock or unlocked status
 *    proxy_extract_callout - MP specific extract callout
 *
 *  Output parameters:  NONE
 */
 
void _CORE_mutex_Initialize(
  CORE_mutex_Control           *the_mutex,
  Objects_Classes               the_class,
  CORE_mutex_Attributes        *the_mutex_attributes,
  unsigned32                    initial_lock,
  Thread_queue_Extract_callout  proxy_extract_callout
)
{
 
/* Add this to the RTEMS environment later ?????????
  rtems_assert( initial_lock == CORE_MUTEX_LOCKED ||
                initial_lock == CORE_MUTEX_UNLOCKED );
 */
 
  the_mutex->Attributes = *the_mutex_attributes;
  the_mutex->lock       = initial_lock;
 
#if 0
  if ( !the_mutex_attributes->only_owner_release &&
       the_mutex_attributes->nesting_allowed ) {
    _Internal_error_Occurred(
      INTERNAL_ERROR_CORE,
      TRUE,
      INTERNAL_ERROR_BAD_ATTRIBUTES
    );
  }
#endif
 
  if ( initial_lock == CORE_MUTEX_LOCKED ) {
    the_mutex->nest_count = 1;
    the_mutex->holder     = _Thread_Executing;
    the_mutex->holder_id  = _Thread_Executing->Object.id;
    _Thread_Executing->resource_count++;
  } else {
    the_mutex->nest_count = 0;
    the_mutex->holder     = NULL;
    the_mutex->holder_id  = 0;
  }
 
  _Thread_queue_Initialize(
    &the_mutex->Wait_queue,
    the_class,
    _CORE_mutex_Is_fifo( the_mutex_attributes ) ?
      THREAD_QUEUE_DISCIPLINE_FIFO : THREAD_QUEUE_DISCIPLINE_PRIORITY,
    STATES_WAITING_FOR_MUTEX,
    proxy_extract_callout,
    CORE_MUTEX_TIMEOUT
  );
}
 

Line No.	Rev	Author	Line
1	30	unneback	`/*`
2			`* Mutex Handler`
3			`*`
4			`* DESCRIPTION:`
5			`*`
6			`* This package is the implementation of the Mutex Handler.`
7			`* This handler provides synchronization and mutual exclusion capabilities.`
8			`*`
9			`* COPYRIGHT (c) 1989-1999.`
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.OARcorp.com/rtems/license.html.`
15			`*`
16			`* $Id: coremutex.c,v 1.2 2001-09-27 11:59:34 chris Exp $`
17			`*/`
18
19			`#include <rtems/system.h>`
20			`#include <rtems/score/isr.h>`
21			`#include <rtems/score/coremutex.h>`
22			`#include <rtems/score/states.h>`
23			`#include <rtems/score/thread.h>`
24			`#include <rtems/score/threadq.h>`
25
26			`/*PAGE`
27			`*`
28			`* _CORE_mutex_Initialize`
29			`*`
30			`* This routine initializes a mutex at create time and set the control`
31			`* structure according to the values passed.`
32			`*`
33			`* Input parameters:`
34			`* the_mutex - the mutex control block to initialize`
35			`* the_class - the API class of the object`
36			`* the_mutex_attributes - the mutex attributes specified at create time`
37			`* initial_lock - mutex initial lock or unlocked status`
38			`* proxy_extract_callout - MP specific extract callout`
39			`*`
40			`* Output parameters: NONE`
41			`*/`
42
43			`void _CORE_mutex_Initialize(`
44			`CORE_mutex_Control *the_mutex,`
45			`Objects_Classes the_class,`
46			`CORE_mutex_Attributes *the_mutex_attributes,`
47			`unsigned32 initial_lock,`
48			`Thread_queue_Extract_callout proxy_extract_callout`
49			`)`
50			`{`
51
52			`/* Add this to the RTEMS environment later ?????????`
53			`rtems_assert( initial_lock == CORE_MUTEX_LOCKED \|\|`
54			`initial_lock == CORE_MUTEX_UNLOCKED );`
55			`*/`
56
57			`the_mutex->Attributes = *the_mutex_attributes;`
58			`the_mutex->lock = initial_lock;`
59
60			`#if 0`
61			`if ( !the_mutex_attributes->only_owner_release &&`
62			`the_mutex_attributes->nesting_allowed ) {`
63			`_Internal_error_Occurred(`
64			`INTERNAL_ERROR_CORE,`
65			`TRUE,`
66			`INTERNAL_ERROR_BAD_ATTRIBUTES`
67			`);`
68			`}`
69			`#endif`
70
71			`if ( initial_lock == CORE_MUTEX_LOCKED ) {`
72			`the_mutex->nest_count = 1;`
73			`the_mutex->holder = _Thread_Executing;`
74			`the_mutex->holder_id = _Thread_Executing->Object.id;`
75			`_Thread_Executing->resource_count++;`
76			`} else {`
77			`the_mutex->nest_count = 0;`
78			`the_mutex->holder = NULL;`
79			`the_mutex->holder_id = 0;`
80			`}`
81
82			`_Thread_queue_Initialize(`
83			`&the_mutex->Wait_queue,`
84			`the_class,`
85			`_CORE_mutex_Is_fifo( the_mutex_attributes ) ?`
86			`THREAD_QUEUE_DISCIPLINE_FIFO : THREAD_QUEUE_DISCIPLINE_PRIORITY,`
87			`STATES_WAITING_FOR_MUTEX,`
88			`proxy_extract_callout,`
89			`CORE_MUTEX_TIMEOUT`
90			`);`
91			`}`
92

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [rtos/] [rtems/] [c/] [src/] [exec/] [score/] [src/] [coremutex.c] - Blame information for rev 778