workbench/c/Touch.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Touch CLI command.
   6     Lang: english
   7 */
   8
   9 #include <dos/dos.h>
  10 #include <proto/dos.h>
  11 #include <dos/filesystem.h>
  12
  13 int __nocommandline;
  14
  15 int main(void)
  16 {
  17     IPTR           args[1] = {NULL};
  18     struct RDArgs *rda     = ReadArgs("NAME/A", args, NULL);
  19
  20     if (rda)
  21     {
  22         BPTR fh = Open((STRPTR)args[0], FMF_CREATE);
  23         if (fh)
  24         {
  25             Close(fh);
  26             return RETURN_OK;
  27         }
  28
  29         PrintFault(IoErr(), NULL);
  30    }
  31    return RETURN_FAIL;
  32 }