compiler/arossupport/isdosentrya.c

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