home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / TOOLS2.ZIP / TOUCH.C < prev    next >
Text File  |  1989-05-05  |  5KB  |  238 lines
  1. /**
  2.  
  3.     TOUCH.C - UNIX style file date modification command
  4.  
  5. **/
  6.  
  7. #include <stdio.h>
  8. #include <stdlib.h>
  9. #include <process.h>
  10. #include <time.h>
  11. #include <ctype.h>
  12. #include <sys\types.h>
  13. #include <sys\utime.h>
  14. #include <sys\stat.h>
  15. #include <errno.h>
  16. #include <io.h>
  17.  
  18. /**
  19.  
  20.     Static variables for TOUCH
  21.  
  22. **/
  23.  
  24. #define TRUE        1
  25. #define FALSE        0
  26. #define ERROR        -1
  27.  
  28. static int Verbose ;        /* TRUE for verbose mode */
  29. static int NoCreate ;        /* True to not create 0 length file */
  30.  
  31. static struct utimbuf ModTime ; /* time to set modification date to */
  32.  
  33. static int days_in_month[] =
  34. { 
  35.     31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 };
  36.  
  37. /**
  38.  
  39.     ParseTime() - parse the time string MMDDHHMM[YY]
  40.  
  41.     Return TRUE if able to extract time, FALSE otherwise
  42.  
  43. **/
  44.  
  45. static int ParseTime( buffer )
  46. char *buffer ;
  47. {
  48.     char *s ;
  49.     time_t timeval ;
  50.     struct tm *timebuf ;
  51.     int month, day, hour, min, year, i ;
  52.  
  53.     putenv("TZ=GMT") ;
  54.     tzset() ;
  55.  
  56.     if ( (strlen(buffer) != 8) && (strlen(buffer) !=10) )
  57.         return FALSE ;
  58.  
  59.     for ( s = buffer ; *s ; s++ )
  60.         if ( !isdigit(*s) )
  61.             return FALSE ;
  62.  
  63.     if ( strlen(buffer) == 10 )
  64.         year  = ((buffer[8]-'0') * 10) + (buffer[9]-'0') ;
  65.     else
  66.     {
  67.         time( &timeval ) ;
  68.         timebuf = localtime( &timeval ) ;
  69.         year = timebuf->tm_year ;
  70.     }
  71.     if ( year < 70 )
  72.         return FALSE ;
  73.  
  74.     month = ((buffer[0]-'0') * 10) + (buffer[1]-'0') ;
  75.     if ( month < 1 || month > 12 )
  76.         return FALSE ;
  77.  
  78.     if ( !(year % 4) )
  79.         days_in_month[1]++ ;
  80.  
  81.     day   = ((buffer[2]-'0') * 10) + (buffer[3]-'0') ;
  82.     if ( day < 1 || day > days_in_month[month-1] )
  83.         return FALSE ;
  84.  
  85.     hour  = ((buffer[4]-'0') * 10) + (buffer[5]-'0') ;
  86.     if ( hour > 23 )
  87.         return FALSE ;
  88.  
  89.     min   = ((buffer[6]-'0') * 10) + (buffer[7]-'0') ;
  90.     if ( min > 59 )
  91.         return FALSE ;
  92.  
  93.     if ( (month == 2) && (day == 29) && (year % 4) )
  94.         return FALSE ;
  95.  
  96.     /*-- calculate the number of seconds since 00:00:00 01/01/1970 ---*/
  97.  
  98.     timeval = 0L ;
  99.  
  100.     for ( i = 70 ; i < year ; i++ )
  101.         if ( i % 4 )
  102.             timeval += 365 ;
  103.         else
  104.             timeval += 366 ;
  105.  
  106.     for ( i = 0 ; i < month-1 ; i ++ )
  107.         timeval += days_in_month[i] ;
  108.  
  109.     timeval += (day-1) ;        /* time contains number of days */
  110.  
  111.     timeval *= 24 ;
  112.     timeval += hour ;        /* time contains number of hours */
  113.  
  114.     timeval *= 60 ;
  115.     timeval += min ;        /* time contains number of minutes */
  116.  
  117.     timeval *= 60 ;            /* time contains number of seconds */
  118.  
  119.     ModTime.actime  = timeval + timezone ;
  120.     ModTime.modtime = timeval + timezone ;
  121.  
  122.     return TRUE ;
  123. }
  124.  
  125. /**
  126.  
  127.     Banner() - print a program title banner
  128.  
  129. **/
  130.  
  131. static void Banner()
  132. {
  133.     fprintf( stderr, "TOUCH\n" ) ;
  134.     fprintf( stderr, "Copyright (c) 1987 by Computer Aided Planning, Inc.\n");
  135.     fprintf( stderr, "All Rights Reserved.\n\n") ;
  136. }
  137.  
  138. /**
  139.  
  140.     ShowUsage() - show the usage of the TOUCH command
  141.  
  142. **/
  143.  
  144. static void ShowUsage()
  145. {
  146.     fprintf( stderr, "Usage: TOUCH [-cmv?] [mmddhhmm[yy]] file ...\n\n" ) ;
  147.     fprintf( stderr, "\t-c : Do not create file if it doesn't exist\n" ) ;
  148.     fprintf( stderr, "\t-v : Verbose, echo each file name as touched\n") ;
  149.     fprintf( stderr, "\t-m : Set modification time only (no effect)\n") ;
  150.     fprintf( stderr, "\t-? : Display this message\n") ;
  151.     exit(1) ;
  152. }
  153.  
  154.  
  155. /**
  156.  
  157.     MAIN ROUTINE
  158.  
  159. **/
  160.  
  161. void main( argc, argv )
  162. int argc ;
  163. char *argv[] ;
  164. {
  165.     time_t timeval ;
  166.     int got_time = FALSE ;
  167.     int i, fh ;
  168.  
  169. /*+    Banner() ;*/
  170.  
  171.     if ( argc < 2 )
  172.     {
  173.         ShowUsage() ;
  174.     }
  175.  
  176.     for ( i = 1 ; i < argc ; i ++ )
  177.     {
  178.         if ( *argv[i] == '-' || *argv[i] == '/' )
  179.         {
  180.             switch( *(argv[i]+1) )
  181.             {
  182.             case 'c' :        /* no create mode */
  183.             case 'C' :
  184.                 NoCreate = TRUE ;
  185.                 break ;
  186.             case 'v' :        /* verbose mode */
  187.             case 'V' :
  188.                 Verbose = TRUE ;
  189.                 break ;
  190.             case '?' :        /* help */
  191.                 ShowUsage() ;
  192.                 break ;
  193.             }
  194.         }
  195.         else
  196.         {
  197.             if ( ! got_time )
  198.             {
  199.                 got_time = TRUE ;
  200.  
  201.                 if( ParseTime(argv[i]) )
  202.                     continue ;
  203.                 else
  204.                 {
  205.                     time ( &timeval ) ;
  206.                     ModTime.actime  = timeval ;
  207.                     ModTime.modtime = timeval ;
  208.                 }
  209.             }
  210.  
  211.             if( utime( argv[i], &ModTime ) == ERROR )
  212.             {
  213.                 /*--- create a 0 length file ---*/
  214.  
  215.                 if ( errno == ENOENT && ! NoCreate )
  216.                 {
  217.                     if ( (fh = creat( argv[i], S_IREAD|S_IWRITE)) != ERROR )
  218.                     {
  219.                         utime( argv[i], &ModTime ) ;
  220.                         if ( Verbose )
  221.                             fprintf( stderr, "\t%s\n", strupr(argv[i]) ) ;
  222.                         close(fh) ;
  223.                     }
  224.                     else
  225.                         fprintf( stderr, "\t%s : E%05d - %s\n", strupr(argv[i]),
  226.                             errno, sys_errlist[errno] ) ;
  227.                 }
  228.                 else
  229.                     fprintf( stderr, "\t%s : E%05d - %s\n", strupr(argv[i]),
  230.                         errno, sys_errlist[errno] ) ;
  231.             }
  232.  
  233.             if ( Verbose )
  234.                 fprintf( stderr, "\t%s\n", strupr(argv[i]) ) ;
  235.         }
  236.     }
  237. }
  238.