rom/dos/devname.c

   1 /*
   2     Copyright © 1995-2007, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Get a device pointer from a filename.
   6     Lang: english
   7 */
   8 #include <exec/memory.h>
   9 #include <proto/exec.h>
  10 #include <dos/dos.h>
  11 #include <dos/dosextens.h>
  12 #include <dos/filesystem.h>
  13 #include <proto/dos.h>
  14 #include <proto/utility.h>
  15 #include <string.h>
  16 #include "dos_intern.h"
  17
  18
  19
  20 LONG DevName(CONST_STRPTR name, struct Device **devptr,
  21              struct DosLibrary *DOSBase)
  22 {
  23     LONG error = 0L;
  24     STRPTR volname;
  25     CONST_STRPTR s1 = NULL;
  26     struct DosList *dl;
  27     struct FileHandle *fh;
  28     struct Process *me = (struct Process *)FindTask(NULL);
  29
  30     /* If file is "PROGDIR:" or relative to current directory, just return
  31        device from pr_HomeDir or pr_CurrentDir. */
  32     if(!Strnicmp(name, "PROGDIR:", 8))
  33     {
  34         struct FileHandle *fh = (struct FileHandle *)BADDR(me->pr_HomeDir);
  35
  36         if (!fh)
  37         {
  38             *devptr = (struct Device *)0xBADC0DE;
  39             return ERROR_DEVICE_NOT_MOUNTED;
  40         }
  41         else
  42         {
  43             *devptr = fh->fh_Device;
  44             return 0;
  45         }
  46     }
  47     else if(*name == ':')
  48     {
  49         struct FileHandle *fh = (struct FileHandle *)BADDR(me->pr_CurrentDir);
  50
  51         if (!fh) fh = (struct FileHandle *)BADDR(DOSBase->dl_SYSLock);
  52
  53         if (fh)
  54         {
  55             *devptr = fh->fh_Device;
  56             return 0;
  57         }
  58         else
  59         {
  60             *devptr = (struct Device *)0xBADC0DE;
  61             return ERROR_DEVICE_NOT_MOUNTED;
  62         }
  63    }
  64
  65     /* Copy volume name */
  66     s1 = name;
  67     volname = NULL;
  68
  69     while(*s1)
  70     {
  71         if(*s1++ == ':')
  72         {
  73             volname = (STRPTR)AllocVec(s1 - name, MEMF_ANY);
  74
  75             if(volname == NULL)
  76             {
  77                 SetIoErr(ERROR_NO_FREE_STORE);
  78                 return ERROR_NO_FREE_STORE;
  79             }
  80
  81             CopyMem(name, volname, s1 - name - 1);
  82             volname[s1 - name - 1] = '\0';
  83             break;
  84         }
  85     }
  86
  87     /* If path is relative to current directory, get device from
  88        pr_CurrentDir. */
  89     if(volname == NULL)
  90     {
  91         struct FileHandle *fh = (struct FileHandle *)BADDR(me->pr_CurrentDir);
  92
  93         if (!fh) fh = (struct FileHandle *)BADDR(DOSBase->dl_SYSLock);
  94
  95         if (fh)
  96         {
  97             *devptr = fh->fh_Device;
  98             return 0;
  99         }
 100         else
 101         {
 102             *devptr = (struct Device *)0xBADC0DE;
 103             return ERROR_DEVICE_NOT_MOUNTED;
 104         }
 105
 106    }
 107
 108     /* Get the device pointer from dos-list. */
 109     dl = LockDosList(LDF_ALL | LDF_READ);
 110     dl = FindDosEntry(dl, volname, LDF_ALL);
 111
 112     if(dl != NULL)
 113     {
 114         if(dl->dol_Type == DLT_LATE)
 115         {
 116             /* Late binding assign: mount first */
 117             BPTR lock = Lock(dl->dol_misc.dol_assign.dol_AssignName,
 118                              SHARED_LOCK);
 119             UnLockDosList(LDF_ALL | LDF_READ);
 120             dl = NULL;
 121
 122             if(lock != NULL)
 123             {
 124                 AssignLock(volname, lock);
 125                 dl = LockDosList(LDF_ALL | LDF_READ);
 126                 dl = FindDosEntry(dl, volname, LDF_ALL);
 127
 128                 if(dl != NULL)
 129                     *devptr = dl->dol_Ext.dol_AROS.dol_Device;
 130                 else
 131                     error = ERROR_DEVICE_NOT_MOUNTED;
 132
 133                 UnLockDosList(LDF_ALL | LDF_READ);
 134             }
 135             else
 136                 error = IoErr();
 137
 138         }
 139         else if(dl->dol_Type == DLT_NONBINDING)
 140         {
 141             BPTR lock = Lock(dl->dol_misc.dol_assign.dol_AssignName,
 142                              SHARED_LOCK);
 143             UnLockDosList(LDF_ALL | LDF_READ);
 144             fh = (struct FileHandle *)BADDR(lock);
 145
 146             if(fh != NULL)
 147             {
 148                 *devptr = fh->fh_Device;
 149                 UnLock(lock);
 150             }
 151             else
 152                 error = IoErr();
 153         }
 154         else
 155         {
 156             *devptr = dl->dol_Ext.dol_AROS.dol_Device;
 157             UnLockDosList(LDF_ALL | LDF_READ);
 158         }
 159     }
 160     else
 161     {
 162         UnLockDosList(LDF_ALL | LDF_READ);
 163         error = ERROR_DEVICE_NOT_MOUNTED;
 164     }
 165
 166     FreeVec(volname);
 167     SetIoErr(error);
 168
 169     return error;
 170 } /* DevName */