home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 9 Archive / 09-Archive.zip / OS2ARC_S.ZIP / ARCDOS.C < prev    next >
C/C++ Source or Header  |  1987-10-16  |  2KB  |  85 lines
  1. /*  ARC - Archive utility - ARCDOS
  2.  
  3. $define(tag,$$segment(@1,$$index(@1,=)+1))#
  4. $define(version,Version $tag(
  5. TED_VERSION DB =1.43), created on $tag(
  6. TED_DATE DB =11/09/85) at $tag(
  7. TED_TIME DB =22:24:44))#
  8. $undefine(tag)#
  9.     $version
  10.  
  11. (C) COPYRIGHT 1985 by System Enhancement Associates; ALL RIGHTS RESERVED
  12.  
  13.     By:  Thom Henderson
  14.  
  15.     Description:
  16.          This file contains certain DOS level routines that assist
  17.          in doing fancy things with an archive, primarily reading and
  18.          setting the date and time last modified.
  19.  
  20.          These are, by nature, system dependant functions.  But they are
  21.          also, by nature, very expendable.
  22.  
  23.     Language:
  24.          Computer Innovations Optimizing C86
  25. */
  26. #include <stdio.h>
  27. #include "arc.h"
  28.  
  29.  
  30. /*
  31.  * Define OS/2 procedures we are using here 
  32.  */
  33.  
  34. extern far pascal DOSQFILEINFO(int, int, unsigned char far *, int);
  35. extern far pascal DOSSETFILEINFO(int, int, unsigned char far *, int);
  36.  
  37. typedef struct FileInfo {
  38.     unsigned int cdate;
  39.     unsigned int ctime;
  40.     unsigned int adate;
  41.     unsigned int atime;
  42.     unsigned int wdate;
  43.     unsigned int wtime;
  44.     unsigned long filesize;
  45.     unsigned long filealloc;
  46.     unsigned int attribute;
  47.     } FILEINFO;
  48.  
  49. FILEINFO finfo;
  50.  
  51. getstamp(f,date,time)                  /* get a file's date/time stamp */
  52. FILE *f;                               /* file to get stamp from */
  53. unsigned int *date, *time;             /* storage for the stamp */
  54. {
  55.     int res;
  56.  
  57.     if (res = DOSQFILEINFO(fileno(f),1,(unsigned char far *)
  58.                          &finfo,sizeof(FILEINFO)))
  59.          printf("Get timestamp fail (%d)\n",res);
  60.  
  61.     *date = finfo.wdate;                    /* save date/time */
  62.     *time = finfo.wtime;
  63. }
  64.  
  65. setstamp(f,date,time)                  /* set a file's date/time stamp */
  66. FILE *f;                               /* file to set stamp on */
  67. unsigned int date, time;               /* desired date, time */
  68. {
  69.     int res;
  70.  
  71.     fflush(f);                         /* force any pending output */
  72.  
  73.     finfo.cdate = finfo.ctime = finfo.adate = finfo.atime = 0;
  74.     finfo.wdate = date;
  75.     finfo.wtime = time;
  76.     if (res = DOSSETFILEINFO(fileno(f),1,(unsigned char far *) &finfo,12))
  77.          printf("Set timestamp fail (%d)\n",res);
  78. }
  79.  
  80. static int filehand(stream)            /* find handle on a file */
  81. FILE *stream;                 /* file to grab onto */
  82. {
  83.     return fileno(stream);            /* return DOS 2.0 file handle *//*mpl*/
  84. }
  85.