/*  DOS Date and Time Stamp

    Copyright (c) Express Software 1997.
    All Rights Reserved.

    Created by: Joseph Cosentino.
        
*/

// I N C L U D E S //////////////////////////////////////////////////////////

#include <dos.h>
#include <fcntl.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>

// F U N C T I O N S ////////////////////////////////////////////////////////

int classify_args(int argc, char *rawargs[], char *fileargs[], char *optargs[])
{
    int index, jndex, kndex;
    char *argptr;

    for (index=0,jndex=0,kndex=0;index<argc;index++)
        {
        argptr = rawargs[index];
        if (*argptr == '/')
            {
            argptr++;
            optargs[kndex++] = argptr;
            } // end if.
        else
            {
            fileargs[jndex++] = argptr;
            } // end else.
            
        } // end for.

   return kndex;

} // end classify_args.

/////////////////////////////////////////////////////////////////////////////

void main(int argc, char *argv[])
{
    char *fileargs[64], *optargs[64];
    struct find_t fi;
    struct dosdate_t date;
    struct dostime_t time;
    int result, handle, index, n_options, help_flag=0;
    unsigned fdate, ftime;

    n_options = classify_args(argc, argv, fileargs, optargs);
    
    for (index=0;index<n_options;index++)
        {
        if (optargs[index][0] == '?') help_flag=1;
        else
            {
            printf("Invalid parameter - /%s\n", strupr(optargs[index]));
            exit(1);
            } // end else.
            
        } // end for.
    
    if (help_flag)
        {
        printf("Changes all files to current system date and time\n\n"
               "Syntax: MKDOS [/?]\n"
               "  /?  Displays this help message\n");
        exit(1);
        } // end if.

    result = _dos_findfirst("*.*", 0, &fi);
    _dos_getdate(&date);
    _dos_gettime(&time);
    fdate = (date.year - 1980) << 9;
    fdate += date.month << 5;
    fdate += date.day;
    ftime = time.hour << 11;
    ftime += time.minute << 5;
    ftime += time.second / 2;

    while (!result)
        {
        if (_dos_open(fi.name, 0, &handle))
            fprintf(stderr, "Error accessing %s\n", fi.name);
        else
            {
            _dos_setftime(handle, fdate, ftime);
            _dos_close(handle);
            } // end else.
            
        result = _dos_findnext(&fi);
        
        } // end while.
            
} // end main.