Subversion Repositories openrisc

/*

 * RTEMS Monitor "manager" support.

 * Used to traverse object (chain) lists and print them out.

 *

 *  $Id: mon-manager.c,v 1.2 2001-09-27 12:01:43 chris Exp $

 */

#include <rtems.h>

#include <rtems/monitor.h>

#include <stdio.h>

/*

 * "next" routine for all objects that are RTEMS manager objects

 */

void *

rtems_monitor_manager_next(

    void      *table_void,

    void      *canonical,

    rtems_id  *next_id

)

{

    Objects_Information     *table = table_void;

    rtems_monitor_generic_t *copy;

    Objects_Control         *object = 0;

    Objects_Locations        location;

    /*

     * When we are called, it must be local

     */

    if ( ! _Objects_Is_local_id(*next_id))

        goto done;

    object = _Objects_Get_next(table, *next_id, &location, next_id);

    if (object)

    {

        copy = (rtems_monitor_generic_t *) canonical;

        copy->id = object->id;

        _Objects_Copy_name_raw(object->name, &copy->name, sizeof(copy->name));

    }

done:

    return object;

}