From 8ef38186faea3d9b5e6f0f1242f668cb7e7a3d52 Mon Sep 17 00:00:00 2001
From: Joel Sherrill <joel.sherrill@OARcorp.com>
Date: Mon, 12 Jun 2000 19:57:02 +0000
Subject: Patch from John Cotton <john.cotton@nrc.ca>, Charles-Antoine Gauthier
 <charles.gauthier@iit.nrc.ca>, and Darlene A. Stewart
 <Darlene.Stewart@nrc.ca> to add support for a number of very significant
 things:

  + BSPs for many variations on the Motorola MBX8xx board series
  + Cache Manager including initial support for m68040
    and PowerPC
  + Rework of mpc8xx libcpu code so all mpc8xx CPUs now use
    same code base.
  + Rework of eth_comm BSP to utiltize above.

John reports this works on the 821 and 860
---
 c/src/exec/score/src/objectlocaliterate.c | 77 +++++++++++++++++++++++++++++++
 1 file changed, 77 insertions(+)
 create mode 100644 c/src/exec/score/src/objectlocaliterate.c

(limited to 'c/src/exec/score/src/objectlocaliterate.c')

diff --git a/c/src/exec/score/src/objectlocaliterate.c b/c/src/exec/score/src/objectlocaliterate.c
new file mode 100644
index 0000000000..e4b0f28de8
--- /dev/null
+++ b/c/src/exec/score/src/objectlocaliterate.c
@@ -0,0 +1,77 @@
+/*
+ *  object iterator
+ *
+ *
+ *  COPYRIGHT (c) 2000.
+ *  On-Line Applications Research Corporation (OAR).
+ *
+ *  The license and distribution terms for this file may be
+ *  found in found in the file LICENSE in this distribution or at
+ *  http://www.OARcorp.com/rtems/license.html.
+ *
+ *  $Id$
+ */
+
+#include <rtems/system.h>
+#include <rtems/score/object.h>
+
+/*PAGE
+ *
+ *  _Objects_Local_iterate
+ *
+ *  DESCRIPTION:
+ *
+ *  This function invokes the callback function for each existing object
+ *  of the type specified by the information block pointer. Iteration
+ *  continues until either all objects have been processed, or, if
+ *  break_on_error is TRUE, until an invocation of the callback returns
+ *  something other than 0.
+ *
+ *  Input parameters:
+ *    information:
+ *      A pointer to an Objects_Information block. Determines the type of
+ *      object over which to iterate.
+ *    callback:
+ *      A pointer to a function with the indicated signature.
+ *    arg: 
+ *      A pointer to some arbitrary entity. Passed on to the callback.
+ *    break_on_error
+ *      If TRUE, stop iterating on error.
+ *
+ *  Output parameters: NONE
+ *    But callback may write into space pointed to by arg.
+ *
+ *  Return value:
+ *    0 if successful
+ *    Value returned by the callback otherwise.
+ */
+
+unsigned32 _Objects_Local_iterate(
+  Objects_Information  *information,
+  unsigned32          (*callback)(Objects_Control *object, void * arg),
+  void                 *arg,
+  boolean               break_on_error
+)
+{
+  unsigned32       result;
+  unsigned32       i;
+  Objects_Control *the_object;
+
+  if ( !information )
+    return 0;
+    
+  if ( !callback )
+    return 0;   
+    
+  for( i = 1; i <= information->maximum; i++ ) {
+    the_object = (Objects_Control *)information->local_table[i];
+    if( the_object ) {
+      result = (*callback)( the_object, arg );
+      if ( result && break_on_error )
+        return result;
+    }
+  }
+    
+  return 0;
+}
+
-- 
cgit v1.2.3