rom/dos/assignadd.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Add a directory to an assign.
   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_intern.h"
  13
  14 /*****************************************************************************
  15
  16     NAME */
  17 #include <proto/dos.h>
  18
  19         AROS_LH2(BOOL, AssignAdd,
  20
  21 /*  SYNOPSIS */
  22         AROS_LHA(CONST_STRPTR, name, D1),
  23         AROS_LHA(BPTR  , lock, D2),
  24
  25 /*  LOCATION */
  26         struct DosLibrary *, DOSBase, 105, Dos)
  27
  28 /*  FUNCTION
  29         Create a multi-directory assign, or adds to it if it already was one.
  30         Do not use or free the lock after calling this function - it becomes
  31         the assign and will be freed by the system when the assign is removed.
  32
  33     INPUTS
  34         name - NULL terminated name of the assign.
  35         lock - Lock on the assigned directory.
  36
  37     RESULT
  38         != 0 success, 0 on failure. IoErr() gives additional information
  39         in that case. The lock is not freed on failure.
  40
  41     NOTES
  42         This will only work with an assign created with AssignLock() or
  43         a resolved AssignLate() assign.
  44
  45     EXAMPLE
  46
  47     BUGS
  48
  49     SEE ALSO
  50         Lock(), AssignLock(), AssignPath(), AssignLate(), DupLock(),
  51         RemAssignList()
  52
  53     INTERNALS
  54
  55 *****************************************************************************/
  56 {
  57     AROS_LIBFUNC_INIT
  58     AROS_LIBBASE_EXT_DECL(struct DosLibrary *,DOSBase)
  59     struct DosList     *dl;
  60     struct AssignList **al, *newal;
  61
  62     if(lock == NULL)
  63         return DOSFALSE;
  64
  65     dl = LockDosList(LDF_ASSIGNS | LDF_WRITE);
  66     dl = FindDosEntry(dl, name, LDF_ASSIGNS);
  67
  68     if((dl == NULL) || (dl->dol_Type != DLT_DIRECTORY))
  69     {
  70         UnLockDosList(LDF_ASSIGNS | LDF_WRITE);
  71         SetIoErr(ERROR_OBJECT_WRONG_TYPE);
  72
  73         return DOSFALSE;
  74     }
  75
  76     newal = AllocVec(sizeof(struct AssignList), MEMF_PUBLIC | MEMF_CLEAR);
  77
  78     if(newal == NULL)
  79     {
  80         UnLockDosList(LDF_ASSIGNS | LDF_WRITE);
  81         SetIoErr(ERROR_NO_FREE_STORE);
  82
  83         return DOSFALSE;
  84     }
  85
  86     newal->al_Lock = lock;
  87
  88     for(al = &dl->dol_misc.dol_assign.dol_List; *al; al = &((*al)->al_Next));
  89
  90     *al = newal;
  91     UnLockDosList(LDF_ASSIGNS | LDF_WRITE);
  92
  93     return DOSTRUE;
  94
  95     AROS_LIBFUNC_EXIT
  96 } /* AssignAdd */