workbench/libs/icon/findtooltype.c

   1 /*
   2     Copyright © 1995-2007, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Find a tooltype entry from an array of tool types.
   6 */
   7 #include "icon_intern.h"
   8
   9 /*****************************************************************************
  10
  11     NAME */
  12 #include <proto/icon.h>
  13
  14         AROS_LH2(UBYTE *, FindToolType,
  15
  16 /*  SYNOPSIS */
  17         AROS_LHA(CONST STRPTR *, toolTypeArray, A0),
  18         AROS_LHA(CONST STRPTR,   typeName,      A1),
  19
  20 /*  LOCATION */
  21         struct Library *, IconBase, 16, Icon)
  22
  23 /*  FUNCTION
  24         Finds the supplied typeName inside the given toolTypeArray.
  25         Search is case-insensitive.
  26
  27     INPUTS
  28         toolTypeArray  -  pointer to an array of tooltype strings.
  29         typeName      -  name of a specific tool-type.
  30
  31     RESULT
  32         NULL if the tooltype wasn't found and a pointer to the value
  33         of the tooltype otherwise.
  34
  35     NOTES
  36
  37     EXAMPLE
  38
  39     BUGS
  40
  41     SEE ALSO
  42         MatchToolValue()
  43
  44     INTERNALS
  45
  46     HISTORY
  47
  48 *****************************************************************************/
  49 {
  50     AROS_LIBFUNC_INIT
  51
  52     ULONG typenamelen = 0;
  53
  54     /* Make sure we have sane input parameters */
  55     if (toolTypeArray == NULL || typeName == NULL) return NULL;
  56
  57     typenamelen = strlen(typeName);
  58
  59     while (*toolTypeArray)
  60     {
  61         /* case insensitive compare */
  62         if (!Strnicmp (*toolTypeArray, typeName, typenamelen) )
  63         {
  64             if ( (*toolTypeArray)[typenamelen] == '=') typenamelen++;
  65             return (*toolTypeArray + typenamelen);
  66         }
  67
  68         toolTypeArray ++;
  69     }
  70
  71     return NULL;
  72
  73     AROS_LIBFUNC_EXIT
  74 } /* FindToolType */