fstester/setter/os2_16.c

/****************************************************************************
The Disc Image Chef
-----------------------------------------------------------------------------

Filename       : os2_16.c
Author(s)      : Natalia Portillo

Component      : fstester.setter.os2

--[ Description ] -----------------------------------------------------------

Contains 16-bit OS/2 code

--[ License ] ---------------------------------------------------------------
     This program is free software: you can redistribute it and/or modify
     it under the terms of the GNU General Public License as
     published by the Free Software Foundation, either version 3 of the
     License, or (at your option) any later version.

     This program is distributed in the hope that it will be useful,
     but WITHOUT ANY WARRANTY; without even the implied warraty of
     MERCHANTIBILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
     GNU General Public License for more details.

     You should have received a copy of the GNU General Public License
     along with this program.  If not, see <http://www.gnu.org/licenses/>.

-----------------------------------------------------------------------------
Copyright (C) 2011-2018 Natalia Portillo
*****************************************************************************/

#if (defined(__I86__) || defined (__i86__) || defined (_M_I86)) && (defined(__OS2__) || defined (__os2__))

#include <stdio.h>
#include <stdlib.h>
#include <malloc.h>
#include <string.h>

#define INCL_DOSMISC
#define INCL_DOSFILEMGR
#include <os2.h>

#include "defs.h"
#include "os2_16.h"
#include "dosos2.h"
#include "consts.h"

void GetOsInfo()
{
    USHORT Version;
    USHORT rc;
    BYTE MajorVer;
    BYTE MinorVer;
    USHORT pathLen[1];

    rc = DosGetVersion(&Version);

    if(rc)
    {
       printf("Error %d querying OS/2 version.\n", rc);
       return;
    }

    MajorVer = HIBYTE(Version) / 10;
    MinorVer = LOBYTE(Version) / 10;

    if(MajorVer == 2)
    {
       MajorVer = MinorVer;
       MinorVer = 0;
    }

    printf("OS information:\n");
    printf("\tRunning under OS/2 %d.%d\n", MajorVer, MinorVer);

    rc = DosQSysInfo(0, (PBYTE) pathLen, sizeof(USHORT));

    printf("\tMaximum path is %d bytes.\n", pathLen[0]);
}

void GetVolumeInfo(const char *path, size_t *clusterSize)
{
    USHORT rc;
    BYTE bData[64];
    USHORT cbData = sizeof(bData);
    PFSALLOCATE pfsAllocateBuffer;
    USHORT driveNo = path[0] - '@';
    char *fsdName;
    PFSINFO pfsInfo;

    *clusterSize = 0;

    rc = DosQFSAttach((PSZ)path, 0, FSAIL_QUERYNAME, (PVOID) &bData, &cbData, 0);

    printf("Volume information:\n");
    printf("\tPath: %s\n", path);
    printf("\tDrive number: %d\n", driveNo - 1);

    if(rc)
    {
       printf("Error %d requesting volume information.\n", rc);
    }
    else
    {
        fsdName = &bData[4 + (USHORT) bData[2] + 1 + 2];
        printf("\tFSD name: %s\n", fsdName);
    }
    
    pfsAllocateBuffer = (PFSALLOCATE)malloc(sizeof(FSALLOCATE));
    rc = DosQFSInfo(driveNo, 1, (PBYTE) pfsAllocateBuffer, sizeof(FSALLOCATE));

    if(rc)
    {
       printf("Error %d requesting volume information.\n", rc);
    }
    else
    {
        printf("\tBytes per sector: %u\n", pfsAllocateBuffer->cbSector);
        printf("\tSectors per cluster: %lu (%lu bytes)\n", pfsAllocateBuffer->cSectorUnit, pfsAllocateBuffer->cSectorUnit * pfsAllocateBuffer->cbSector);
        printf("\tClusters: %lu (%lu bytes)\n", pfsAllocateBuffer->cUnit, pfsAllocateBuffer->cSectorUnit * pfsAllocateBuffer->cbSector * pfsAllocateBuffer->cUnit);
        printf("\tFree clusters: %lu (%lu bytes)\n", pfsAllocateBuffer->cUnitAvail, pfsAllocateBuffer->cSectorUnit * pfsAllocateBuffer->cbSector * pfsAllocateBuffer->cUnitAvail);

        *clusterSize = pfsAllocateBuffer->cSectorUnit * pfsAllocateBuffer->cbSector;
    }

    free(pfsAllocateBuffer);

    pfsInfo = (PFSINFO)malloc(sizeof(FSINFO));
    rc = DosQFSInfo(driveNo, 2, (PBYTE) pfsInfo, sizeof(FSINFO));

    if(rc)
    {
       printf("Error %d requesting volume information.\n", rc);
    }
    else
    {
       printf("\tVolume label: %s\n", pfsInfo->vol.szVolLabel);
       printf("\tVolume created on %d/%02d/%02d %02d:%02d:%02d\n",
              pfsInfo->fdateCreation.year + 1980, pfsInfo->fdateCreation.month - 1, pfsInfo->fdateCreation.day,
              pfsInfo->ftimeCreation.hours, pfsInfo->ftimeCreation.minutes, pfsInfo->ftimeCreation.twosecs*2);
    }

    free(pfsInfo);
}

void FileAttributes(const char *path)
{
   char drivePath[4];
   USHORT rc = 0, wRc = 0, cRc = 0;
   USHORT actionTaken = 0;
   HFILE handle;

   drivePath[0] = path[0];
   drivePath[1] = ':';
   drivePath[2] = '\\';
   drivePath[3] = 0;

   rc = DosChDir(drivePath, 0);

   if(rc)
   {
      printf("Cannot change to specified path, not continuing.\n");
      return;
   }

   rc = DosMkDir("ATTRS", 0);

   if(rc)
   {
      printf("Cannot create working directory.\n");
      return;
   }
   
   rc = DosChDir("ATTRS", 0);   

   printf("Creating attributes files.\n");

   rc = DosOpen("NONE", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_REPLACE_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
       wRc = DosWrite(handle, (PVOID) noAttributeText, strlen(noAttributeText), &actionTaken);
       cRc = DosClose(handle);
       rc = DosSetFileMode("NONE", FILE_NORMAL, 0);
   }

   printf("\tFile with no attributes: name = \"%s\", rc = %d, wRc = %d, cRc = %d\n", "NONE", rc, wRc, cRc);

   rc = DosOpen("ARCHIVE", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_REPLACE_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
       wRc = DosWrite(handle, (PVOID) archivedAttributeText, strlen(archivedAttributeText), &actionTaken);
       cRc = DosClose(handle);
       rc = DosSetFileMode("ARCHIVE", FILE_ARCHIVED, 0);
   }

   printf("\tFile with archived attribute: name = \"%s\", rc = %d, wRc = %d, cRc = %d\n", "ARCHIVE", rc, wRc, cRc);

   rc = DosOpen("SYSTEM", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_REPLACE_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
       wRc = DosWrite(handle, (PVOID) systemAttributeText, strlen(systemAttributeText), &actionTaken);
       cRc = DosClose(handle);
       rc = DosSetFileMode("SYSTEM", FILE_SYSTEM, 0);
   }

   printf("\tFile with system attribute: name = \"%s\", rc = %d, wRc = %d, cRc = %d\n", "SYSTEM", rc, wRc, cRc);

   rc = DosOpen("HIDDEN", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_REPLACE_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
       wRc = DosWrite(handle, (PVOID) hiddenAttributeText, strlen(hiddenAttributeText), &actionTaken);
       cRc = DosClose(handle);
       rc = DosSetFileMode("HIDDEN", FILE_HIDDEN, 0);
   }

   printf("\tFile with hidden attribute: name = \"%s\", rc = %d, wRc = %d, cRc = %d\n", "HIDDEN", rc, wRc, cRc);

   rc = DosOpen("READONLY", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_REPLACE_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
       wRc = DosWrite(handle, (PVOID) readonlyAttributeText, strlen(readonlyAttributeText), &actionTaken);
       cRc = DosClose(handle);
       rc = DosSetFileMode("READONLY", FILE_READONLY, 0);
   }

   printf("\tFile with read-only attribute: name = \"%s\", rc = %d, wRc = %d, cRc = %d\n", "READONLY", rc, wRc, cRc);

   rc = DosOpen("HIDDREAD", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_REPLACE_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
       wRc = DosWrite(handle, (PVOID) hiddenAttributeText, strlen(hiddenAttributeText), &actionTaken);
       wRc = DosWrite(handle, (PVOID) readonlyAttributeText, strlen(readonlyAttributeText), &actionTaken);
       cRc = DosClose(handle);
       rc = DosSetFileMode("HIDDREAD", FILE_HIDDEN | FILE_READONLY, 0);
   }

   printf("\tFile with hidden, read-only attributes: name = \"%s\", rc = %d, wRc = %d, cRc = %d\n", "HIDDREAD", rc, wRc, cRc);

   rc = DosOpen("SYSTREAD", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_REPLACE_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
       wRc = DosWrite(handle, (PVOID) systemAttributeText, strlen(systemAttributeText), &actionTaken);
       wRc = DosWrite(handle, (PVOID) readonlyAttributeText, strlen(readonlyAttributeText), &actionTaken);
       cRc = DosClose(handle);
       rc = DosSetFileMode("SYSTREAD", FILE_SYSTEM | FILE_READONLY, 0);
   }

   printf("\tFile with system, read-only attributes: name = \"%s\", rc = %d, wRc = %d, cRc = %d\n", "SYSTREAD", rc, wRc, cRc);

   rc = DosOpen("SYSTHIDD", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_REPLACE_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
       wRc = DosWrite(handle, (PVOID) systemAttributeText, strlen(systemAttributeText), &actionTaken);
       wRc = DosWrite(handle, (PVOID) hiddenAttributeText, strlen(hiddenAttributeText), &actionTaken);
       cRc = DosClose(handle);
       rc = DosSetFileMode("SYSTHIDD", FILE_SYSTEM | FILE_HIDDEN, 0);
   }

   printf("\tFile with system, hidden attributes: name = \"%s\", rc = %d, wRc = %d, cRc = %d\n", "SYSTHIDD", rc, wRc, cRc);

   rc = DosOpen("SYSRDYHD", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_REPLACE_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
       wRc = DosWrite(handle, (PVOID) systemAttributeText, strlen(systemAttributeText), &actionTaken);
       wRc = DosWrite(handle, (PVOID) readonlyAttributeText, strlen(readonlyAttributeText), &actionTaken);
       wRc = DosWrite(handle, (PVOID) hiddenAttributeText, strlen(hiddenAttributeText), &actionTaken);
       cRc = DosClose(handle);
       rc = DosSetFileMode("SYSRDYHD", FILE_SYSTEM | FILE_READONLY | FILE_HIDDEN, 0);
   }

   printf("\tFile with system, read-only, hidden attributes: name = \"%s\", rc = %d, wRc = %d, cRc = %d\n", "SYSRDYHD", rc, wRc, cRc);

   rc = DosOpen("ARCHREAD", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_REPLACE_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
       wRc = DosWrite(handle, (PVOID) archivedAttributeText, strlen(archivedAttributeText), &actionTaken);
       wRc = DosWrite(handle, (PVOID) readonlyAttributeText, strlen(readonlyAttributeText), &actionTaken);
       cRc = DosClose(handle);
       rc = DosSetFileMode("ARCHREAD", FILE_ARCHIVED | FILE_READONLY, 0);
   }

   printf("\tFile with archived, read-only attributes: name = \"%s\", rc = %d, wRc = %d, cRc = %d\n", "ARCHREAD", rc, wRc, cRc);

   rc = DosOpen("ARCHHIDD", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_REPLACE_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
       wRc = DosWrite(handle, (PVOID) archivedAttributeText, strlen(archivedAttributeText), &actionTaken);
       wRc = DosWrite(handle, (PVOID) hiddenAttributeText, strlen(hiddenAttributeText), &actionTaken);
       cRc = DosClose(handle);
       rc = DosSetFileMode("ARCHHIDD", FILE_ARCHIVED | FILE_HIDDEN, 0);
   }

   printf("\tFile with archived, hidden attributes: name = \"%s\", rc = %d, wRc = %d, cRc = %d\n", "ARCHHIDD", rc, wRc, cRc);

   rc = DosOpen("ARCHDRDY", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_REPLACE_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
       wRc = DosWrite(handle, (PVOID) archivedAttributeText, strlen(archivedAttributeText), &actionTaken);
       wRc = DosWrite(handle, (PVOID) hiddenAttributeText, strlen(hiddenAttributeText), &actionTaken);
       wRc = DosWrite(handle, (PVOID) readonlyAttributeText, strlen(readonlyAttributeText), &actionTaken);
       cRc = DosClose(handle);
       rc = DosSetFileMode("ARCHDRDY", FILE_ARCHIVED | FILE_HIDDEN | FILE_READONLY, 0);
   }

   printf("\tFile with archived, hidden, read-only attributes: name = \"%s\", rc = %d, wRc = %d, cRc = %d\n", "ARCHDRDY", rc, wRc, cRc);

   rc = DosOpen("ARCHSYST", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_REPLACE_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
       wRc = DosWrite(handle, (PVOID) archivedAttributeText, strlen(archivedAttributeText), &actionTaken);
       wRc = DosWrite(handle, (PVOID) systemAttributeText, strlen(systemAttributeText), &actionTaken);
       cRc = DosClose(handle);
       rc = DosSetFileMode("ARCHSYST", FILE_ARCHIVED | FILE_SYSTEM, 0);
   }

   printf("\tFile with archived, system attributes: name = \"%s\", rc = %d, wRc = %d, cRc = %d\n", "ARCHSYST", rc, wRc, cRc);

   rc = DosOpen("ARSYSRDY", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_REPLACE_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
       wRc = DosWrite(handle, (PVOID) archivedAttributeText, strlen(archivedAttributeText), &actionTaken);
       wRc = DosWrite(handle, (PVOID) systemAttributeText, strlen(systemAttributeText), &actionTaken);
       wRc = DosWrite(handle, (PVOID) readonlyAttributeText, strlen(readonlyAttributeText), &actionTaken);
       cRc = DosClose(handle);
       rc = DosSetFileMode("ARSYSRDY", FILE_ARCHIVED | FILE_SYSTEM | FILE_READONLY, 0);
   }

   printf("\tFile with archived, system, read-only attributes: name = \"%s\", rc = %d, wRc = %d, cRc = %d\n", "ARSYSRDY", rc, wRc, cRc);

   rc = DosOpen("ARCSYSHD", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_REPLACE_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
       wRc = DosWrite(handle, (PVOID) archivedAttributeText, strlen(archivedAttributeText), &actionTaken);
       wRc = DosWrite(handle, (PVOID) systemAttributeText, strlen(systemAttributeText), &actionTaken);
       wRc = DosWrite(handle, (PVOID) hiddenAttributeText, strlen(hiddenAttributeText), &actionTaken);
       cRc = DosClose(handle);
       rc = DosSetFileMode("ARCSYSHD", FILE_ARCHIVED | FILE_SYSTEM | FILE_HIDDEN, 0);
   }

   printf("\tFile with archived, system, hidden attributes: name = \"%s\", rc = %d, wRc = %d, cRc = %d\n", "ARCSYSHD", rc, wRc, cRc);

   rc = DosOpen("ARSYHDRD", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_REPLACE_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
       wRc = DosWrite(handle, (PVOID) archivedAttributeText, strlen(archivedAttributeText), &actionTaken);
       wRc = DosWrite(handle, (PVOID) systemAttributeText, strlen(systemAttributeText), &actionTaken);
       wRc = DosWrite(handle, (PVOID) hiddenAttributeText, strlen(hiddenAttributeText), &actionTaken);
       wRc = DosWrite(handle, (PVOID) readonlyAttributeText, strlen(readonlyAttributeText), &actionTaken);
       cRc = DosClose(handle);
       rc = DosSetFileMode("ARSYHDRD", FILE_ARCHIVED | FILE_SYSTEM | FILE_HIDDEN | FILE_READONLY, 0);
   }

   printf("\tFile with all (archived, system, hidden, read-only) attributes: name = \"%s\", rc = %d, wRc = %d, cRc = %d\n", "ARSYHDRD", rc, wRc, cRc);
}

void FilePermissions(const char *path)
{
   /* Do nothing, not supported by target operating system */
}

void ExtendedAttributes(const char *path)
{
   char drivePath[4];
   USHORT rc = 0, wRc = 0, cRc = 0;
   USHORT actionTaken = 0;
   HFILE handle;
   char message[300];
   EAOP eap;

   drivePath[0] = path[0];
   drivePath[1] = ':';
   drivePath[2] = '\\';
   drivePath[3] = 0;

   rc = DosChDir(drivePath, 0);

   if(rc)
   {
      printf("Cannot change to specified path, not continuing.\n");
      return;
   }

   rc = DosMkDir("XATTRS", 0);

   if(rc)
   {
      printf("Cannot create working directory.\n");
      return;
   }
   
   rc = DosChDir("XATTRS", 0);   

   printf("Creating files with extended attributes.\n");

   rc = DosOpen("COMMENTS", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_REPLACE_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
      eap.fpGEAList = NULL;
      eap.fpFEAList = (PFEALIST)&CommentsEA;
      eap.oError = 0;
      memset(&message, 0, 300);
      sprintf(&message, "This files has an optional .COMMENTS EA\n");
      wRc = DosWrite(handle, &message, strlen(message), &actionTaken);
      rc = DosSetFileInfo(handle, 2, (PBYTE) &eap, sizeof(EAOP));
      cRc = DosClose(handle);
   }

   printf("\tFile with comments = \"%s\", rc = %d, wRc = %d, cRc = %d\n", "COMMENTS", rc, wRc, cRc);

   rc = DosOpen("COMMENTS.CRT", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_REPLACE_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
      eap.fpGEAList = NULL;
      eap.fpFEAList = (PFEALIST)&CommentsEACritical;
      eap.oError = 0;
      memset(&message, 0, 300);
      sprintf(&message, "This files has a critical .COMMENTS EA\n");
      wRc = DosWrite(handle, &message, strlen(message), &actionTaken);
      rc = DosSetFileInfo(handle, 2, (PBYTE) &eap, sizeof(EAOP));
      cRc = DosClose(handle);
   }

   printf("\tFile with comments = \"%s\", rc = %d, wRc = %d, cRc = %d\n", "COMMENTS.CRT", rc, wRc, cRc);

   rc = DosOpen("ICON", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_REPLACE_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
      eap.fpGEAList = NULL;
      eap.fpFEAList = (PFEALIST)&IconEA;
      eap.oError = 0;
      memset(&message, 0, 300);
      sprintf(&message, "This files has an optional .ICON EA\n");
      wRc = DosWrite(handle, &message, strlen(message), &actionTaken);
      rc = DosSetFileInfo(handle, 2, (PBYTE) &eap, sizeof(EAOP));
      cRc = DosClose(handle);
   }

   printf("\tFile with icon = \"%s\", rc = %d, wRc = %d, cRc = %d\n", "ICON", rc, wRc, cRc);
}

void ResourceFork(const char *path)
{
   /* Do nothing, not supported by target operating system */
}

void Filenames(const char *path)
{
   char drivePath[4];
   USHORT rc = 0, wRc = 0, cRc = 0;
   USHORT actionTaken = 0;
   HFILE handle;
   char message[300];
   int pos = 0;

   drivePath[0] = path[0];
   drivePath[1] = ':';
   drivePath[2] = '\\';
   drivePath[3] = 0;

   rc = DosChDir(drivePath, 0);

   if(rc)
   {
      printf("Cannot change to specified path, not continuing.\n");
      return;
   }

   rc = DosMkDir("FILENAME", 0);

   if(rc)
   {
      printf("Cannot create working directory.\n");
      return;
   }
   
   rc = DosChDir("FILENAME", 0);   

   printf("Creating files with different filenames.\n");

   for(pos = 0; filenames[pos]; pos++)
   {
       rc = DosOpen((PSZ)filenames[pos], &handle, &actionTaken, 0,
                         FILE_NORMAL,
                         OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_FAIL_IF_EXISTS,
                         OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

       if(!rc)
       {
           memset(&message, 0, 300);
           sprintf(&message, FILENAME_FORMAT, filenames[pos]);
           wRc = DosWrite(handle, &message, strlen(message), &actionTaken);
           cRc = DosClose(handle);
       }

       printf("\tFile name = \"%s\", rc = %d, wRc = %d, cRc = %d\n", filenames[pos], rc, wRc, cRc);
   }
}

#define DATETIME_FORMAT "This file is dated %04d/%02d/%02d %02d:%02d:%02d for %s\n"

void Timestamps(const char *path)
{
   char drivePath[4];
   USHORT rc = 0, wRc = 0, cRc = 0, tRc = 0;
   USHORT actionTaken = 0;
   HFILE handle;
   char message[300];
   FILESTATUS status;

   drivePath[0] = path[0];
   drivePath[1] = ':';
   drivePath[2] = '\\';
   drivePath[3] = 0;

   rc = DosChDir(drivePath, 0);

   if(rc)
   {
      printf("Cannot change to specified path, not continuing.\n");
      return;
   }

   rc = DosMkDir("TIMES", 0);

   if(rc)
   {
      printf("Cannot create working directory.\n");
      return;
   }
   
   rc = DosChDir("TIMES", 0);   

   printf("Creating timestamped files.\n");

   rc = DosOpen((PSZ)"MAXCTIME", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_FAIL_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
      memset(&status, 0, sizeof(FILESTATUS));
       status.fdateCreation.year = 127;
       status.fdateCreation.month = 12;
       status.fdateCreation.day = 31;
       status.ftimeCreation.hours = 23;
       status.ftimeCreation.minutes = 59;
       status.ftimeCreation.twosecs = 29;
       memset(&message, 0, 300);
       sprintf(&message, DATETIME_FORMAT,
                status.fdateCreation.year + 1980, status.fdateCreation.month, status.fdateCreation.day,
                status.ftimeCreation.hours, status.ftimeCreation.minutes, status.ftimeCreation.twosecs*2,
                "creation");

       wRc = DosWrite(handle, &message, strlen(message), &actionTaken);
       tRc = DosSetFileInfo(handle, 1, (PBYTE) &status, sizeof(FILESTATUS));
       cRc = DosClose(handle);
   }

   printf("\tFile name = \"%s\", rc = %d, wRc = %d, cRc = %d, tRc = %d\n", "MAXCTIME", rc, wRc, cRc, tRc);

   rc = DosOpen((PSZ)"MINCTIME", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_FAIL_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
      memset(&status, 0, sizeof(FILESTATUS));
       status.fdateCreation.year = 0;
       status.fdateCreation.month = 1;
       status.fdateCreation.day = 1;
       status.ftimeCreation.hours = 0;
       status.ftimeCreation.minutes = 0;
       status.ftimeCreation.twosecs = 0;
       memset(&message, 0, 300);
       sprintf(&message, DATETIME_FORMAT,
                status.fdateCreation.year + 1980, status.fdateCreation.month, status.fdateCreation.day,
                status.ftimeCreation.hours, status.ftimeCreation.minutes, status.ftimeCreation.twosecs*2,
                "creation");

       wRc = DosWrite(handle, &message, strlen(message), &actionTaken);
       tRc = DosSetFileInfo(handle, 1, (PBYTE) &status, sizeof(FILESTATUS));
       cRc = DosClose(handle);
   }

   printf("\tFile name = \"%s\", rc = %d, wRc = %d, cRc = %d, tRc = %d\n", "MINCTIME", rc, wRc, cRc, tRc);

   rc = DosOpen((PSZ)"Y19CTIME", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_FAIL_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
      memset(&status, 0, sizeof(FILESTATUS));
       status.fdateCreation.year = 1999 - 1980;
       status.fdateCreation.month = 12;
       status.fdateCreation.day = 31;
       status.ftimeCreation.hours = 23;
       status.ftimeCreation.minutes = 59;
       status.ftimeCreation.twosecs = 29;
       memset(&message, 0, 300);
       sprintf(&message, DATETIME_FORMAT,
                status.fdateCreation.year + 1980, status.fdateCreation.month, status.fdateCreation.day,
                status.ftimeCreation.hours, status.ftimeCreation.minutes, status.ftimeCreation.twosecs*2,
                "creation");

       wRc = DosWrite(handle, &message, strlen(message), &actionTaken);
       tRc = DosSetFileInfo(handle, 1, (PBYTE) &status, sizeof(FILESTATUS));
       cRc = DosClose(handle);
   }

   printf("\tFile name = \"%s\", rc = %d, wRc = %d, cRc = %d, tRc = %d\n", "Y19CTIME", rc, wRc, cRc, tRc);

   rc = DosOpen((PSZ)"Y2KCTIME", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_FAIL_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
      memset(&status, 0, sizeof(FILESTATUS));
       status.fdateCreation.year = 2000 - 1980;
       status.fdateCreation.month = 1;
       status.fdateCreation.day = 1;
       status.ftimeCreation.hours = 0;
       status.ftimeCreation.minutes = 0;
       status.ftimeCreation.twosecs = 0;
       memset(&message, 0, 300);
       sprintf(&message, DATETIME_FORMAT,
                status.fdateCreation.year + 1980, status.fdateCreation.month, status.fdateCreation.day,
                status.ftimeCreation.hours, status.ftimeCreation.minutes, status.ftimeCreation.twosecs*2,
                "creation");

       wRc = DosWrite(handle, &message, strlen(message), &actionTaken);
       tRc = DosSetFileInfo(handle, 1, (PBYTE) &status, sizeof(FILESTATUS));
       cRc = DosClose(handle);
   }

   printf("\tFile name = \"%s\", rc = %d, wRc = %d, cRc = %d, tRc = %d\n", "Y19CTIME", rc, wRc, cRc, tRc);

   rc = DosOpen((PSZ)"MAXWTIME", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_FAIL_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
      memset(&status, 0, sizeof(FILESTATUS));
       status.fdateLastWrite.year = 127;
       status.fdateLastWrite.month = 12;
       status.fdateLastWrite.day = 31;
       status.ftimeLastWrite.hours = 23;
       status.ftimeLastWrite.minutes = 59;
       status.ftimeLastWrite.twosecs = 29;
       memset(&message, 0, 300);
       sprintf(&message, DATETIME_FORMAT,
                status.fdateLastWrite.year + 1980, status.fdateLastWrite.month, status.fdateLastWrite.day,
                status.ftimeLastWrite.hours, status.ftimeLastWrite.minutes, status.ftimeLastWrite.twosecs*2,
                "last written");

       wRc = DosWrite(handle, &message, strlen(message), &actionTaken);
       tRc = DosSetFileInfo(handle, 1, (PBYTE) &status, sizeof(FILESTATUS));
       cRc = DosClose(handle);
   }

   printf("\tFile name = \"%s\", rc = %d, wRc = %d, cRc = %d, tRc = %d\n", "MAXWTIME", rc, wRc, cRc, tRc);

   rc = DosOpen((PSZ)"MINWTIME", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_FAIL_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
      memset(&status, 0, sizeof(FILESTATUS));
       status.fdateLastWrite.year = 0;
       status.fdateLastWrite.month = 1;
       status.fdateLastWrite.day = 1;
       status.ftimeLastWrite.hours = 0;
       status.ftimeLastWrite.minutes = 0;
       status.ftimeLastWrite.twosecs = 0;
       memset(&message, 0, 300);
       sprintf(&message, DATETIME_FORMAT,
                status.fdateLastWrite.year + 1980, status.fdateLastWrite.month, status.fdateLastWrite.day,
                status.ftimeLastWrite.hours, status.ftimeLastWrite.minutes, status.ftimeLastWrite.twosecs*2,
                "last written");

       wRc = DosWrite(handle, &message, strlen(message), &actionTaken);
       tRc = DosSetFileInfo(handle, 1, (PBYTE) &status, sizeof(FILESTATUS));
       cRc = DosClose(handle);
   }

   printf("\tFile name = \"%s\", rc = %d, wRc = %d, cRc = %d, tRc = %d\n", "MINWTIME", rc, wRc, cRc, tRc);

   rc = DosOpen((PSZ)"Y19WTIME", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_FAIL_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
      memset(&status, 0, sizeof(FILESTATUS));
       status.fdateLastWrite.year = 1999 - 1980;
       status.fdateLastWrite.month = 12;
       status.fdateLastWrite.day = 31;
       status.ftimeLastWrite.hours = 23;
       status.ftimeLastWrite.minutes = 59;
       status.ftimeLastWrite.twosecs = 29;
       memset(&message, 0, 300);
       sprintf(&message, DATETIME_FORMAT,
                status.fdateLastWrite.year + 1980, status.fdateLastWrite.month, status.fdateLastWrite.day,
                status.ftimeLastWrite.hours, status.ftimeLastWrite.minutes, status.ftimeLastWrite.twosecs*2,
                "last written");

       wRc = DosWrite(handle, &message, strlen(message), &actionTaken);
       tRc = DosSetFileInfo(handle, 1, (PBYTE) &status, sizeof(FILESTATUS));
       cRc = DosClose(handle);
   }

   printf("\tFile name = \"%s\", rc = %d, wRc = %d, cRc = %d, tRc = %d\n", "Y19WTIME", rc, wRc, cRc, tRc);

   rc = DosOpen((PSZ)"Y2KWTIME", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_FAIL_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
      memset(&status, 0, sizeof(FILESTATUS));
       status.fdateLastWrite.year = 2000 - 1980;
       status.fdateLastWrite.month = 1;
       status.fdateLastWrite.day = 1;
       status.ftimeLastWrite.hours = 0;
       status.ftimeLastWrite.minutes = 0;
       status.ftimeLastWrite.twosecs = 0;
       memset(&message, 0, 300);
       sprintf(&message, DATETIME_FORMAT,
                status.fdateLastWrite.year + 1980, status.fdateLastWrite.month, status.fdateLastWrite.day,
                status.ftimeLastWrite.hours, status.ftimeLastWrite.minutes, status.ftimeLastWrite.twosecs*2,
                "last written");

       wRc = DosWrite(handle, &message, strlen(message), &actionTaken);
       tRc = DosSetFileInfo(handle, 1, (PBYTE) &status, sizeof(FILESTATUS));
       cRc = DosClose(handle);
   }

   printf("\tFile name = \"%s\", rc = %d, wRc = %d, cRc = %d, tRc = %d\n", "Y2KWTIME", rc, wRc, cRc, tRc);

   rc = DosOpen((PSZ)"MAXATIME", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_FAIL_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
      memset(&status, 0, sizeof(FILESTATUS));
       status.fdateLastAccess.year = 127;
       status.fdateLastAccess.month = 12;
       status.fdateLastAccess.day = 31;
       status.ftimeLastAccess.hours = 23;
       status.ftimeLastAccess.minutes = 59;
       status.ftimeLastAccess.twosecs = 29;
       memset(&message, 0, 300);
       sprintf(&message, DATETIME_FORMAT,
                status.fdateLastAccess.year + 1980, status.fdateLastAccess.month, status.fdateLastAccess.day,
                status.ftimeLastAccess.hours, status.ftimeLastAccess.minutes, status.ftimeLastAccess.twosecs*2,
                "last access");

       wRc = DosWrite(handle, &message, strlen(message), &actionTaken);
       tRc = DosSetFileInfo(handle, 1, (PBYTE) &status, sizeof(FILESTATUS));
       cRc = DosClose(handle);
   }

   printf("\tFile name = \"%s\", rc = %d, wRc = %d, cRc = %d, tRc = %d\n", "MAXATIME", rc, wRc, cRc, tRc);

   rc = DosOpen((PSZ)"MINATIME", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_FAIL_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
      memset(&status, 0, sizeof(FILESTATUS));
       status.fdateLastAccess.year = 0;
       status.fdateLastAccess.month = 1;
       status.fdateLastAccess.day = 1;
       status.ftimeLastAccess.hours = 0;
       status.ftimeLastAccess.minutes = 0;
       status.ftimeLastAccess.twosecs = 0;
       memset(&message, 0, 300);
       sprintf(&message, DATETIME_FORMAT,
                status.fdateLastAccess.year + 1980, status.fdateLastAccess.month, status.fdateLastAccess.day,
                status.ftimeLastAccess.hours, status.ftimeLastAccess.minutes, status.ftimeLastAccess.twosecs*2,
                "last access");

       wRc = DosWrite(handle, &message, strlen(message), &actionTaken);
       tRc = DosSetFileInfo(handle, 1, (PBYTE) &status, sizeof(FILESTATUS));
       cRc = DosClose(handle);
   }

   printf("\tFile name = \"%s\", rc = %d, wRc = %d, cRc = %d, tRc = %d\n", "MINATIME", rc, wRc, cRc, tRc);

   rc = DosOpen((PSZ)"Y19ATIME", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_FAIL_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
      memset(&status, 0, sizeof(FILESTATUS));
       status.fdateLastAccess.year = 1999 - 1980;
       status.fdateLastAccess.month = 12;
       status.fdateLastAccess.day = 31;
       status.ftimeLastAccess.hours = 23;
       status.ftimeLastAccess.minutes = 59;
       status.ftimeLastAccess.twosecs = 29;
       memset(&message, 0, 300);
       sprintf(&message, DATETIME_FORMAT,
                status.fdateLastAccess.year + 1980, status.fdateLastAccess.month, status.fdateLastAccess.day,
                status.ftimeLastAccess.hours, status.ftimeLastAccess.minutes, status.ftimeLastAccess.twosecs*2,
                "last access");

       wRc = DosWrite(handle, &message, strlen(message), &actionTaken);
       tRc = DosSetFileInfo(handle, 1, (PBYTE) &status, sizeof(FILESTATUS));
       cRc = DosClose(handle);
   }

   printf("\tFile name = \"%s\", rc = %d, wRc = %d, cRc = %d, tRc = %d\n", "Y19ATIME", rc, wRc, cRc, tRc);

   rc = DosOpen((PSZ)"Y2KATIME", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_FAIL_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
      memset(&status, 0, sizeof(FILESTATUS));
       status.fdateLastAccess.year = 2000 - 1980;
       status.fdateLastAccess.month = 1;
       status.fdateLastAccess.day = 1;
       status.ftimeLastAccess.hours = 0;
       status.ftimeLastAccess.minutes = 0;
       status.ftimeLastAccess.twosecs = 0;
       memset(&message, 0, 300);
       sprintf(&message, DATETIME_FORMAT,
                status.fdateLastAccess.year + 1980, status.fdateLastAccess.month, status.fdateLastAccess.day,
                status.ftimeLastAccess.hours, status.ftimeLastAccess.minutes, status.ftimeLastAccess.twosecs*2,
                "last access");

       wRc = DosWrite(handle, &message, strlen(message), &actionTaken);
       tRc = DosSetFileInfo(handle, 1, (PBYTE) &status, sizeof(FILESTATUS));
       cRc = DosClose(handle);
   }

   printf("\tFile name = \"%s\", rc = %d, wRc = %d, cRc = %d, tRc = %d\n", "Y2KATIME", rc, wRc, cRc, tRc);

   rc = DosOpen((PSZ)"MAX_TIME", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_FAIL_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
      memset(&status, 0, sizeof(FILESTATUS));
       status.fdateCreation.year = 127;
       status.fdateCreation.month = 12;
       status.fdateCreation.day = 31;
       status.ftimeCreation.hours = 23;
       status.ftimeCreation.minutes = 59;
       status.ftimeCreation.twosecs = 29;
       status.fdateLastAccess = status.fdateCreation;
       status.ftimeLastAccess = status.ftimeCreation;
       status.fdateLastWrite = status.fdateCreation;
       status.ftimeLastWrite = status.ftimeCreation;
       memset(&message, 0, 300);
       sprintf(&message, DATETIME_FORMAT,
                status.fdateCreation.year + 1980, status.fdateCreation.month, status.fdateCreation.day,
                status.ftimeCreation.hours, status.ftimeCreation.minutes, status.ftimeCreation.twosecs*2,
                "all");

       wRc = DosWrite(handle, &message, strlen(message), &actionTaken);
       tRc = DosSetFileInfo(handle, 1, (PBYTE) &status, sizeof(FILESTATUS));
       cRc = DosClose(handle);
   }

   printf("\tFile name = \"%s\", rc = %d, wRc = %d, cRc = %d, tRc = %d\n", "MAX_TIME", rc, wRc, cRc, tRc);

   rc = DosOpen((PSZ)"MIN_TIME", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_FAIL_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
      memset(&status, 0, sizeof(FILESTATUS));
       status.fdateCreation.year = 0;
       status.fdateCreation.month = 1;
       status.fdateCreation.day = 1;
       status.ftimeCreation.hours = 0;
       status.ftimeCreation.minutes = 0;
       status.ftimeCreation.twosecs = 0;
       status.fdateLastAccess = status.fdateCreation;
       status.ftimeLastAccess = status.ftimeCreation;
       status.fdateLastWrite = status.fdateCreation;
       status.ftimeLastWrite = status.ftimeCreation;
       memset(&message, 0, 300);
       sprintf(&message, DATETIME_FORMAT,
                status.fdateCreation.year + 1980, status.fdateCreation.month, status.fdateCreation.day,
                status.ftimeCreation.hours, status.ftimeCreation.minutes, status.ftimeCreation.twosecs*2,
                "all");

       wRc = DosWrite(handle, &message, strlen(message), &actionTaken);
       tRc = DosSetFileInfo(handle, 1, (PBYTE) &status, sizeof(FILESTATUS));
       cRc = DosClose(handle);
   }

   printf("\tFile name = \"%s\", rc = %d, wRc = %d, cRc = %d, tRc = %d\n", "MIN_TIME", rc, wRc, cRc, tRc);

   rc = DosOpen((PSZ)"Y19_TIME", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_FAIL_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
      memset(&status, 0, sizeof(FILESTATUS));
       status.fdateCreation.year = 1999 - 1980;
       status.fdateCreation.month = 12;
       status.fdateCreation.day = 31;
       status.ftimeCreation.hours = 23;
       status.ftimeCreation.minutes = 59;
       status.ftimeCreation.twosecs = 29;
       status.fdateLastAccess = status.fdateCreation;
       status.ftimeLastAccess = status.ftimeCreation;
       status.fdateLastWrite = status.fdateCreation;
       status.ftimeLastWrite = status.ftimeCreation;
       memset(&message, 0, 300);
       sprintf(&message, DATETIME_FORMAT,
                status.fdateCreation.year + 1980, status.fdateCreation.month, status.fdateCreation.day,
                status.ftimeCreation.hours, status.ftimeCreation.minutes, status.ftimeCreation.twosecs*2,
                "all");

       wRc = DosWrite(handle, &message, strlen(message), &actionTaken);
       tRc = DosSetFileInfo(handle, 1, (PBYTE) &status, sizeof(FILESTATUS));
       cRc = DosClose(handle);
   }

   printf("\tFile name = \"%s\", rc = %d, wRc = %d, cRc = %d, tRc = %d\n", "Y19_TIME", rc, wRc, cRc, tRc);

   rc = DosOpen((PSZ)"Y2K_TIME", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_FAIL_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);

   if(!rc)
   {
      memset(&status, 0, sizeof(FILESTATUS));
       status.fdateCreation.year = 2000 - 1980;
       status.fdateCreation.month = 1;
       status.fdateCreation.day = 1;
       status.ftimeCreation.hours = 0;
       status.ftimeCreation.minutes = 0;
       status.ftimeCreation.twosecs = 0;
       status.fdateLastAccess = status.fdateCreation;
       status.ftimeLastAccess = status.ftimeCreation;
       status.fdateLastWrite = status.fdateCreation;
       status.ftimeLastWrite = status.ftimeCreation;
       memset(&message, 0, 300);
       sprintf(&message, DATETIME_FORMAT,
                status.fdateCreation.year + 1980, status.fdateCreation.month, status.fdateCreation.day,
                status.ftimeCreation.hours, status.ftimeCreation.minutes, status.ftimeCreation.twosecs*2,
                "all");

       wRc = DosWrite(handle, &message, strlen(message), &actionTaken);
       tRc = DosSetFileInfo(handle, 1, (PBYTE) &status, sizeof(FILESTATUS));
       cRc = DosClose(handle);
   }

   printf("\tFile name = \"%s\", rc = %d, wRc = %d, cRc = %d, tRc = %d\n", "Y2K_TIME", rc, wRc, cRc, tRc);
}

void DirectoryDepth(const char *path)
{
   char drivePath[4];
   USHORT rc = 0;
   char filename[9];
   long pos = 2;

   drivePath[0] = path[0];
   drivePath[1] = ':';
   drivePath[2] = '\\';
   drivePath[3] = 0;

   rc = DosChDir(drivePath, 0);

   if(rc)
   {
      printf("Cannot change to specified path, not continuing.\n");
      return;
   }

   rc = DosMkDir("DEPTH", 0);

   if(rc)
   {
      printf("Cannot create working directory.\n");
      return;
   }
   
   rc = DosChDir("DEPTH", 0);   

   printf("Creating deepest directory tree.\n");

   while(!rc)
   {
       memset(&filename, 0, 9);
       sprintf(&filename, "%08d", pos);
       rc = DosMkDir(filename, 0);

       if(!rc)
           rc = DosChDir(filename, 0);

       pos++;
   }

   printf("\tCreated %d levels of directory hierarchy\n", pos);
}

void Fragmentation(const char *path, size_t clusterSize)
{
   size_t halfCluster = clusterSize / 2;
   size_t quarterCluster = clusterSize / 4;
   size_t twoCluster = clusterSize * 2;
   size_t threeQuartersCluster = halfCluster + quarterCluster;
   size_t twoAndThreeQuartCluster = threeQuartersCluster + twoCluster;
   unsigned char *buffer;
   char drivePath[4];
   USHORT rc = 0, wRc = 0, cRc = 0;
   USHORT actionTaken = 0;
   HFILE handle;
   long i;

   drivePath[0] = path[0];
   drivePath[1] = ':';
   drivePath[2] = '\\';
   drivePath[3] = 0;

   rc = DosChDir(drivePath, 0);

   if(rc)
   {
      printf("Cannot change to specified path, not continuing.\n");
      return;
   }

   rc = DosMkDir("FRAGS", 0);

   if(rc)
   {
      printf("Cannot create working directory.\n");
      return;
   }
   
   rc = DosChDir("FRAGS", 0);   

   rc = DosOpen((PSZ)"HALFCLST", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_FAIL_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_FLAGS_NO_CACHE | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);
   if(!rc)
   {
      buffer = malloc(halfCluster);
      memset(buffer, 0, halfCluster);

      for(i = 0; i < halfCluster; i++)
          buffer[i] = clauniaBytes[i % CLAUNIA_SIZE];

      wRc = DosWrite(handle, buffer, halfCluster, &actionTaken);
      cRc = DosClose(handle);
      free(buffer);
   }

   printf("\tFile name = \"%s\", size = %d, rc = %d, wRc = %d, cRc = %d\n", "HALFCLST", halfCluster, rc, wRc, cRc);

   rc = DosOpen((PSZ)"QUARCLST", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_FAIL_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_FLAGS_NO_CACHE | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);
   if(!rc)
   {
      buffer = malloc(quarterCluster);
      memset(buffer, 0, quarterCluster);

      for(i = 0; i < quarterCluster; i++)
          buffer[i] = clauniaBytes[i % CLAUNIA_SIZE];

      wRc = DosWrite(handle, buffer, quarterCluster, &actionTaken);
      cRc = DosClose(handle);
      free(buffer);
   }

   printf("\tFile name = \"%s\", size = %d, rc = %d, wRc = %d, cRc = %d\n", "QUARCLST", quarterCluster, rc, wRc, cRc);

   rc = DosOpen((PSZ)"TWOCLST", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_FAIL_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_FLAGS_NO_CACHE | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);
   if(!rc)
   {
      buffer = malloc(twoCluster);
      memset(buffer, 0, twoCluster);

      for(i = 0; i < twoCluster; i++)
          buffer[i] = clauniaBytes[i % CLAUNIA_SIZE];

      wRc = DosWrite(handle, buffer, twoCluster, &actionTaken);
      cRc = DosClose(handle);
      free(buffer);
   }

   printf("\tFile name = \"%s\", size = %d, rc = %d, wRc = %d, cRc = %d\n", "TWOCLST", twoCluster, rc, wRc, cRc);

   rc = DosOpen((PSZ)"TRQTCLST", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_FAIL_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_FLAGS_NO_CACHE | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);
   if(!rc)
   {
      buffer = malloc(threeQuartersCluster);
      memset(buffer, 0, threeQuartersCluster);

      for(i = 0; i < threeQuartersCluster; i++)
          buffer[i] = clauniaBytes[i % CLAUNIA_SIZE];

      wRc = DosWrite(handle, buffer, threeQuartersCluster, &actionTaken);
      cRc = DosClose(handle);
      free(buffer);
   }

   printf("\tFile name = \"%s\", size = %d, rc = %d, wRc = %d, cRc = %d\n", "TRQTCLST", threeQuartersCluster, rc, wRc, cRc);

   rc = DosOpen((PSZ)"TWTQCLST", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_FAIL_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_FLAGS_NO_CACHE | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);
   if(!rc)
   {
      buffer = malloc(twoAndThreeQuartCluster);
      memset(buffer, 0, twoAndThreeQuartCluster);

      for(i = 0; i < twoAndThreeQuartCluster; i++)
          buffer[i] = clauniaBytes[i % CLAUNIA_SIZE];

      wRc = DosWrite(handle, buffer, twoAndThreeQuartCluster, &actionTaken);
      cRc = DosClose(handle);
      free(buffer);
   }

   printf("\tFile name = \"%s\", size = %d, rc = %d, wRc = %d, cRc = %d\n", "TWTQCLST", twoAndThreeQuartCluster, rc, wRc, cRc);

   rc = DosOpen((PSZ)"TWO1", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_FAIL_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_FLAGS_NO_CACHE | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);
   if(!rc)
   {
      buffer = malloc(twoCluster);
      memset(buffer, 0, twoCluster);

      for(i = 0; i < twoCluster; i++)
          buffer[i] = clauniaBytes[i % CLAUNIA_SIZE];

      wRc = DosWrite(handle, buffer, twoCluster, &actionTaken);
      cRc = DosClose(handle);
      free(buffer);
   }

   printf("\tFile name = \"%s\", size = %d, rc = %d, wRc = %d, cRc = %d\n", "TWO1", twoCluster, rc, wRc, cRc);

   rc = DosOpen((PSZ)"TWO2", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_FAIL_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_FLAGS_NO_CACHE | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);
   if(!rc)
   {
      buffer = malloc(twoCluster);
      memset(buffer, 0, twoCluster);

      for(i = 0; i < twoCluster; i++)
          buffer[i] = clauniaBytes[i % CLAUNIA_SIZE];

      wRc = DosWrite(handle, buffer, twoCluster, &actionTaken);
      cRc = DosClose(handle);
      free(buffer);
   }

   printf("\tFile name = \"%s\", size = %d, rc = %d, wRc = %d, cRc = %d\n", "TWO2", twoCluster, rc, wRc, cRc);

   rc = DosOpen((PSZ)"TWO3", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_FAIL_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_FLAGS_NO_CACHE | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);
   if(!rc)
   {
      buffer = malloc(twoCluster);
      memset(buffer, 0, twoCluster);

      for(i = 0; i < twoCluster; i++)
          buffer[i] = clauniaBytes[i % CLAUNIA_SIZE];

      wRc = DosWrite(handle, buffer, twoCluster, &actionTaken);
      cRc = DosClose(handle);
      free(buffer);
   }

   printf("\tDeleting \"TWO2\".\n");
   rc = DosDelete((PSZ)"TWO2", 0);

   printf("\tFile name = \"%s\", size = %d, rc = %d, wRc = %d, cRc = %d\n", "TWO3", twoCluster, rc, wRc, cRc);

   rc = DosOpen((PSZ)"FRAGTHRQ", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_FAIL_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_FLAGS_NO_CACHE | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);
   if(!rc)
   {
      buffer = malloc(threeQuartersCluster);
      memset(buffer, 0, threeQuartersCluster);

      for(i = 0; i < threeQuartersCluster; i++)
          buffer[i] = clauniaBytes[i % CLAUNIA_SIZE];

      wRc = DosWrite(handle, buffer, threeQuartersCluster, &actionTaken);
      cRc = DosClose(handle);
      free(buffer);
   }

   printf("\tDeleting \"TWO1\".\n");
   rc = DosDelete((PSZ)"TWO1", 0);
   printf("\tDeleting \"TWO3\".\n");
   rc = DosDelete((PSZ)"TWO3", 0);

   printf("\tFile name = \"%s\", size = %d, rc = %d, wRc = %d, cRc = %d\n", "FRAGTHRQ", threeQuartersCluster, rc, wRc, cRc);

   rc = DosOpen((PSZ)"FRAGSIXQ", &handle, &actionTaken, 0,
                     FILE_NORMAL,
                     OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_FAIL_IF_EXISTS,
                     OPEN_FLAGS_NOINHERIT | OPEN_FLAGS_NO_CACHE | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);
   if(!rc)
   {
      buffer = malloc(twoAndThreeQuartCluster);
      memset(buffer, 0, twoAndThreeQuartCluster);

      for(i = 0; i < twoAndThreeQuartCluster; i++)
          buffer[i] = clauniaBytes[i % CLAUNIA_SIZE];

      wRc = DosWrite(handle, buffer, twoAndThreeQuartCluster, &actionTaken);
      cRc = DosClose(handle);
      free(buffer);
   }

   printf("\tFile name = \"%s\", size = %d, rc = %d, wRc = %d, cRc = %d\n", "FRAGSIXQ", twoAndThreeQuartCluster, rc, wRc, cRc);
}

void Sparse(const char *path)
{
   /* Do nothing, not supported by target operating system */
}

void MillionFiles(const char *path)
{
   char drivePath[4];
   USHORT rc = 0;
   char filename[9];
   unsigned long long pos = 0;
   USHORT actionTaken = 0;
   HFILE handle;

   drivePath[0] = path[0];
   drivePath[1] = ':';
   drivePath[2] = '\\';
   drivePath[3] = 0;

   rc = DosChDir(drivePath, 0);

   if(rc)
   {
      printf("Cannot change to specified path, not continuing.\n");
      return;
   }

   rc = DosMkDir("MILLION", 0);

   if(rc)
   {
      printf("Cannot create working directory.\n");
      return;
   }
   
   rc = DosChDir("MILLION", 0);   

   printf("Creating lots of files.\n");

   for(pos = 0; pos < 100000ULL; pos++)
   {
       memset(&filename, 0, 9);
       sprintf(&filename, "%08d", pos);
       rc = DosOpen(&filename, &handle, &actionTaken, 0,
                         FILE_NORMAL,
                         OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_FAIL_IF_EXISTS,
                         OPEN_FLAGS_NOINHERIT | OPEN_FLAGS_NO_CACHE | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);
       if(rc)
          break;

       DosClose(handle);
   }

   printf("\tCreated %llu files\n", pos);
}

void DeleteFiles(const char *path)
{
   char drivePath[4];
   USHORT rc = 0;
   char filename[9];
   short pos = 0;
   USHORT actionTaken = 0;
   HFILE handle;

   drivePath[0] = path[0];
   drivePath[1] = ':';
   drivePath[2] = '\\';
   drivePath[3] = 0;

   rc = DosChDir(drivePath, 0);

   if(rc)
   {
      printf("Cannot change to specified path, not continuing.\n");
      return;
   }

   rc = DosMkDir("DELETED", 0);

   if(rc)
   {
      printf("Cannot create working directory.\n");
      return;
   }
   
   rc = DosChDir("DELETED", 0);   

   printf("Creating and deleting files.\n");

   for(pos = 0; pos < 64; pos++)
   {
       memset(&filename, 0, 9);
       sprintf(&filename, "%X", pos);
       rc = DosOpen(&filename, &handle, &actionTaken, 0,
                         FILE_NORMAL,
                         OPEN_ACTION_CREATE_IF_NEW | OPEN_ACTION_FAIL_IF_EXISTS,
                         OPEN_FLAGS_NOINHERIT | OPEN_FLAGS_NO_CACHE | OPEN_SHARE_DENYNONE | OPEN_ACCESS_READWRITE, 0);
       if(rc)
          break;

       DosClose(handle);
       DosDelete(&filename, 0);
   }
}
#endif