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
  12 int __nocommandline;
  13
  14 int main(void)
  15 {
  16     IPTR           args[1] = {NULL};
  17     struct RDArgs *rda     = ReadArgs("NAME/A", args, NULL);
  18
  19     if (rda)
  20     {
  21         struct DateStamp ds;
  22
  23         /* Attempt to update the file's date stamp */
  24         if (SetFileDate((CONST_STRPTR)args[0], DateStamp(&ds))) {
  25             return RETURN_OK;
  26         } else {
  27             /* Attempt to create the file, if needed */
  28             BPTR fh = Open((STRPTR)args[0], MODE_NEWFILE);
  29             if (fh) {
  30                 Close(fh);
  31                 return RETURN_OK;
  32             }
  33         }
  34
  35         PrintFault(IoErr(), NULL);
  36    }
  37    return RETURN_FAIL;
  38 }