rom/exec/findname.c

   1 /*
   2     Copyright © 1995-2017, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Search for a node by name.
   6     Lang: english
   7 */
   8 #include <string.h>
   9 #include <aros/debug.h>
  10
  11 #include "exec_intern.h"
  12 #include "exec_debug.h"
  13
  14 /*****************************************************************************
  15
  16     NAME */
  17 #include <exec/lists.h>
  18 #include <proto/exec.h>
  19
  20         AROS_LH2I(struct Node *, FindName,
  21
  22 /*  SYNOPSIS */
  23         AROS_LHA(struct List *, list, A0),
  24         AROS_LHA(CONST_STRPTR, name, A1),
  25
  26 /*  LOCATION */
  27         struct ExecBase *, SysBase, 46, Exec)
  28
  29 /*  FUNCTION
  30         Look for a node with a certain name in a list.
  31
  32     INPUTS
  33         list - Search this list.
  34         name - This is the name to look for.
  35
  36     RESULT
  37
  38     NOTES
  39         The search is case-sensitive, so "Hello" will not find a node
  40         named "hello".
  41
  42         The list must contain complete Nodes and no MinNodes.
  43
  44         When supplied with a NULL list argument, defaults to the exec port list.
  45
  46     EXAMPLE
  47         struct List * list;
  48         struct Node * node;
  49
  50         // Look for a node with the name "Hello"
  51         node = FindName (list, "Hello");
  52
  53     BUGS
  54
  55     SEE ALSO
  56
  57     INTERNALS
  58
  59 ******************************************************************************/
  60 {
  61     AROS_LIBFUNC_INIT
  62     struct Node * node;
  63 /* FIX !
  64         FindName supplied with a NULL list defaults to the exec port list
  65         Changed in lists.c as well....
  66 */
  67     if( !list )
  68     {
  69 #if defined(__AROSEXEC_SMP__)
  70         bug("[EXEC] %s: called with NULL list!\n", __func__);
  71 #endif
  72         list = &SysBase->PortList;
  73     }
  74
  75 /*    ASSERT(list != NULL); */
  76     ASSERT(name);
  77
  78     /* Look through the list */
  79     for (node=GetHead(list); node; node=GetSucc(node))
  80     {
  81         /* Only compare the names if this node has one. */
  82         if(node->ln_Name)
  83         {
  84             /* Check the node. If we found it, stop. */
  85             if (!strcmp (node->ln_Name, name))
  86                 break;
  87         }
  88     }
  89
  90     /*
  91         If we found a node, this will contain the pointer to it. If we
  92         didn't, this will be NULL (either because the list was
  93         empty or because we tried all nodes in the list)
  94     */
  95     return node;
  96     AROS_LIBFUNC_EXIT
  97 } /* FindName */
  98