home *** CD-ROM | disk | FTP | other *** search
/ MACD 4 / MACD4.iso / Emulatory / AROS / c / assign.c next >
Encoding:
C/C++ Source or Header  |  1978-03-06  |  625 b   |  34 lines
  1. #include <exec/memory.h>
  2. #include <exec/execbase.h>
  3. #include <clib/exec_protos.h>
  4. #include <dos/dos.h>
  5. #include <clib/dos_protos.h>
  6. #include <utility/tagitem.h>
  7.  
  8. int main (int argc, char ** argv)
  9. {
  10.     STRPTR args[2]={ NULL, NULL };
  11.     struct RDArgs *rda;
  12.     BPTR dir;
  13.     LONG error=0;
  14.  
  15.     rda=ReadArgs("DEVICE/A,DIR/A",(IPTR *)args,NULL);
  16.     if(rda!=NULL)
  17.     {
  18.     dir=Lock(args[1],SHARED_LOCK);
  19.     if(dir)
  20.     {
  21.         STRPTR s=args[0];
  22.         while(*s)
  23.         if(*s++==':')
  24.             s[-1]=0;
  25.         AssignLock(args[0],dir);
  26.     }
  27.     FreeArgs(rda);
  28.     }else
  29.     error=RETURN_FAIL;
  30.     if(error)
  31.     PrintFault(IoErr(),"Assign");
  32.     return error;
  33. }
  34.