mirror of
https://gitlab.rtems.org/rtems/rtos/rtems.git
synced 2025-11-16 12:34:45 +00:00
added missing file libblock/src/show_bdbuf.c
This commit is contained in:
@@ -1,3 +1,8 @@
|
||||
2007-01-10 Thomas Doerfler <Thomas.Doerfler@embedded-brains.de>
|
||||
|
||||
* libblock/src/show_bdbuf.c:
|
||||
added missing file
|
||||
|
||||
2007-01-02 Ralf Corsépius <ralf.corsepius@rtems.org>
|
||||
|
||||
* posix/include/aio.h: s/aoi_lio_opcode/aio_lio_opcode/
|
||||
|
||||
904
cpukit/libblock/src/show_bdbuf.c
Normal file
904
cpukit/libblock/src/show_bdbuf.c
Normal file
@@ -0,0 +1,904 @@
|
||||
/*===============================================================*\
|
||||
| Project: RTEMS bdbuf inspector |
|
||||
+-----------------------------------------------------------------+
|
||||
| File: show_bdbuf.c
|
||||
+-----------------------------------------------------------------+
|
||||
| Copyright (c) 2005 |
|
||||
| Embedded Brains GmbH |
|
||||
| Obere Lagerstr. 30 |
|
||||
| D-82178 Puchheim |
|
||||
| Germany |
|
||||
| rtems@embedded-brains.de |
|
||||
+-----------------------------------------------------------------+
|
||||
| The license and distribution terms for this file may be |
|
||||
| found in the file LICENSE in this distribution or at |
|
||||
| |
|
||||
| http://www.rtems.com/license/LICENSE. |
|
||||
| |
|
||||
+-----------------------------------------------------------------+
|
||||
| this file contains functions to enable the monitor |
|
||||
| to show bdbuf information |
|
||||
| |
|
||||
| XXX!!! ATTETION!!! XXX!!! |
|
||||
| |
|
||||
| This module inspects the bdbuf data structures, |
|
||||
| assuming they are static, but in fact they are used very |
|
||||
| dynamically. Therefore the results show MAY BE INCORRECT in |
|
||||
| some cases. And, to cure this a bit, this module may block |
|
||||
| preemption for a rather long time and therefore it may |
|
||||
| BREAK THE REALTIME BEHAVIOUR OF YOUR SYSTEM (when in use) |
|
||||
+-----------------------------------------------------------------+
|
||||
| date history ID |
|
||||
| ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ |
|
||||
| 26.09.06 creation doe |
|
||||
|*****************************************************************|
|
||||
\*===============================================================*/
|
||||
#include <rtems.h>
|
||||
#include <rtems/monitor.h>
|
||||
#include <rtems/bdbuf.h>
|
||||
#include <string.h>
|
||||
#include <ctype.h>
|
||||
#include <stdio.h>
|
||||
#include <rtems/libio.h>
|
||||
|
||||
|
||||
typedef struct {
|
||||
boolean bdbuf_modified;
|
||||
boolean bdbuf_in_progress;
|
||||
boolean bdbuf_actual;
|
||||
boolean bdbuf_used;
|
||||
boolean bdbuf_all;
|
||||
rtems_bdpool_id pool_id;
|
||||
} show_bdbuf_filter_t;
|
||||
|
||||
typedef struct {
|
||||
boolean show_all;
|
||||
boolean show_node_chain;
|
||||
boolean show_dev;
|
||||
boolean show_blocknum;
|
||||
boolean show_error;
|
||||
boolean show_state;
|
||||
boolean show_use_count;
|
||||
boolean show_pool_id;
|
||||
boolean show_sema;
|
||||
} show_bdbuf_selector_t;
|
||||
|
||||
typedef enum {bdbuf_chain_ident_none,
|
||||
bdbuf_chain_ident_free,
|
||||
bdbuf_chain_ident_lru,
|
||||
bdbuf_chain_ident_mod} bdbuf_chain_identifier_t;
|
||||
|
||||
typedef struct {
|
||||
rtems_bdpool_id pool_id;
|
||||
int index;
|
||||
bdbuf_chain_identifier_t in_chain;
|
||||
dev_t dev;
|
||||
blkdev_bnum blknum;
|
||||
rtems_status_code status;
|
||||
int error;
|
||||
boolean modified;
|
||||
boolean in_progress;
|
||||
boolean actual;
|
||||
int use_count;
|
||||
const CORE_mutex_Control *sema;
|
||||
} show_bdbuf_bdbuf_info_t;
|
||||
|
||||
typedef rtems_mode preemption_key_t;
|
||||
#define DISABLE_PREEMPTION(key) \
|
||||
do { \
|
||||
rtems_task_mode(RTEMS_NO_PREEMPT, RTEMS_PREEMPT_MASK, &(key)); \
|
||||
} while (0)
|
||||
|
||||
#define ENABLE_PREEMPTION(key) \
|
||||
do { \
|
||||
rtems_mode temp; \
|
||||
rtems_task_mode((key), RTEMS_PREEMPT_MASK, &temp); \
|
||||
} while (0)
|
||||
|
||||
/*=========================================================================*\
|
||||
| Function: |
|
||||
\*-------------------------------------------------------------------------*/
|
||||
rtems_status_code rtems_bdbuf_show_follow_chain_node_to_head
|
||||
(
|
||||
/*-------------------------------------------------------------------------*\
|
||||
| Purpose: |
|
||||
| follow a given chain to its head |
|
||||
| XXX: this is executed with preemption disabled |
|
||||
+---------------------------------------------------------------------------+
|
||||
| Input Parameters: |
|
||||
\*-------------------------------------------------------------------------*/
|
||||
const Chain_Node *the_node, /* input: node to track to its head */
|
||||
Chain_Control **the_head /* storage for pointer to chain head */
|
||||
)
|
||||
/*-------------------------------------------------------------------------*\
|
||||
| Return Value: |
|
||||
| rtems_status_code |
|
||||
\*=========================================================================*/
|
||||
{
|
||||
rtems_status_code rc = RTEMS_SUCCESSFUL;
|
||||
preemption_key_t preempt_key;
|
||||
boolean preempt_disabled = FALSE;
|
||||
/*
|
||||
* disable preemption
|
||||
*/
|
||||
if (rc == RTEMS_SUCCESSFUL) {
|
||||
DISABLE_PREEMPTION(preempt_key);
|
||||
}
|
||||
/*
|
||||
* follow node to its head
|
||||
* XXX: this is highly dependent on the chain implementation
|
||||
* in score/src/chain.c and friends
|
||||
*/
|
||||
while (the_node->previous != NULL) {
|
||||
the_node = the_node->previous;
|
||||
}
|
||||
/*
|
||||
* reenable preemption, if disabled
|
||||
*/
|
||||
if (preempt_disabled) {
|
||||
ENABLE_PREEMPTION(preempt_key);
|
||||
}
|
||||
/*
|
||||
* XXX: this depends n the chain implementation in
|
||||
* score/include/rtems/score/chain.h:
|
||||
* Chain_Control is overlayed by two Cohain_Nodes
|
||||
*/
|
||||
*the_head = (Chain_Control *)the_node;
|
||||
|
||||
return rc;
|
||||
}
|
||||
|
||||
/*=========================================================================*\
|
||||
| Function: |
|
||||
\*-------------------------------------------------------------------------*/
|
||||
rtems_status_code rtems_bdbuf_show_determine_chain_of_bdbuf
|
||||
(
|
||||
/*-------------------------------------------------------------------------*\
|
||||
| Purpose: |
|
||||
| find out, which chain this bdbuf is linked in |
|
||||
+---------------------------------------------------------------------------+
|
||||
| Input Parameters: |
|
||||
\*-------------------------------------------------------------------------*/
|
||||
const bdbuf_buffer *the_bdbuf, /* this is the bdbuf structure */
|
||||
const bdbuf_pool *curr_pool, /* the pool this buffer belongs to */
|
||||
bdbuf_chain_identifier_t *chn_ident /* result: identifier for chain */
|
||||
)
|
||||
/*-------------------------------------------------------------------------*\
|
||||
| Return Value: |
|
||||
| rtems_status_code |
|
||||
\*=========================================================================*/
|
||||
{
|
||||
rtems_status_code rc = RTEMS_SUCCESSFUL;
|
||||
Chain_Control *the_chain_control;
|
||||
|
||||
|
||||
*chn_ident = bdbuf_chain_ident_none;
|
||||
if (rc == RTEMS_SUCCESSFUL) {
|
||||
rc = rtems_bdbuf_show_follow_chain_node_to_head(&(the_bdbuf->link),
|
||||
&(the_chain_control));
|
||||
}
|
||||
if (rc == RTEMS_SUCCESSFUL) {
|
||||
if (the_chain_control == &(curr_pool->free)) {
|
||||
*chn_ident = bdbuf_chain_ident_free;
|
||||
}
|
||||
else if (the_chain_control == &(curr_pool->lru)) {
|
||||
*chn_ident = bdbuf_chain_ident_lru;
|
||||
}
|
||||
else if (the_chain_control == &(rtems_bdbuf_ctx.mod)) {
|
||||
*chn_ident = bdbuf_chain_ident_mod;
|
||||
}
|
||||
}
|
||||
return rc;
|
||||
}
|
||||
|
||||
/*=========================================================================*\
|
||||
| Function: |
|
||||
\*-------------------------------------------------------------------------*/
|
||||
rtems_status_code rtems_bdbuf_show_getargs
|
||||
(
|
||||
/*-------------------------------------------------------------------------*\
|
||||
| Purpose: |
|
||||
| analyze cmd arguments |
|
||||
+---------------------------------------------------------------------------+
|
||||
| Input Parameters: |
|
||||
\*-------------------------------------------------------------------------*/
|
||||
int argc,
|
||||
char **argv,
|
||||
show_bdbuf_filter_t *filter,
|
||||
show_bdbuf_selector_t *selector
|
||||
)
|
||||
/*-------------------------------------------------------------------------*\
|
||||
| Return Value: |
|
||||
| rtems_status_code |
|
||||
\*=========================================================================*/
|
||||
{
|
||||
rtems_status_code sc = RTEMS_SUCCESSFUL;
|
||||
int arg_error = 0;
|
||||
int i;
|
||||
char *tmp_ptr;
|
||||
int nm_argc = 0;
|
||||
/*
|
||||
* set filter and selector to default
|
||||
*/
|
||||
memset(filter,0,sizeof(*filter));
|
||||
filter->bdbuf_all = TRUE;
|
||||
memset(selector,0,sizeof(*selector));
|
||||
selector->show_all = TRUE;
|
||||
|
||||
/*
|
||||
* scan arguments
|
||||
*/
|
||||
for (i = 1;
|
||||
(i < argc) && (arg_error == 0);
|
||||
i++) {
|
||||
if (argv[i][0] == '-') {
|
||||
/*
|
||||
* modifier arguments
|
||||
*/
|
||||
switch(tolower(argv[i][1])) {
|
||||
/*
|
||||
* selection, which bdbufs to show
|
||||
*/
|
||||
case 'm': /* only show bdbufs modified */
|
||||
filter->bdbuf_modified = TRUE ;
|
||||
filter->bdbuf_all = FALSE;
|
||||
break;
|
||||
case 'i': /* only show bdbufs in progress*/
|
||||
filter->bdbuf_in_progress = TRUE ;
|
||||
filter->bdbuf_all = FALSE;
|
||||
break;
|
||||
case 'v': /* only show bdbufs, which have valid data*/
|
||||
filter->bdbuf_actual = TRUE ;
|
||||
filter->bdbuf_all = FALSE;
|
||||
break;
|
||||
case 'u': /* only show bdbufs, which are in use */
|
||||
filter->bdbuf_used = TRUE ;
|
||||
filter->bdbuf_all = FALSE;
|
||||
break;
|
||||
case 'p': /* only show bdbufs, which belong to pool <n> */
|
||||
filter->pool_id = strtol(argv[i]+2,&tmp_ptr,0);
|
||||
if (tmp_ptr == argv[i]+2) { /* no conversion performed... */
|
||||
arg_error = i;
|
||||
}
|
||||
filter->bdbuf_all = FALSE;
|
||||
break;
|
||||
/*
|
||||
* selection, what fields to show
|
||||
*/
|
||||
case 'n': /* show bdbuf node_chain */
|
||||
selector->show_node_chain = TRUE ;
|
||||
selector->show_all = FALSE;
|
||||
break;
|
||||
case 'd': /* show device */
|
||||
selector->show_dev = TRUE ;
|
||||
selector->show_all = FALSE;
|
||||
break;
|
||||
case 'b': /* show blocknum */
|
||||
selector->show_blocknum = TRUE ;
|
||||
selector->show_all = FALSE;
|
||||
break;
|
||||
case 'e': /* show bdbuf error status */
|
||||
selector->show_error = TRUE ;
|
||||
selector->show_all = FALSE;
|
||||
break;
|
||||
case 's': /* show bdbuf state */
|
||||
selector->show_state = TRUE ;
|
||||
selector->show_all = FALSE;
|
||||
break;
|
||||
case 'c': /* show bdbuf use count */
|
||||
selector->show_use_count = TRUE ;
|
||||
selector->show_all = FALSE;
|
||||
break;
|
||||
case 'l': /* show bdbuf pool id */
|
||||
selector->show_pool_id = TRUE ;
|
||||
selector->show_all = FALSE;
|
||||
break;
|
||||
case 't': /* show bdbuf transfer sema */
|
||||
selector->show_sema = TRUE ;
|
||||
break;
|
||||
default:
|
||||
arg_error = i;
|
||||
break;
|
||||
}
|
||||
}
|
||||
else {
|
||||
/*
|
||||
* non-modifier arguments
|
||||
*/
|
||||
switch(++nm_argc) {
|
||||
default: /* no further arguments defined */
|
||||
arg_error = i;
|
||||
break;
|
||||
}
|
||||
}
|
||||
}
|
||||
if (arg_error) {
|
||||
printf("%s: unknown argument %s\n",argv[0],argv[arg_error]);
|
||||
sc = RTEMS_NOT_DEFINED;
|
||||
}
|
||||
return sc;
|
||||
}
|
||||
|
||||
/*=========================================================================*\
|
||||
| Function: |
|
||||
\*-------------------------------------------------------------------------*/
|
||||
rtems_status_code rtems_bdbuf_show_get_bufpool
|
||||
(
|
||||
/*-------------------------------------------------------------------------*\
|
||||
| Purpose: |
|
||||
| get buffer pool information |
|
||||
| XXX: this should be coupled closer to the bdbuf.c module |
|
||||
+---------------------------------------------------------------------------+
|
||||
| Input Parameters: |
|
||||
\*-------------------------------------------------------------------------*/
|
||||
struct bdbuf_pool **pool_base_pptr,
|
||||
int *pool_cnt_ptr
|
||||
)
|
||||
/*-------------------------------------------------------------------------*\
|
||||
| Return Value: |
|
||||
| rtems_status_code |
|
||||
\*=========================================================================*/
|
||||
{
|
||||
rtems_status_code rc = RTEMS_SUCCESSFUL;
|
||||
#if 0
|
||||
rtems_status_code pool_rc = RTEMS_SUCCESSFUL;
|
||||
struct bdbuf_pool *curr_pool,*pool_base, *pool_top;
|
||||
int pool_cnt;
|
||||
int pool_probe_size;
|
||||
/*
|
||||
* get first buffer pool
|
||||
* XXX: this is highly dependent on how pools are defined
|
||||
* and maintained in bdbuf.c
|
||||
*/
|
||||
if (rc == RTEMS_SUCCESSFUL) {
|
||||
/*
|
||||
* try all possible pool sizes, get highest/lowest pool address
|
||||
*/
|
||||
pool_base = NULL;
|
||||
pool_top = NULL;
|
||||
curr_pool = NULL;
|
||||
for (pool_probe_size = 1;
|
||||
pool_probe_size < (INT_MAX>>1) && (pool_rc == RTEMS_SUCCESSFUL);
|
||||
pool_probe_size <<= 1) {
|
||||
pool_rc = rtems_bdbuf_find_pool(pool_probe_size,&curr_pool);
|
||||
if (pool_rc == RTEMS_SUCCESSFUL) {
|
||||
if (pool_base > curr_pool) {
|
||||
pool_base = curr_pool;
|
||||
}
|
||||
if (pool_top < curr_pool) {
|
||||
pool_top = curr_pool;
|
||||
}
|
||||
}
|
||||
}
|
||||
if (pool_base == NULL) {
|
||||
rc = RTEMS_UNSATISFIED;
|
||||
}
|
||||
else {
|
||||
pool_cnt = (pool_top - pool_base) + 1;
|
||||
}
|
||||
}
|
||||
if (rc == RTEMS_SUCCESSFUL) {
|
||||
*pool_base_pptr = pool_base;
|
||||
*pool_cnt_ptr = pool_cnt;
|
||||
}
|
||||
#else
|
||||
if (rc == RTEMS_SUCCESSFUL) {
|
||||
*pool_base_pptr = rtems_bdbuf_ctx.pool;
|
||||
*pool_cnt_ptr = rtems_bdbuf_ctx.npools;
|
||||
}
|
||||
#endif
|
||||
return rc;
|
||||
}
|
||||
|
||||
/*=========================================================================*\
|
||||
| Function: |
|
||||
\*-------------------------------------------------------------------------*/
|
||||
rtems_status_code rtems_bdbuf_show_pool_header
|
||||
(
|
||||
/*-------------------------------------------------------------------------*\
|
||||
| Purpose: |
|
||||
| print buffer pool information |
|
||||
+---------------------------------------------------------------------------+
|
||||
| Input Parameters: |
|
||||
\*-------------------------------------------------------------------------*/
|
||||
int pool_idx,
|
||||
bdbuf_pool *pool_ptr
|
||||
)
|
||||
/*-------------------------------------------------------------------------*\
|
||||
| Return Value: |
|
||||
| rtems_status_code |
|
||||
\*=========================================================================*/
|
||||
{
|
||||
|
||||
rtems_status_code rc = RTEMS_SUCCESSFUL;
|
||||
|
||||
if (rc == RTEMS_SUCCESSFUL) {
|
||||
printf("------------------------------------------------------------------------------\n");
|
||||
printf(" pool #%03d: blksize=%5u nblks=%5u buf_mem=0x%08x bdbuf_mem=0x%08x\n",
|
||||
pool_idx,
|
||||
pool_ptr->blksize,
|
||||
pool_ptr->nblks,
|
||||
(uint32_t)(pool_ptr->mallocd_bufs),
|
||||
(uint32_t)(pool_ptr->bdbufs));
|
||||
printf("------------------------------------------------------------------------------\n");
|
||||
}
|
||||
return rc;
|
||||
}
|
||||
|
||||
/*=========================================================================*\
|
||||
| Function: |
|
||||
\*-------------------------------------------------------------------------*/
|
||||
rtems_status_code rtems_show_bdbuf_get_bdbuf_info
|
||||
(
|
||||
/*-------------------------------------------------------------------------*\
|
||||
| Purpose: |
|
||||
| get buffer pool information |
|
||||
| XXX: this should be coupled closer to the bdbuf.c module |
|
||||
+---------------------------------------------------------------------------+
|
||||
| Input Parameters: |
|
||||
\*-------------------------------------------------------------------------*/
|
||||
const bdbuf_buffer *the_bdbuf, /* this is the bdbuf structure */
|
||||
int bdbuf_idx, /* index of bdbuf */
|
||||
const bdbuf_pool *curr_pool, /* the pool this buffer belongs to */
|
||||
show_bdbuf_bdbuf_info_t *bdbuf_info /* struct to store info of bdbuf */
|
||||
)
|
||||
/*-------------------------------------------------------------------------*\
|
||||
| Return Value: |
|
||||
| rtems_status_code |
|
||||
\*=========================================================================*/
|
||||
{
|
||||
|
||||
rtems_status_code rc = RTEMS_SUCCESSFUL;
|
||||
|
||||
/*
|
||||
* determine the chain we are in
|
||||
*/
|
||||
if (rc == RTEMS_SUCCESSFUL) {
|
||||
rc = rtems_bdbuf_show_determine_chain_of_bdbuf(the_bdbuf,curr_pool,
|
||||
&(bdbuf_info->in_chain));
|
||||
if (rc != RTEMS_SUCCESSFUL) {
|
||||
bdbuf_info->in_chain = bdbuf_chain_ident_none;
|
||||
rc = RTEMS_SUCCESSFUL;
|
||||
}
|
||||
}
|
||||
|
||||
if (rc == RTEMS_SUCCESSFUL) {
|
||||
bdbuf_info->index = bdbuf_idx;
|
||||
bdbuf_info->dev = the_bdbuf->dev;
|
||||
bdbuf_info->blknum = the_bdbuf->block;
|
||||
bdbuf_info->status = the_bdbuf->status;
|
||||
bdbuf_info->error = the_bdbuf->error;
|
||||
bdbuf_info->modified = the_bdbuf->modified;
|
||||
bdbuf_info->in_progress = the_bdbuf->in_progress;
|
||||
bdbuf_info->actual = the_bdbuf->actual;
|
||||
bdbuf_info->use_count = the_bdbuf->use_count;
|
||||
bdbuf_info->sema = &(the_bdbuf->transfer_sema);
|
||||
bdbuf_info->pool_id = the_bdbuf->pool;
|
||||
}
|
||||
return rc;
|
||||
}
|
||||
|
||||
/*=========================================================================*\
|
||||
| Function: |
|
||||
\*-------------------------------------------------------------------------*/
|
||||
rtems_status_code rtems_show_bdbuf_match_filter
|
||||
(
|
||||
/*-------------------------------------------------------------------------*\
|
||||
| Purpose: |
|
||||
| match bdbuf info with given filter |
|
||||
+---------------------------------------------------------------------------+
|
||||
| Input Parameters: |
|
||||
\*-------------------------------------------------------------------------*/
|
||||
const show_bdbuf_bdbuf_info_t *bdbuf_info, /* struct to store info of bdbuf */
|
||||
const show_bdbuf_filter_t *filter,
|
||||
boolean *is_match
|
||||
)
|
||||
/*-------------------------------------------------------------------------*\
|
||||
| Return Value: |
|
||||
| rtems_status_code |
|
||||
\*=========================================================================*/
|
||||
{
|
||||
|
||||
rtems_status_code rc = RTEMS_SUCCESSFUL;
|
||||
boolean unmatch = FALSE;
|
||||
|
||||
if (rc == RTEMS_SUCCESSFUL) {
|
||||
if (filter->bdbuf_all) {
|
||||
unmatch = FALSE;
|
||||
}
|
||||
else {
|
||||
unmatch = ((filter->bdbuf_modified && !bdbuf_info->modified) ||
|
||||
(filter->bdbuf_in_progress && !bdbuf_info->in_progress) ||
|
||||
(filter->bdbuf_actual && !bdbuf_info->actual) ||
|
||||
(filter->bdbuf_used && !(bdbuf_info->use_count > 0)));
|
||||
|
||||
}
|
||||
*is_match = !unmatch;
|
||||
}
|
||||
return rc;
|
||||
}
|
||||
|
||||
/*=========================================================================*\
|
||||
| Function: |
|
||||
\*-------------------------------------------------------------------------*/
|
||||
rtems_status_code rtems_show_bdbuf_print_wait_chain
|
||||
(
|
||||
/*-------------------------------------------------------------------------*\
|
||||
| Purpose: |
|
||||
| list tasks waiting in "transfer_sema" chain |
|
||||
+---------------------------------------------------------------------------+
|
||||
| Input Parameters: |
|
||||
\*-------------------------------------------------------------------------*/
|
||||
bdbuf_buffer *the_bdbuf /* this is the bdbuf structure */
|
||||
)
|
||||
/*-------------------------------------------------------------------------*\
|
||||
| Return Value: |
|
||||
| rtems_status_code |
|
||||
\*=========================================================================*/
|
||||
{
|
||||
rtems_status_code rc = RTEMS_SUCCESSFUL;
|
||||
Chain_Control *the_chain_head;
|
||||
const Chain_Node *the_chain_node;
|
||||
int thread_cnt = 0;
|
||||
const Thread_Control *the_thread;
|
||||
Objects_Id thread_id;
|
||||
Objects_Name thread_name;
|
||||
uint32_t thread_name_nonstring;
|
||||
/*
|
||||
* get head of (fifo) wait chain
|
||||
*/
|
||||
if (rc == RTEMS_SUCCESSFUL) {
|
||||
the_chain_head = &(the_bdbuf->transfer_sema.Wait_queue.Queues.Fifo);
|
||||
the_chain_node = the_chain_head->first;
|
||||
}
|
||||
/*
|
||||
* walk through thread chain
|
||||
*/
|
||||
while ((rc == RTEMS_SUCCESSFUL) &&
|
||||
(the_chain_node != _Chain_Tail( the_chain_head ))) {
|
||||
thread_cnt++;
|
||||
the_thread = (const Thread_Control *)the_chain_node;
|
||||
|
||||
thread_id = the_thread->Object.id;
|
||||
thread_name = the_thread->Object.name;
|
||||
thread_name_nonstring = (uint32_t)thread_name;
|
||||
printf("%20s %3d (0x%08x) %c%c%c%c\n",
|
||||
((thread_cnt == 1) ? "Threads waiting:" : ""),
|
||||
thread_cnt,thread_id,
|
||||
(thread_name_nonstring >> 24) & 0xff,
|
||||
(thread_name_nonstring >> 16) & 0xff,
|
||||
(thread_name_nonstring >> 8) & 0xff,
|
||||
(thread_name_nonstring >> 0) & 0xff);
|
||||
|
||||
the_chain_node = the_chain_node->next;
|
||||
}
|
||||
|
||||
return rc;
|
||||
}
|
||||
|
||||
/*=========================================================================*\
|
||||
| Function: |
|
||||
\*-------------------------------------------------------------------------*/
|
||||
rtems_status_code rtems_show_bdbuf_print
|
||||
(
|
||||
/*-------------------------------------------------------------------------*\
|
||||
| Purpose: |
|
||||
| print requested bdbuffer information |
|
||||
+---------------------------------------------------------------------------+
|
||||
| Input Parameters: |
|
||||
\*-------------------------------------------------------------------------*/
|
||||
const show_bdbuf_bdbuf_info_t *bdbuf_info, /* info of bdbuf */
|
||||
show_bdbuf_selector_t * selector, /* selector, what to show */
|
||||
boolean print_header /* TRUE: print header, not info */
|
||||
)
|
||||
/*-------------------------------------------------------------------------*\
|
||||
| Return Value: |
|
||||
| rtems_status_code |
|
||||
\*=========================================================================*/
|
||||
{
|
||||
|
||||
rtems_status_code rc = RTEMS_SUCCESSFUL;
|
||||
|
||||
/*
|
||||
* 6 chars: print index of buffer
|
||||
*/
|
||||
if (rc == RTEMS_SUCCESSFUL) {
|
||||
if (print_header) {
|
||||
printf("INDEX ");
|
||||
}
|
||||
else {
|
||||
printf("%5u ",bdbuf_info->index);
|
||||
}
|
||||
}
|
||||
/*
|
||||
* 3 chars: print info about the pool id of this buffer
|
||||
*/
|
||||
if ((rc == RTEMS_SUCCESSFUL) &&
|
||||
((selector->show_all) ||
|
||||
(selector->show_use_count))) {
|
||||
if (print_header) {
|
||||
printf("PL ");
|
||||
}
|
||||
else {
|
||||
printf("%2u ",bdbuf_info->pool_id);
|
||||
}
|
||||
}
|
||||
|
||||
/*
|
||||
* 4 chars: print info about chain (lru/free/mod) of this buffer
|
||||
*/
|
||||
if ((rc == RTEMS_SUCCESSFUL) &&
|
||||
((selector->show_all) ||
|
||||
(selector->show_node_chain))) {
|
||||
if (print_header) {
|
||||
printf("CHN ");
|
||||
}
|
||||
else {
|
||||
printf("%3s ",
|
||||
((bdbuf_info->in_chain == bdbuf_chain_ident_free) ? "FRE"
|
||||
: (bdbuf_info->in_chain == bdbuf_chain_ident_lru) ? "LRU"
|
||||
: (bdbuf_info->in_chain == bdbuf_chain_ident_mod) ? "MOD"
|
||||
: "???"));
|
||||
}
|
||||
}
|
||||
|
||||
/*
|
||||
* 7 chars: print info about device of this buffer
|
||||
*/
|
||||
if ((rc == RTEMS_SUCCESSFUL) &&
|
||||
((selector->show_all) ||
|
||||
(selector->show_dev))) {
|
||||
if (print_header) {
|
||||
printf("DEVICE ");
|
||||
}
|
||||
else {
|
||||
printf("%3u,%2u ",
|
||||
((bdbuf_info->dev == -1)
|
||||
? 0 : rtems_filesystem_dev_major_t(bdbuf_info->dev)),
|
||||
((bdbuf_info->dev == -1)
|
||||
? 0 : rtems_filesystem_dev_minor_t(bdbuf_info->dev)));
|
||||
}
|
||||
}
|
||||
|
||||
/*
|
||||
* 7 chars: print info about block number of this buffer
|
||||
*/
|
||||
if ((rc == RTEMS_SUCCESSFUL) &&
|
||||
((selector->show_all) ||
|
||||
(selector->show_blocknum))) {
|
||||
if (print_header) {
|
||||
printf("BLOCK ");
|
||||
}
|
||||
else {
|
||||
printf("%6u ",bdbuf_info->blknum);
|
||||
}
|
||||
}
|
||||
|
||||
/*
|
||||
* 4 chars: print info about use count of this buffer
|
||||
*/
|
||||
if ((rc == RTEMS_SUCCESSFUL) &&
|
||||
((selector->show_all) ||
|
||||
(selector->show_use_count))) {
|
||||
if (print_header) {
|
||||
printf("USE ");
|
||||
}
|
||||
else {
|
||||
printf("%3u ",bdbuf_info->use_count);
|
||||
}
|
||||
}
|
||||
|
||||
/*
|
||||
* 4 chars: print info about state of this buffer
|
||||
*/
|
||||
if ((rc == RTEMS_SUCCESSFUL) &&
|
||||
((selector->show_all) ||
|
||||
(selector->show_state))) {
|
||||
if (print_header) {
|
||||
printf("STA ");
|
||||
}
|
||||
else {
|
||||
printf("%c%c%c ",
|
||||
(bdbuf_info->modified ? 'M' : '.'),
|
||||
(bdbuf_info->in_progress ? 'P' : '.'),
|
||||
(bdbuf_info->actual ? 'A' : '.'));
|
||||
}
|
||||
}
|
||||
|
||||
/*
|
||||
* 42 chars: print info about error of this buffer
|
||||
*/
|
||||
if ((rc == RTEMS_SUCCESSFUL) &&
|
||||
((selector->show_all) ||
|
||||
(selector->show_error))) {
|
||||
if (print_header) {
|
||||
printf("%20s:%-10s ","RTEMS STATUS","ERRNO");
|
||||
}
|
||||
else {
|
||||
printf("%20s:%-10s ",
|
||||
((bdbuf_info->status == RTEMS_SUCCESSFUL)
|
||||
? "SUCCESSFUL" : rtems_status_text(bdbuf_info->status)),
|
||||
((bdbuf_info->status == RTEMS_SUCCESSFUL)
|
||||
? "" : strerror(bdbuf_info->error)));
|
||||
}
|
||||
}
|
||||
/*
|
||||
* FIXME: add info about waiting chain
|
||||
*/
|
||||
printf("\n");
|
||||
return rc;
|
||||
}
|
||||
|
||||
/*=========================================================================*\
|
||||
| Function: |
|
||||
\*-------------------------------------------------------------------------*/
|
||||
void rtems_bdbuf_show_fnc
|
||||
(
|
||||
/*-------------------------------------------------------------------------*\
|
||||
| Purpose: |
|
||||
| list all bdbufs with their content |
|
||||
+---------------------------------------------------------------------------+
|
||||
| Input Parameters: |
|
||||
\*-------------------------------------------------------------------------*/
|
||||
int argc,
|
||||
char **argv,
|
||||
rtems_monitor_command_arg_t* command_arg,
|
||||
boolean verbose
|
||||
)
|
||||
/*-------------------------------------------------------------------------*\
|
||||
| Return Value: |
|
||||
| rtems_status_code |
|
||||
\*=========================================================================*/
|
||||
{
|
||||
rtems_status_code rc = RTEMS_SUCCESSFUL;
|
||||
show_bdbuf_filter_t filter;
|
||||
show_bdbuf_selector_t selector;
|
||||
show_bdbuf_bdbuf_info_t bdbuf_info;
|
||||
|
||||
bdbuf_pool *curr_pool,*pool_base;
|
||||
int pool_cnt,pool_idx;
|
||||
int bdbuf_idx;
|
||||
boolean bdbuf_matches;
|
||||
int matched_cnt,un_matched_cnt;
|
||||
|
||||
/*
|
||||
* analyze command line options
|
||||
*/
|
||||
if (rc == RTEMS_SUCCESSFUL) {
|
||||
rc = rtems_bdbuf_show_getargs (argc,argv,
|
||||
&filter,&selector);
|
||||
}
|
||||
|
||||
/*
|
||||
* get buffer pool information
|
||||
*/
|
||||
if (rc == RTEMS_SUCCESSFUL) {
|
||||
rc = rtems_bdbuf_show_get_bufpool(&pool_base,&pool_cnt);
|
||||
if (rc != RTEMS_SUCCESSFUL) {
|
||||
printf("%s: ERROR: no buffer pool found\n",argv[0]);
|
||||
}
|
||||
}
|
||||
/*
|
||||
* for all or selected buffer pool(s)
|
||||
*/
|
||||
for (pool_idx = 0;
|
||||
(rc == RTEMS_SUCCESSFUL) && (pool_idx < pool_cnt);
|
||||
pool_idx++) {
|
||||
if ((filter.pool_id < 0) ||
|
||||
(filter.pool_id == pool_idx)) {
|
||||
curr_pool = pool_base + pool_idx;
|
||||
/*
|
||||
* print pool header
|
||||
*/
|
||||
if (rc == RTEMS_SUCCESSFUL) {
|
||||
rc = rtems_bdbuf_show_pool_header(pool_idx,curr_pool);
|
||||
}
|
||||
if (rc == RTEMS_SUCCESSFUL) {
|
||||
matched_cnt = 0;
|
||||
un_matched_cnt = 0;
|
||||
/*
|
||||
* print header for bdbuf
|
||||
*/
|
||||
if (rc == RTEMS_SUCCESSFUL) {
|
||||
rc = rtems_show_bdbuf_print(NULL,&selector,
|
||||
TRUE);
|
||||
}
|
||||
/*
|
||||
* for all bdbufs in this pool
|
||||
*/
|
||||
for (bdbuf_idx = 0;
|
||||
((rc == RTEMS_SUCCESSFUL) &&
|
||||
(bdbuf_idx < curr_pool->nblks));
|
||||
bdbuf_idx++) {
|
||||
/*
|
||||
* get infos about bdbuf
|
||||
*/
|
||||
if (rc == RTEMS_SUCCESSFUL) {
|
||||
rc = rtems_show_bdbuf_get_bdbuf_info
|
||||
(&(curr_pool->bdbufs[bdbuf_idx]),
|
||||
bdbuf_idx,
|
||||
curr_pool,
|
||||
&bdbuf_info);
|
||||
}
|
||||
/*
|
||||
* check, if bdbuf matches selection criteria
|
||||
*/
|
||||
if (rc == RTEMS_SUCCESSFUL) {
|
||||
rc = rtems_show_bdbuf_match_filter(&bdbuf_info,&filter,
|
||||
&bdbuf_matches);
|
||||
}
|
||||
/*
|
||||
* print info about bdbuf
|
||||
*/
|
||||
if (rc == RTEMS_SUCCESSFUL) {
|
||||
if (bdbuf_matches) {
|
||||
rc = rtems_show_bdbuf_print(&bdbuf_info,&selector,
|
||||
FALSE);
|
||||
if ((rc == RTEMS_SUCCESSFUL) &&
|
||||
selector.show_sema) {
|
||||
rc = rtems_show_bdbuf_print_wait_chain(&(curr_pool->bdbufs[bdbuf_idx]));
|
||||
}
|
||||
matched_cnt++;
|
||||
}
|
||||
else {
|
||||
un_matched_cnt++;
|
||||
}
|
||||
}
|
||||
}
|
||||
/*
|
||||
* print match statistics and footer
|
||||
*/
|
||||
if (rc == RTEMS_SUCCESSFUL) {
|
||||
printf("%d bdbufs printed, %d bdbufs suppressed\n",
|
||||
matched_cnt,un_matched_cnt);
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
static rtems_monitor_command_entry_t rtems_show_bdbuf_cmds[] = {
|
||||
{
|
||||
"bdbuf_show",
|
||||
"usage: bdbuf_show\n",
|
||||
0,
|
||||
rtems_bdbuf_show_fnc,
|
||||
{ 0 },
|
||||
0
|
||||
}
|
||||
};
|
||||
|
||||
#ifndef ARRAY_CNT
|
||||
#define ARRAY_CNT(arr) (sizeof((arr))/sizeof((arr)[0]))
|
||||
#endif
|
||||
|
||||
/*=========================================================================*\
|
||||
| Function: |
|
||||
\*-------------------------------------------------------------------------*/
|
||||
rtems_status_code rtems_bdbuf_show_init
|
||||
(
|
||||
/*-------------------------------------------------------------------------*\
|
||||
| Purpose: |
|
||||
| add command(s) to monitor |
|
||||
+---------------------------------------------------------------------------+
|
||||
| Input Parameters: |
|
||||
\*-------------------------------------------------------------------------*/
|
||||
void /* none up to now */
|
||||
)
|
||||
/*-------------------------------------------------------------------------*\
|
||||
| Return Value: |
|
||||
| rtems_status_code |
|
||||
\*=========================================================================*/
|
||||
{
|
||||
rtems_status_code sc = RTEMS_SUCCESSFUL;
|
||||
int item;
|
||||
|
||||
for (item = 0;
|
||||
(sc == RTEMS_SUCCESSFUL) && (item < ARRAY_CNT(rtems_show_bdbuf_cmds));
|
||||
item++) {
|
||||
if (0 == rtems_monitor_insert_cmd (&rtems_show_bdbuf_cmds[item])) {
|
||||
sc = RTEMS_INVALID_NAME;
|
||||
}
|
||||
}
|
||||
return sc;
|
||||
}
|
||||
Reference in New Issue
Block a user