home *** CD-ROM | disk | FTP | other *** search
/ The Fred Fish Collection 1.5 / ffcollection-1-5-1992-11.iso / ff_disks / 300-399 / ff311.lzh / Udate / udate.c < prev    next >
C/C++ Source or Header  |  1990-01-31  |  23KB  |  711 lines
  1. /*-------------------------------------------------------------------------*/
  2. /*      program: date                                                      */
  3. /*      Purpose: display a formatted date/time or set system date/time.    */
  4. /*   Programmer: George Kerber                                             */
  5. /*      Written: 06/27/89                                                  */
  6. /*     Compiler: Lattice 5.04                                              */
  7. /*-------------------------------------------------------------------------*/
  8.  
  9. #include <stdio.h>
  10. #include <dos.h>
  11. #include <stdlib.h>
  12. #include <string.h>
  13. #define WRITTEN "06/27/89 - 01/14/90"
  14. #define VERSION "v1.15c"
  15. #define AUTHOR "George Kerber"
  16.  
  17. int  ampm();                   /*  declare functions  */
  18. int  dateset();
  19. void defaultdate();
  20. char *ext();
  21. void helpscreen();
  22. void main();
  23. void mistake();
  24. void quitcheck();
  25. void setdate();
  26. int  twelve();
  27.  
  28. void main(int argc, char *argv[])
  29. { 
  30. int i, j, length, nflag = 0, dflag = 0 , next = 1 , counter = -1 ;
  31. char option , leadspacer[80] , *odata , *timezone, node[33], opts[] = "m" ;
  32. char format[80];
  33. int escape_char = '*', tznflag = 0, y_fix = 80;
  34. unsigned char clock[8];
  35. int daymax[13] = {0,31,28,31,30,31,30,31,31,30,31,30,31};
  36. char day[7][4] = {"Sun","Mon","Tue","Wed","Thu","Fri","Sat"};
  37. char dayext[7][4] = {"","","s","nes","rs","","ur"};
  38. char month[13][4] = {"","Jan","Feb","Mar","Apr","May","Jun","Jul","Aug",
  39.                      "Sep","Oct","Nov","Dec"};
  40. char monthext[13][7] = {"","uary","ruary","ch","il","","e","y","ust",
  41.                         "tember","ober","ember","ember"};
  42. leadspacer[0] = '\0';
  43.  
  44. /*----- Sets escape value ----- temporary use of *timezone ----------------*/
  45.  
  46. timezone = getenv("ESCAPE");
  47. if(timezone != NULL) escape_char = *timezone;
  48.  
  49. /*----- Help Screen -------------------------------------------------------*/
  50.  
  51. stcgfn(node,argv[0]);
  52. if(argc == 2 && argv[1][0] == '?') helpscreen(escape_char,node);
  53.  
  54. getclk(clock);   /*  gets current system clock settings  */
  55. if(clock[1] > 19) y_fix = -20;
  56.  
  57. /*------------------------------------------------------*/
  58.  
  59. /*  Is this a date or time change request ???  */
  60. length = strlen(argv[1]);
  61. if(length > 2 && length < 9 && 
  62.    !dateset(argv[0],argv[1],length,daymax,month,monthext,node,clock)) 
  63.    exit(0);
  64.  
  65. /*---------------------------------------*/
  66.  
  67. for( ; (odata = argopt(argc,argv,opts,&next,&option)) != NULL ; ) {
  68.    switch(toupper(option)) {
  69.       case 'C':  printf("\x0c"); break;
  70.       case 'N':  nflag = 1; break ;
  71.       case 'D':  if(isdst(clock)) {
  72.                     clock[4]++;
  73.                     if(chgclk(clock)) mistake("Can't Correct for DST",node);
  74.                     }
  75.                  getclk(clock);
  76.                  dflag++;
  77.                  break;
  78.       case 'S':  setdate(clock,daymax,month,monthext,node); break ;
  79.       case 'M':  i = atoi(odata);
  80.                  if(!i || i > 69) mistake("Entry must be 1 - 69",node);
  81.                  for( ; i > 0 ; strcat(leadspacer," "), i--) ;
  82.                  break;
  83.        default:  mistake("Invalid Option",node); break;
  84.       }
  85.    }
  86.  
  87. if(argc > (next + 1)) mistake("Extra option or Unquoted format string",node);
  88.  
  89. /*---- SET TIMEZONE if set ------------------------------------------------*/
  90. timezone = getenv("TIMEZONE");
  91. i = strlen(timezone);
  92. if(i == 3 || i == 7) {
  93.    if(isdst(clock) && i == 7) {
  94.       timezone[0] = timezone[4]; 
  95.       timezone[1] = timezone[5]; 
  96.       timezone[2] = timezone[6]; 
  97.       }
  98.    timezone[3] = '\0'; tznflag++;
  99.    }
  100.    else {
  101.    timezone[0] = '\0';
  102.    }
  103. /*------------------------------------------------------------------------*/
  104.  
  105. printf("%s",leadspacer);
  106.  
  107. /*-----------------------------*/
  108. if(argc == next ) {
  109.    if(!dflag) {
  110.       odata = getenv("DEFAULT");
  111.       if(odata[0] != NULL) {
  112.          strcpy(format,odata);
  113.          }
  114.          else {
  115.          defaultdate(tznflag,timezone,day,dayext,month,clock,y_fix);
  116.          if(!nflag) printf("\n");
  117.          exit(0);
  118.          }
  119.       }           
  120.    }
  121.    else {
  122.    strcpy(format,argv[next]);
  123.    }
  124. /*-----------------------------*/
  125.  
  126. while(format[++counter] != (char *)NULL) {
  127.    if(format[counter] == escape_char ) {
  128.       if(format[++counter] == escape_char ) {
  129.         printf("%c",escape_char);
  130.         continue;
  131.         }
  132.       switch(format[counter]) {
  133.                     /*  abbreviated weekday name  */
  134.          case 'a':  printf("%s",day[clock[0]]); break ;
  135.  
  136.                     /*  full weekday name  */
  137.          case 'A':  printf("%s%sday",day[clock[0]],dayext[clock[0]]); break ;
  138.  
  139.          case 'h':  /*  abbreviated month name  */
  140.          case 'b':  printf("%s",month[clock[2]]); break ;
  141.  
  142.                     /*  full month name  */
  143.          case 'B':  printf("%s%s",month[clock[2]],monthext[clock[2]]); 
  144.                     break;
  145.  
  146.                     /*  day of month 01 to 31   */
  147.          case 'd':  printf("%02d",clock[3]); break ;
  148.  
  149.                     /*  prints date as mm/dd/yy  */
  150.          case 'D':  printf("%02d/%02d/%02d",
  151.                             clock[2],
  152.                             clock[3],
  153.                             clock[1] + y_fix);
  154.                     break;
  155.  
  156.          case 'E':  /* day of month 1 to 31 */
  157.          case 'e':  printf("%2d",clock[3]); break ;
  158.  
  159.          case 'o':
  160.          case 'k':  /* greeting and date and time  */
  161.          case 'g':  if(format[counter] == 'g' ||
  162.                        format[counter] == 'o') {; 
  163.                     printf("Good "); 
  164.                     if(clock[4] < 12) {
  165.                        printf("Morning");
  166.                        }
  167.                     else if(clock[4] < 17) {
  168.                        printf("Afternoon");
  169.                        }
  170.                     else {
  171.                        printf("Evening");
  172.                        }
  173.                     }
  174.  
  175.                     if(format[counter] == 'g') printf("!    "); 
  176.                     if(format[counter] == 'k' ||
  177.                        format[counter] == 'g') {
  178.                    printf("Today is %s%sday, %s%s %d%s, %02d at %d:%02d %cM",
  179.                        day[clock[0]],
  180.                        dayext[clock[0]],
  181.                        month[clock[2]],
  182.                        monthext[clock[2]],
  183.                        clock[3],
  184.                        ext(clock[3]),
  185.                        clock[1] + 1980,
  186.                        twelve(clock[4]),
  187.                        clock[5],
  188.                        ampm(clock[4]));
  189.                     if(tznflag) printf(" (%s)",timezone);
  190.                     }
  191.                     break;
  192.  
  193.                     /*  hour 00 to 23  */
  194.          case 'H':  printf("%02d",clock[4]); break ;
  195.  
  196.                      /*  hour 01 to 12  */
  197.          case 'i':  printf("%d",twelve(clock[4])); break;
  198.  
  199.                     /*  hour 01 to 12  */
  200.          case 'I':  printf("%02d",twelve(clock[4])); break;
  201.                     
  202.          case 'J':  /*  julian date and days remaining in year  */
  203.          case 'j':  if((clock[1] + 1980) % 4 == 0) daymax[2] = 29 ;
  204.                     for(i = 1, j = 0 ; i != clock[2] ; j += daymax[i++] );
  205.                     j += clock[3];
  206.                     if(format[counter] == 'j') { printf("%d",j); break; }
  207.                     if(daymax[2] == 28) i = 365; else i = 366;
  208.                     printf("%d",i - j);
  209.                     break;  
  210.  
  211.                     /*  month of year 01-12  */
  212.          case 'm':  printf("%02d",clock[2]); break ;
  213.  
  214.          case 'N':  /*  creates newline  */
  215.          case 'n':  printf("\n"); break ;
  216.  
  217.                     /*  time as hh:mm:ss pp, pp is "am" or "pm" */
  218.          case 'r':  printf("%02d:%02d:%02d ",
  219.                            twelve(clock[4]),
  220.                            clock[5],
  221.                            clock[6]);
  222.                     /*  no break since am/pm is next  */
  223.  
  224.                     /*  string containing "am" or "pm"  */
  225.          case 'p':  printf("%cM",ampm(clock[4]));
  226.                     break;
  227.  
  228.                     /* time as hh:mm  */
  229.          case 'R':  printf("%02d:",clock[4]);
  230.                     /*  no break since minute is next  */
  231.  
  232.          case 'M':  printf("%02d",clock[5]); break ;
  233.  
  234.                     /*  insert a tab character */
  235.          case 't':  printf("\t"); break ;
  236.  
  237.                     /*  prints time as hh:mm:ss  */
  238.          case 'T':  printf("%02d:%02d:",clock[4],clock[5]);
  239.                     /*  no break since seconds is next  */
  240.  
  241.                     /*  seconds 00 - 59  */
  242.          case 'S':  printf("%02d",clock[6]); break ;
  243.  
  244.                     /*  prints day of week integer, Sunday = 0  */
  245.          case 'w':  printf("%d",clock[0]); break ;
  246.  
  247.                     /*  prints day of week integer, Sunday = 1  */
  248.          case 'W':  printf("%d",clock[0] + 1); break ;
  249.  
  250.                     /*  prints two character year  */
  251.          case 'y':  printf("%d",clock[1] + y_fix); break ;
  252.    
  253.          case 'q':  printf("\""); break;
  254.  
  255.          case 'c':
  256.          case 'C':  printf("%s %02d-%s-%02d %02d:%02d",
  257.                        day[clock[0]],
  258.                        clock[3],
  259.                        month[clock[2]],
  260.                        clock[1] + y_fix,
  261.                        clock[4],
  262.                        clock[5]);
  263.                     if(tznflag) printf(" %s",timezone); 
  264.                     break;
  265.  
  266.          case 'z':  /*  timezone name  */
  267.          case 'Z':  if(tznflag) printf("%s",timezone); break;
  268.                    
  269.                     /* displays default date string via descriptor  */ 
  270.          case '$':  defaultdate(tznflag,timezone,day,dayext,month,clock,y_fix);
  271.                     break;
  272.  
  273.          case 'U':  /* UNIX type date  */
  274.          case 'u':  printf("%s %s %2d %02d:%02d:%02d ",
  275.                        day[clock[0]], 
  276.                        month[clock[2]],
  277.                        clock[3],
  278.                        clock[4],
  279.                        clock[5],
  280.                        clock[6]);
  281.                     if(tznflag) printf("%s ",timezone);
  282.                     /*  no break since year is next  */
  283.  
  284.                     /*  prints year as ccyy  */
  285.          case 'Y':  printf("%4d",clock[1] + 1980); break ;
  286.  
  287.          case 'X':  /*  prints date extension ex: th, nd, rd  */     
  288.          case 'x':  printf("%s",ext(clock[3])); break;
  289.  
  290.          case '0':  printf(""); break ;  /* Blue pen color         */
  291.          case '1':  printf(""); break ;  /* White pen color        */
  292.          case '2':  printf(""); break ;  /* Black pen color        */
  293.          case '3':  printf(""); break ;  /* Orange pen color       */
  294.          case '4':  printf("");  break ;  /* Default colors         */
  295.          case '5':  printf("");  break ;  /* Boldface               */
  296.          case '6':  printf("");  break ;  /* Underline              */
  297.          case '7':  printf("");  break ;  /* Italics                */
  298.          case ')':  printf(""); break;   /* color 0 bkgnd          */
  299.          case '!':  printf(""); break;   /* color 1 bkgnd          */
  300.          case '@':  printf(""); break;   /* color 2 bkgnd          */
  301.          case '#':  printf(""); break;   /* color 3 bkgnd     */
  302.  
  303.           default:  printf("\n\07  ERROR: %s  Bad Format Character. \(%c%c\)\n\n",
  304.                        node,format[--counter],
  305.                        format[++counter]);
  306.                     exit(5);
  307.          }
  308.       }
  309.       else {
  310.       putchar(format[counter]);
  311.       }
  312.    continue;
  313.    }
  314. printf("");
  315. if(!nflag) printf("\n");
  316. exit(0);    /*  exit for good date formatting   */
  317. }
  318.  
  319. /*-------------------------------------------------------------------------*/
  320.  
  321. /*  AMPM FUNCTION  */
  322.  
  323. int ampm(int hour)
  324. {
  325. if(hour < 12) return('A'); else return('P');
  326. }
  327.  
  328. /*-------------------------------------------------------------------------*/
  329.  
  330. /*  DATESET FUNCTION  !!!! */
  331.  
  332. int dateset(char name[],char tempy[],int length,int daymax[13],char month[13][4],char monthext[13][7],char node[],unsigned char clock[8])
  333. {
  334. int h = 0, i, j, k = 0, slash = 0, colon = 0;
  335. char date[80];
  336. char *s1, *s2, temp[3][6];
  337. static char delim[] = "/-:";
  338.  
  339. strcpy(date,tempy);                  /* this is necessary for some reason */
  340. for( i = 0 ; i != length ; i++ ) {   /* or else argv[1] gets changed      */
  341.    if(date[i] == '\\') return(1);    /* I have no idea why ????           */  
  342.    else if(date[i] == ':') colon++;
  343.    else if(date[i] == '/' || date[i] == '-') slash++;
  344.    else if(!isdigit(date[i])) return(1);
  345.    }
  346. if((colon && slash) || (!colon && !slash)) return(1);
  347. i = strlen(date);
  348. if(colon && i != 4 && i != 5) return(1);
  349.  
  350. s1 = date;
  351. while((s2 = strtok(s1,delim)) != NULL) {      /* break out seperate month */
  352.    strcpy(temp[h],s2);                        /* day, year, hour & minute */
  353.    if(h++ > 3) break;
  354.    s1 = NULL;
  355.    }
  356. if(colon > 1 || slash > 2) return(1); 
  357.  
  358. i =  atoi(temp[0]); j = atoi(temp[1]); 
  359.  
  360. if(slash) {     /*  if a 'date' was entered  */
  361.    if(h == 2) {
  362.       k = clock[1];  
  363.       }
  364.       else {
  365.       k = atoi(temp[2]);
  366.       if(k < 0 || k > 99) mistake("Invalid Year",node);
  367.       if(k >= 80) clock[1] = k - 80; else clock[1] = k + 20;
  368.       }
  369.    if((clock[1] + 1980) % 4 == 0) daymax[2] = 29; else daymax[2] = 28;
  370.    if(i < 0 || i > 12 || j < 1 || j > daymax[i]) mistake("Invalid Date",node); 
  371.    clock[2] = i; clock[3] = j; 
  372.    chgclk(clock);
  373.    }
  374.  
  375. else if(colon) {    /*  if a 'time' was entered  */
  376.    if(i < 0 || i > 23 || j < 0 || j > 59) mistake("Invalid Time",node);
  377.    clock[4] = i;
  378.    clock[5] = j;
  379.    clock[6] = clock[7] = 0;
  380.    chgclk(clock);
  381.    }
  382. /*  confirm the changes  */
  383.    printf("\n%sDate: %s%s %d%s, %d     %sTime: %02d:%02d:%02d\n\n",
  384.            slash ? "New ":"",
  385.            month[clock[2]],
  386.            monthext[clock[2]],
  387.            clock[3],
  388.            ext(clock[3]),
  389.            clock[1] + 1980,
  390.            colon ? "New ":"",
  391.            clock[4],
  392.            clock[5],
  393.            clock[6]);
  394.  
  395.    return(0);   /*  return '0' for success  */
  396. }
  397.  
  398. /*-------------------------------------------------------------------------*/
  399.  
  400. /*  DEFAULTDATE FUNCTION  */
  401.  
  402. void defaultdate(int tznflag, char *timezone,char day[7][4],char dayext[7][4],char month[13][4],unsigned char clock[8],int year_fix)
  403. {
  404.  
  405. printf("%s%sday %02d-%s-%02d %02d:%02d:%02d",
  406.             day[clock[0]],
  407.             dayext[clock[0]],
  408.             clock[3],
  409.             month[clock[2]],
  410.             clock[1] + year_fix,
  411.             clock[4],
  412.             clock[5],
  413.             clock[6]);
  414. if(tznflag) printf(" %s",timezone);
  415.       
  416. }
  417.  
  418. /*-------------------------------------------------------------------------*/
  419.  
  420. /*  EXT FUNCTION  */
  421.  
  422. char *ext(int day)
  423. {
  424. switch(day) {
  425.    case  1:
  426.    case 21:
  427.    case 31: return("st"); 
  428.    case  2:
  429.    case 22: return("nd");
  430.    case  3:
  431.    case 23: return("rd");
  432.    default: return("th");
  433.    }
  434. }
  435.  
  436. /*-------------------------------------------------------------------------*/
  437.  
  438. /* HELPSCREEN FUNCTION  */
  439.  
  440. void helpscreen(int escape_char,char node[])
  441. {
  442. int dhelp;
  443. if(!access("c:datehelp",0)) {
  444.    dhelp = 1 ;
  445.    printf("\x0c");
  446.    }
  447.    else {
  448.    dhelp = 0;
  449.    }
  450. printf("\n   %s      %s %10s %25s\n",node,AUTHOR,VERSION,WRITTEN);
  451. printf("   SYNTAX:  %s [-s] [hh:mm] [mm/dd[/yy]] [-d -n -m xx] [\"format string\"]\n",node);
  452. printf("            -s     Prompts user to set date/time.\n");
  453. printf("         hh:mm     Set time.\n");
  454. printf("    mm/dd[/yy]     Set date, year is optional.            Escape = \"%c\"\n",
  455.    escape_char);
  456. printf("            -d     Automatic Daylight Savings Time adjustment.\n");
  457. printf("            -n     Supress NEWLINE.\n");
  458. printf("            -m xx  Begins date string at xx character position.\n\n");
  459. if(dhelp) system("c:datehelp x");
  460. exit(0);
  461. }
  462.  
  463. /*-------------------------------------------------------------------------*/
  464.  
  465. /*  ISDST FUNCTION  */
  466.  
  467. int isdst(unsigned char clock[8])
  468. {
  469. int year, startyear = 1980 , sday = 6 , eday , leapyear = 0, dstflag = 0;
  470.  
  471. year = clock[1];
  472.  
  473. for(  ; year > 0 ; year--) {
  474.      leapyear = 0;
  475.      startyear++ ;
  476.      if(!(startyear % 4)) leapyear = 1 ;
  477.      sday-- ;
  478.      if(!sday) sday = 7;
  479.      sday -= leapyear;
  480.      if(!sday && leapyear) sday = 7; 
  481.      }                                              /*  Ending for brace */
  482.  
  483. /* Calculate Daylight Savings Time end date using start date              */
  484.  
  485. if((sday + 20) < 25)  eday = sday + 27; else eday = sday + 20;
  486.  
  487. /* Determine if it's daylight savings time NOW                            */
  488.  
  489. if((clock[2] > 4 && clock[2] < 10) ||
  490.     (clock[2] == 4 && clock[3] >= sday && clock[4] >= 2) ||
  491.     (clock[2] == 10 && clock[3] <= eday && clock[4] < 2) ||
  492.     (clock[2] == 4 && clock[3] > sday) ||
  493.     (clock[2] == 10 && clock[3] < eday)) {
  494.     dstflag = 1; 
  495.     }
  496. return(dstflag);
  497. }
  498.  
  499. /*-------------------------------------------------------------------------*/
  500.  
  501. /*  MISTAKE FUNCTION  */
  502.  
  503. void mistake(char description[],char node[])
  504. {
  505. printf("\n\07  ERROR: %s  --> %s.\n\n",node,description);
  506. exit(5);
  507. }
  508.  
  509. /*-------------------------------------------------------------------------*/
  510.  
  511. /*  QUITCHECK FUNCTION  */
  512.  
  513. void quitcheck(char xxx[])  
  514. {
  515. if(xxx[0] == 'q' || xxx[0] == 'Q') {
  516.    puts("\n");
  517.    exit(0) ;
  518.    }
  519. }
  520.  
  521. /*-------------------------------------------------------------------------*/
  522.  
  523. /*  SETDATE FUNCTION  */
  524.  
  525. void setdate(unsigned char clock[8],int daymax[13],char month[13][4],char monthext[13][7],char node[])
  526. {
  527. char input[30];
  528. int temp;
  529. char current[] = "The current ";
  530. char accept[] = " or <return> to accept [q]: ";
  531. char new[] = " enter new ";
  532.  
  533. while(TRUE) {
  534.       printf("\x0c\n\n\n  Set DATE/TIME Utility.                 by %s\n\n",AUTHOR);
  535.       while(TRUE) {
  536.          printf("\n  %syear is %2d,  %syear%s",
  537.             current,
  538.             clock[1] + 1980,
  539.             new,
  540.             accept);
  541.          gets(input);
  542.          quitcheck(input);
  543.          if(strcmp(input,"")) {
  544.             temp = atoi(input);
  545.             if(temp > 2040 || temp < 1980) {
  546.                printf("\n\07            ERROR:  Invalid Year (1980 - 2040).\n\n");
  547.                continue ;
  548.                }
  549.                else {
  550.                clock[1] = temp - 1980;
  551.                }
  552.             }
  553.          break ;
  554.          }
  555.  
  556.       while(TRUE) {
  557.          printf("\n   %smonth is %02d, %smonth%s",
  558.             current,
  559.             clock[2],
  560.             new,
  561.             accept);
  562.          gets(input);
  563.          quitcheck(input);
  564.          if(strcmp(input,"")) {
  565.             temp = atoi(input);
  566.             if(temp < 1 || temp > 12 ) {
  567.                printf("\n\07            ERROR:  Invalid Month (1 - 12).\07\n\n");
  568.                continue ;
  569.                }
  570.                else {
  571.                clock[2] = temp;
  572.                }
  573.             }
  574.          break ;
  575.          }
  576.  
  577.       if((clock[1] + 1980) % 4 == 0) daymax[2] = 29 ;
  578.       if(clock[3] > daymax[clock[2]] ) { 
  579.          printf("\n            NOTE:  %sday is invalid for %d.\n\n",
  580.                 current,
  581.                 clock[1] + 1980);
  582.          }
  583.    
  584.       while(TRUE) {
  585.          printf("\n     %sday is %02d,   %sday%s",
  586.             current,
  587.             clock[3],
  588.             new,
  589.             accept);
  590.          gets(input);
  591.          quitcheck(input);
  592.          if(strcmp(input,"")) {
  593.             temp = atoi(input);
  594.             if(temp < 1 || temp > daymax[clock[2]]) {
  595.                printf("\n\07            ERROR:  Invalid Day (1 - %d).\n\n",daymax[clock[2]]);
  596.                continue ;
  597.                }
  598.                else {          
  599.                clock[3] = temp;
  600.                }
  601.             }
  602.          if(clock[3] > daymax[clock[2]] ) {   
  603.          printf("\n            ERROR:  %sday is invalid for %d.\n\n",
  604.                 current,
  605.                 clock[1] + 1980);
  606.             continue ;
  607.             }
  608.          break ;
  609.          }
  610.  
  611.       while(TRUE) {
  612.          printf("\n    %shour is %02d,  %shour%s",
  613.             current,
  614.             clock[4],
  615.             new,
  616.             accept);
  617.          gets(input);
  618.          quitcheck(input);
  619.          if(strcmp(input,"")) {
  620.             temp = atoi(input);
  621.             if((temp > 0 && temp < 24) ||
  622.                !strcmp(input,"0") || !strcmp(input,"00")) {
  623.                clock[4] = temp;
  624.                }
  625.                else {
  626.                printf("\n\07            ERROR:  Invalid Hour (00 - 23).\n\n");
  627.                continue ;
  628.                }
  629.             }
  630.          break ;
  631.          }
  632.  
  633.       while(TRUE) {
  634.          printf("\n  %sminute is %02d,%sminute%s",
  635.             current,
  636.             clock[5],
  637.             new,
  638.             accept);
  639.          gets(input);
  640.          quitcheck(input);
  641.          if(strcmp(input,"")) {
  642.             temp = atoi(input);
  643.             if((temp > 0 && temp < 60) ||
  644.                !strcmp(input,"0") || !strcmp(input,"00")) {
  645.                clock[5] = temp;
  646.                }
  647.                else {
  648.                printf("\n\07            ERROR:  Invalid Minute (00 - 59).\n\n");
  649.                continue;
  650.                }
  651.             } 
  652.          break ;
  653.          }
  654.  
  655.       printf("\n\n      The system clock will be set to: %02d-%s%s-%d %02d:%02d:00\n",
  656.               clock[3],
  657.               month[clock[2]],
  658.               monthext[clock[2]],
  659.               clock[1] + 1980,
  660.               clock[4],
  661.               clock[5]);
  662.       printf("\n\n      Do you want to q\(uit\), s\(et\) or e\(dit\) the date/time. [q,S,e]: ");
  663.       gets(input);
  664.       quitcheck(input);
  665.    if(input[0] == 'e' || input[0] == 'E') {
  666.         putchar('\n');
  667.         continue ;
  668.         }
  669.       clock[6] = 0;
  670.      if(chgclk(clock)) mistake("Can't set SYSTEM CLOCK",node);
  671.       putchar('\n');
  672.       exit(0);
  673.    }
  674. putchar('\n');
  675. exit(0);
  676. }
  677.  
  678. /*-------------------------------------------------------------------------*/
  679.  
  680. /*  TWELVE FUNCTION  */
  681.  
  682. int twelve(int hour)
  683. {
  684. if(hour > 13) {
  685.    return(hour - 12);
  686.    }
  687.    else {
  688.    if(!hour) {
  689.       return(12);
  690.       }
  691.       else {
  692.       return(hour);
  693.       }
  694.    }
  695. } 
  696.  
  697. /*-------------------------------------------------------------------------*/
  698.  
  699. /*-------------------------------------------------------------------------*\
  700.  
  701. 10/04/89 v1.10:  Removed the requirement for strings to begin with a !
  702. 10/29/89         Re-compiled with variable assignments changed.
  703. 11/01/89 v1.11b: Re-compiled with Lattice 5.04
  704. 12/30/89 v1.14:  Added daylight savings time functions.
  705.                  Added command line date and time set options.
  706.                  Removed all global variables.
  707. 01/11/90 v1.15b: Re-compiled with Lattice 5.04a, fix for getenv
  708. 01/14/90 v1.15c: Add env DEFAULT to change the default date string.
  709.  
  710. \*-------------------------------------------------------------------------*/
  711.