source: rtems/cpukit/itron/src/ref_tsk.c @ e49f9e6b

4.104.114.84.95
Last change on this file since e49f9e6b was e49f9e6b, checked in by Joel Sherrill <joel.sherrill@…>, on 09/04/03 at 18:54:02

2003-09-04 Joel Sherrill <joel@…>

  • include/itron.h, include/itronsys/eventflags.h, include/itronsys/fmempool.h, include/itronsys/intr.h, include/itronsys/mbox.h, include/itronsys/msgbuffer.h, include/itronsys/network.h, include/itronsys/port.h, include/itronsys/semaphore.h, include/itronsys/status.h, include/itronsys/sysmgmt.h, include/itronsys/task.h, include/itronsys/time.h, include/itronsys/types.h, include/itronsys/vmempool.h, include/rtems/itron/config.h, include/rtems/itron/eventflags.h, include/rtems/itron/fmempool.h, include/rtems/itron/intr.h, include/rtems/itron/itronapi.h, include/rtems/itron/mbox.h, include/rtems/itron/msgbuffer.h, include/rtems/itron/network.h, include/rtems/itron/object.h, include/rtems/itron/port.h, include/rtems/itron/semaphore.h, include/rtems/itron/sysmgmt.h, include/rtems/itron/task.h, include/rtems/itron/time.h, include/rtems/itron/vmempool.h, inline/rtems/itron/eventflags.inl, inline/rtems/itron/fmempool.inl, inline/rtems/itron/intr.inl, inline/rtems/itron/mbox.inl, inline/rtems/itron/msgbuffer.inl, inline/rtems/itron/network.inl, inline/rtems/itron/port.inl, inline/rtems/itron/semaphore.inl, inline/rtems/itron/sysmgmt.inl, inline/rtems/itron/task.inl, inline/rtems/itron/time.inl, inline/rtems/itron/vmempool.inl, macros/rtems/itron/eventflags.inl, macros/rtems/itron/fmempool.inl, macros/rtems/itron/intr.inl, macros/rtems/itron/mbox.inl, macros/rtems/itron/msgbuffer.inl, macros/rtems/itron/network.inl, macros/rtems/itron/port.inl, macros/rtems/itron/semaphore.inl, macros/rtems/itron/sysmgmt.inl, macros/rtems/itron/task.inl, macros/rtems/itron/time.inl, macros/rtems/itron/vmempool.inl, src/can_wup.c, src/chg_pri.c, src/cre_mbf.c, src/cre_mbx.c, src/cre_sem.c, src/cre_tsk.c, src/del_mbf.c, src/del_mbx.c, src/del_sem.c, src/del_tsk.c, src/dis_dsp.c, src/ena_dsp.c, src/eventflags.c, src/exd_tsk.c, src/ext_tsk.c, src/fmempool.c, src/frsm_tsk.c, src/get_tid.c, src/itronintr.c, src/itronsem.c, src/itrontime.c, src/mbox.c, src/mboxtranslatereturncode.c, src/msgbuffer.c, src/msgbuffertranslatereturncode.c, src/network.c, src/port.c, src/prcv_mbf.c, src/prcv_mbx.c, src/preq_sem.c, src/psnd_mbf.c, src/rcv_mbf.c, src/rcv_mbx.c, src/ref_mbf.c, src/ref_mbx.c, src/ref_sem.c, src/ref_tsk.c, src/rel_wai.c, src/rot_rdq.c, src/rsm_tsk.c, src/sig_sem.c, src/slp_tsk.c, src/snd_mbf.c, src/snd_mbx.c, src/sta_tsk.c, src/sus_tsk.c, src/sysmgmt.c, src/task.c, src/ter_tsk.c, src/trcv_mbf.c, src/trcv_mbx.c, src/tslp_tsk.c, src/tsnd_mbf.c, src/twai_sem.c, src/vmempool.c, src/wai_sem.c, src/wup_tsk.c: URL for license changed.
  • Property mode set to 100644
File size: 2.5 KB
Line 
1/*
2 *  COPYRIGHT (c) 1989-1999.
3 *  On-Line Applications Research Corporation (OAR).
4 *
5 *  The license and distribution terms for this file may be
6 *  found in the file LICENSE in this distribution or at
7 *  http://www.rtems.com/license/LICENSE.
8 *
9 *  $Id$
10 */
11
12#if HAVE_CONFIG_H
13#include "config.h"
14#endif
15
16#include <itron.h>
17
18#include <rtems/score/thread.h>
19#include <rtems/score/userext.h>
20#include <rtems/score/wkspace.h>
21#include <rtems/score/apiext.h>
22#include <rtems/score/sysstate.h>
23
24#include <rtems/itron/task.h>
25
26
27/*
28 *  ref_tsk - Reference Task Status
29 */
30
31ER ref_tsk(
32  T_RTSK *pk_rtsk,
33  ID      tskid
34)
35{
36  register Thread_Control *the_thread;
37  Objects_Locations        location;
38  Priority_Control         core_priority; 
39
40  if (!pk_rtsk)
41    return E_PAR;
42
43  the_thread = _ITRON_Task_Get( tskid, &location );
44  switch ( location ) {
45    case OBJECTS_REMOTE:
46    case OBJECTS_ERROR:
47      return _ITRON_Task_Clarify_get_id_error( tskid );
48 
49    case OBJECTS_LOCAL:
50
51      if ( location != OBJECTS_LOCAL )
52        return  _ITRON_Task_Clarify_get_id_error( tskid );
53
54      /*
55       * The following are extended functions [level X ].
56       * XXX - tskwait, wid, wupcnt, and tskatr are presently not implemented.
57       */
58
59      pk_rtsk->tskwait = 0;
60      pk_rtsk->wid     = 0;
61      pk_rtsk->wupcnt  = 0;
62      pk_rtsk->suscnt  = the_thread->suspend_count;
63      pk_rtsk->tskatr  = 0;       /* XXX - Not correctly implemented */
64      pk_rtsk->task    = (FP) the_thread->Start.entry_point;
65      core_priority    = the_thread->Start.initial_priority;
66      pk_rtsk->itskpri = _ITRON_Task_Core_to_Priority( core_priority );
67      pk_rtsk->stksz   = the_thread->Start.Initial_stack.size;
68
69      /*
70       * The following are required.
71       */
72
73      pk_rtsk->exinf   = NULL;   /* extended information */
74      pk_rtsk->tskpri  =
75                    _ITRON_Task_Core_to_Priority(the_thread->current_priority);
76
77      /*
78       * Mask in the tskstat information
79       * Convert the task state XXX double check this
80       */
81
82      pk_rtsk->tskstat = 0;
83      if ( the_thread == _Thread_Executing )
84        pk_rtsk->tskstat |= TTS_RUN;
85      if ( _States_Is_ready(the_thread->current_state) )
86        pk_rtsk->tskstat |= TTS_RDY; 
87      if ( _States_Is_dormant( the_thread->current_state) )
88        pk_rtsk->tskstat |= TTS_DMT;
89      if ( _States_Is_suspended(the_thread->current_state) )
90        pk_rtsk->tskstat |= TTS_SUS;
91      if ( _States_Is_blocked(the_thread->current_state) )
92        pk_rtsk->tskstat |= TTS_WAI;
93
94      break;
95  }
96
97  _ITRON_return_errorno( E_OK );
98
99}
100
101
102
103
Note: See TracBrowser for help on using the repository browser.