rom/exec/findresident.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Search a resident module by name
   6     Lang: english
   7 */
   8 #include "exec_intern.h"
   9 #include <string.h>
  10 #include <exec/resident.h>
  11 #include <proto/exec.h>
  12
  13 /*****************************************************************************
  14
  15     NAME */
  16
  17         AROS_LH1(struct Resident *, FindResident,
  18
  19 /*  SYNOPSIS */
  20         AROS_LHA(const UBYTE *, name, A1),
  21
  22 /*  LOCATION */
  23         struct ExecBase *, SysBase, 16, Exec)
  24
  25 /*  FUNCTION
  26         Search for a Resident module in the system resident list.
  27
  28     INPUTS
  29         name - pointer to the name of a Resident module to find
  30
  31     RESULT
  32         pointer to the Resident module (struct Resident *), or null if
  33         not found.
  34
  35     NOTES
  36
  37     EXAMPLE
  38
  39     BUGS
  40
  41     SEE ALSO
  42
  43     INTERNALS
  44
  45 *****************************************************************************/
  46 {
  47     AROS_LIBFUNC_INIT
  48     AROS_LIBBASE_EXT_DECL(struct ExecBase *,SysBase)
  49
  50     ULONG *list;
  51
  52     list = SysBase->ResModules;
  53
  54     if(list)
  55     {
  56         while(*list)
  57         {
  58             /*
  59                 If bit 31 is set, this doesn't point to a Resident module, but
  60                 to another list of modules.
  61             */
  62             if(*list & 0x80000000) list = (ULONG *)(*list & 0x7fffffff);
  63
  64             if(!(strcmp( ((struct Resident *)*list)->rt_Name, name)) )
  65             {
  66                 return (struct Resident *)*list;
  67             }
  68
  69             list++;
  70         }
  71     }
  72
  73     return NULL;
  74     AROS_LIBFUNC_EXIT
  75 } /* FindResident */