rom/dos/makedosentry.c

   1 /*
   2     Copyright © 1995-2007, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Creates an entry for the dos list.
   6     Lang: english
   7 */
   8 #include <exec/memory.h>
   9 #include <proto/exec.h>
  10
  11 #include <string.h>
  12
  13 #include "dos_intern.h"
  14
  15 /*****************************************************************************
  16
  17     NAME */
  18 #include <proto/dos.h>
  19
  20         AROS_LH2(struct DosList *, MakeDosEntry,
  21
  22 /*  SYNOPSIS */
  23         AROS_LHA(CONST_STRPTR, name, D1),
  24         AROS_LHA(LONG,         type, D2),
  25
  26 /*  LOCATION */
  27         struct DosLibrary *, DOSBase, 116, Dos)
  28
  29 /*  FUNCTION
  30         Create an entry for the dos list. Depending on the type this may
  31         be a device, a volume or an assign node.
  32
  33     INPUTS
  34         name  --  pointer to name
  35         type  --  type of list entry to create
  36
  37     RESULT
  38
  39         The new device entry, or NULL if it couldn't be created.
  40
  41     NOTES
  42
  43     EXAMPLE
  44
  45     BUGS
  46
  47     SEE ALSO
  48
  49     AddDosEntry(), RemDosEntry(), FindDosEntry(), LockDosList(),
  50     NextDosEntry(), FreeDosEntry()
  51
  52     INTERNALS
  53
  54     This call should be replaced by a value for AllocDosObject().
  55
  56 *****************************************************************************/
  57 {
  58     AROS_LIBFUNC_INIT
  59
  60     ULONG len = strlen(name);
  61     STRPTR s2;
  62     struct DosList *dl;
  63
  64     dl = (struct DosList *)AllocVec(sizeof(struct DosList),
  65                                     MEMF_PUBLIC | MEMF_CLEAR);
  66
  67     if (dl != NULL)
  68     {
  69 #ifdef AROS_FAST_BPTR
  70         s2 = (STRPTR)AllocVec(len+1, MEMF_PUBLIC | MEMF_CLEAR);
  71         dl->dol_Name = MKBADDR(s2);
  72 #else
  73         /* Binary compatibility for BCPL string.
  74          * First byte is the length then comes the string.
  75          * For ease of use a zero is put at the end so it can be used as a
  76          * C string
  77          */
  78         s2 = (STRPTR)AllocVec(len+2, MEMF_PUBLIC | MEMF_CLEAR);
  79         dl->dol_Name = MKBADDR(s2);
  80         if (s2 != NULL)
  81             *s2++ = (UBYTE)(len > 255 ? 255 : len);
  82 #endif
  83         if (s2 != NULL)
  84         {
  85             strcpy(s2, name);
  86 #ifndef AROS_DOS_PACKETS
  87             dl->dol_Ext.dol_AROS.dol_DevName = s2;
  88 #endif
  89             dl->dol_Type = type;
  90             return dl;
  91         }
  92         else
  93         {
  94             SetIoErr(ERROR_NO_FREE_STORE);
  95         }
  96
  97         FreeVec(dl);
  98     }
  99     else
 100     {
 101         SetIoErr(ERROR_NO_FREE_STORE);
 102     }
 103
 104     return NULL;
 105
 106     AROS_LIBFUNC_EXIT
 107 } /* MakeDosEntry */