rom/exec/findresident.c

   1 /*
   2     Copyright © 1995-2007, 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
  49     IPTR *list;
  50
  51     list = SysBase->ResModules;
  52
  53     if(list)
  54     {
  55         while(*list)
  56         {
  57             /*
  58                 If bit 31 is set, this doesn't point to a Resident module, but
  59                 to another list of modules.
  60             */
  61             if(*list & 0x80000000) list = (IPTR *)(*list & 0x7fffffff);
  62
  63             if(!(strcmp( ((struct Resident *)*list)->rt_Name, name)) )
  64             {
  65                 return (struct Resident *)*list;
  66             }
  67
  68             list++;
  69         }
  70     }
  71
  72     return NULL;
  73     AROS_LIBFUNC_EXIT
  74 } /* FindResident */