diff options
author | Joel Sherrill <joel.sherrill@OARcorp.com> | 2000-01-23 19:07:02 +0000 |
---|---|---|
committer | Joel Sherrill <joel.sherrill@OARcorp.com> | 2000-01-23 19:07:02 +0000 |
commit | 8d37343a5d3fef53422c7728a4e8b65bc4045bdb (patch) | |
tree | 188ddc956c8641a759dde204a312ab253baaa9de /c/src/exec | |
parent | Added rtems_task_variable_get from Eric Norum. (diff) | |
download | rtems-8d37343a5d3fef53422c7728a4e8b65bc4045bdb.tar.bz2 |
Directive rtems_task_variable_get() added by Eric Norum.
Diffstat (limited to 'c/src/exec')
-rw-r--r-- | c/src/exec/rtems/include/rtems/rtems/tasks.h | 12 | ||||
-rw-r--r-- | c/src/exec/rtems/src/Makefile.am | 3 | ||||
-rw-r--r-- | c/src/exec/rtems/src/taskvariableget.c | 72 |
3 files changed, 86 insertions, 1 deletions
diff --git a/c/src/exec/rtems/include/rtems/rtems/tasks.h b/c/src/exec/rtems/include/rtems/rtems/tasks.h index f9234e6e89..10938376e2 100644 --- a/c/src/exec/rtems/include/rtems/rtems/tasks.h +++ b/c/src/exec/rtems/include/rtems/rtems/tasks.h @@ -417,6 +417,18 @@ rtems_status_code rtems_task_variable_add( ); /* + * rtems_task_variable_get + * + * This directive gets the value of a task variable. + */ + +rtems_status_code rtems_task_variable_get( + rtems_id tid, + void **ptr, + void **result +); + +/* * rtems_task_variable_delete * * This directive removes a per task variable. diff --git a/c/src/exec/rtems/src/Makefile.am b/c/src/exec/rtems/src/Makefile.am index 1752e16e4c..ddf816a050 100644 --- a/c/src/exec/rtems/src/Makefile.am +++ b/c/src/exec/rtems/src/Makefile.am @@ -14,7 +14,8 @@ MP_C_FILES = eventmp.c mp.c msgmp.c partmp.c regionmp.c semmp.c signalmp.c \ TASK_C_FILES = tasks.c taskcreate.c taskdelete.c taskgetnote.c taskident.c \ taskinitusers.c taskissuspended.c taskmode.c taskrestart.c taskresume.c \ tasksetnote.c tasksetpriority.c taskstart.c tasksuspend.c \ - taskwakeafter.c taskwakewhen.c taskvariableadd.c taskvariabledelete.c + taskwakeafter.c taskwakewhen.c taskvariableadd.c taskvariabledelete.c \ + taskvariableget.c RATEMON_C_FILES = ratemon.c ratemoncancel.c ratemoncreate.c ratemondelete.c \ ratemongetstatus.c ratemonident.c ratemonperiod.c ratemontimeout.c diff --git a/c/src/exec/rtems/src/taskvariableget.c b/c/src/exec/rtems/src/taskvariableget.c new file mode 100644 index 0000000000..9beb0c4045 --- /dev/null +++ b/c/src/exec/rtems/src/taskvariableget.c @@ -0,0 +1,72 @@ +/* + * rtems_task_variable_get - Get a per-task variable + * + * + * 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$ + */ + +#include <rtems/system.h> +#include <rtems/rtems/tasks.h> +#include <rtems/score/wkspace.h> + +/* + * rtems_task_variable_get + * + * This directive gets the value of a task variable. + */ + +rtems_status_code rtems_task_variable_get( + rtems_id tid, + void **ptr, + void **result +) +{ + Thread_Control *the_thread; + Objects_Locations location; + rtems_task_variable_t *tvp; + + the_thread = _Thread_Get (tid, &location); + switch (location) { + case OBJECTS_REMOTE: +#if defined(RTEMS_MULTIPROCESSING) + _Thread_Dispatch(); + return RTEMS_ILLEGAL_ON_REMOTE_OBJECT; +#endif + + case OBJECTS_ERROR: + return RTEMS_INVALID_ID; + + default: + return RTEMS_INTERNAL_ERROR; + + case OBJECTS_LOCAL: + + /* + * Figure out if the variable is in this task's list. + */ + + tvp = the_thread->task_variables; + while (tvp) { + if (tvp->ptr == ptr) { + /* + * Should this return the current (i.e not the + * saved) value if `tid' is the current task? + */ + *result = tvp->var; + _Thread_Enable_dispatch(); + return RTEMS_SUCCESSFUL; + } + tvp = tvp->next; + } + _Thread_Enable_dispatch(); + return RTEMS_INVALID_ADDRESS; + } + return RTEMS_INTERNAL_ERROR; /* unreached - only to remove warnings */ +} |