compiler/arossupport/isdosentrya.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include <proto/arossupport.h>
   7 #include <proto/dos.h>
   8 #include <proto/utility.h>
   9
  10 #include <aros/system.h>
  11 #include <dos/dos.h>
  12
  13 //#define dol_OldName dol_Name
  14
  15 #include <dos/dosextens.h>
  16 #include <exec/types.h>
  17 #include <utility/utility.h>
  18
  19 #define BUFFER_SIZE   100
  20
  21 /*****************************************************************************
  22
  23     NAME */
  24
  25         BOOL IsDosEntryA(
  26
  27 /*  SYNOPSIS */
  28
  29         char  * Name,
  30         ULONG   Flags)
  31
  32 /*  LOCATION */
  33
  34 /*  FUNCTION
  35
  36         There is a need in file/directory processing where an application
  37         may need to determine whether a path is just a volume/device or
  38         assignment name.
  39
  40     INPUTS
  41
  42         Name  - The path to test.
  43
  44         Flags - Any combination of the following:
  45
  46                 LDF_ASSIGNS
  47                 LDF_DEVICES
  48                 LDF_VOLUMES
  49
  50     RESULT
  51
  52         Boolean True or False.
  53
  54     NOTES
  55
  56         Requires the programmer to open the utility.library and initialise
  57         UtilityBase.
  58
  59         In future releases the buffer size will be set via a taglist.
  60
  61     EXAMPLE
  62
  63         BOOL Success;
  64
  65         ...
  66
  67         Success = IsDosEntryA("Work:", LDF_VOLUMES)
  68         if (Success == TRUE)
  69         {
  70           ...
  71         }
  72
  73     BUGS
  74
  75     SEE ALSO
  76
  77         <dos/dosextens.h>
  78
  79     INTERNALS
  80
  81     HISTORY
  82
  83         27-Jul-1997     laguest     Initial inclusion into the AROS tree
  84
  85 ******************************************************************************/
  86 {
  87   struct DosList *DList;
  88   char           *DLName;
  89   int             Position;
  90   int             Success;
  91   BOOL            ReturnValue;
  92   char            Buffer[BUFFER_SIZE + 1];
  93
  94   ReturnValue = FALSE;
  95
  96   Position = SplitName(Name, ':', &Buffer[0], 0, BUFFER_SIZE + 1);
  97   if (Position != -1 && Name[Position] == NULL)
  98   {
  99     DList = AttemptLockDosList(Flags | LDF_READ);
 100     if (DList != NULL)
 101     {
 102       DList = NextDosEntry(DList, Flags);
 103       while (DList != NULL && ReturnValue == FALSE)
 104       {
 105         DLName = AROS_BSTR_ADDR(DList->dol_OldName);
 106
 107         Success = Strnicmp(DLName, &Buffer[0], Position - 1);
 108         if (Success == 0)
 109         {
 110           ReturnValue = TRUE;
 111         }
 112
 113         DList = NextDosEntry(DList, Flags);
 114       }
 115
 116       UnLockDosList(Flags | LDF_READ);
 117     }
 118   }
 119
 120   return (ReturnValue);
 121
 122 } /* IsDosEntry */