rom/dos/matchfirst.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc:
   6     Lang: english
   7 */
   8 #include "dos_intern.h"
   9 #include <proto/exec.h>
  10 #include <exec/memory.h>
  11 #include <exec/types.h>
  12 #include <dos/dos.h>
  13
  14 /*****************************************************************************
  15
  16     NAME */
  17 #include <dos/dosasl.h>
  18 #include <proto/dos.h>
  19
  20         AROS_LH2(LONG, MatchFirst,
  21
  22 /*  SYNOPSIS */
  23         AROS_LHA(STRPTR             , pat, D1),
  24         AROS_LHA(struct AnchorPath *, AP , D2),
  25
  26 /*  LOCATION */
  27         struct DosLibrary *, DOSBase, 137, Dos)
  28
  29 /*  FUNCTION
  30
  31         Searches for the first file or directory that matches a given pattern.
  32         MatchFirst() initializes the AnchorPath structure for you but you
  33         must initilize the following fields: ap_Flags, ap_Strlen, ap_BreakBits
  34         and ap_FoundBreak. The first call to MatchFirst() also passes you
  35         the first matching file which you can examine in ap_Info and the directory
  36         the files is in in ap_Current->an_Lock. After the first call to
  37         MatchFirst() call MatchNext().
  38         The search begins whereever the current directory is set to. See
  39         CurrentDir();
  40         For more info on patterns see ParsePattern().
  41
  42     INPUTS
  43         pat  - pattern to search for
  44         AP   - pointer to (initilized) AnchorPath structure
  45
  46     RESULT
  47         0     = success
  48         other = DOS error code
  49
  50     NOTES
  51
  52     EXAMPLE
  53
  54     BUGS
  55
  56     SEE ALSO
  57         MatchNext(), MatchEnd(), ParsePattern(), Examine(), CurrentDir()
  58         <dos/dosasl.h>
  59
  60     INTERNALS
  61
  62 *****************************************************************************/
  63 {
  64     AROS_LIBFUNC_INIT
  65     AROS_LIBBASE_EXT_DECL(struct DosLibrary *,DOSBase)
  66
  67     struct AChain       *ac;
  68     LONG                error;
  69
  70     AP->ap_Flags   = 0;
  71     AP->ap_Base    = 0;
  72     AP->ap_Current = 0;
  73
  74     error = Match_BuildAChainList(pat, AP, &ac, DOSBase);
  75     if (error == 0)
  76     {
  77         AP->ap_Base = AP->ap_Current = ac;
  78
  79         error = MatchNext(AP);
  80
  81     } /* if (error == 0) */
  82
  83     SetIoErr(error);
  84
  85     return error;
  86
  87     AROS_LIBFUNC_EXIT
  88
  89 } /* MatchFirst */