v4.0/src/CMD/RESTORE/RTT2.C

   1 static char *SCCSID = "@(#)rtt2.c       8.4 86/10/19";
   2 /* \ f \e0 */
   3 #include <direct.h>
   4 #include "rt.h"
   5 #include "rt1.h"
   6 #include "rt2.h"
   7 #include <comsub.h>                     /* common subroutine def'n */
   8 #include <doscalls.h>
   9 #include <wrwdefs.h>               /* wrw! */
  10
  11 extern unsigned char rtswitch;
  12 extern unsigned char control_flag;
  13 extern unsigned char control_flag2;
  14 extern struct internat ctry;           /* data area for country info*/
  15
  16 /*****************  START OF SPECIFICATION  *********************************/
  17 /*                                                                          */
  18 /*  SUBROUTINE NAME :  valid_input_time                                     */
  19 /*                                                                          */
  20 /*  DESCRIPTIVE NAME :  to validate and convert the time input from the     */
  21 /*                      command line.                                       */
  22 /*                                                                          */
  23 /*  FUNCTION: This subroutine validate the time input from the command lin  */
  24 /*            against the country dependent information, and convert        */
  25 /*            the deta into three integers which are hour, minute, and      */
  26 /*            second.                                                       */
  27 /*  NOTES:                                                                  */
  28 /*                                                                          */
  29 /*  INPUT: (PARAMETERS)                                                     */
  30 /*          in_string - the string from command line which contains date    */
  31 /*                   information.                                           */
  32 /*  OUTPUT:                                                                 */
  33 /*          inhour - the input hour after converted                         */
  34 /*          inminute - the input minute after converted                     */
  35 /*          insecond - the input second after converted                     */
  36 /*                                                                          */
  37 /*  EXIT-NORMAL: returns TRUE if the time is valid                          */
  38 /*                                                                          */
  39 /*  EXIT-ERROR:  returns FALSE if the time is invalid                       */
  40 /*                                                                          */
  41 /*  EFFECTS:                                                                */
  42 /*                                                                          */
  43 /*  INTERNAL REFERENCES:                                                    */
  44 /*         ROUTINES:                                                        */
  45 /*                  usererror                                               */
  46 /*                  unexperror                                              */
  47 /*                  putmsg                                                  */
  48 /*                  set_reset_test_flag                                     */
  49 /*                                                                          */
  50 /*  EXTERNAL REFERENCES:                                                    */
  51 /*         ROUTINES:                                                        */
  52 /*                                                                          */
  53 /********************** END OF SPECIFICATIONS *******************************/
  54 int valid_input_time(in_string, inhour, inminute, insecond)
  55     unsigned char *in_string;  /*the input string                       */
  56     unsigned int  *inhour;     /*the input hour                         */
  57     unsigned int  *inminute;   /*the input minute                       */
  58     unsigned int  *insecond;   /*the input second                       */
  59 {
  60     unsigned char chour[10];
  61     unsigned char cminute[10];
  62     unsigned char csecond[10];
  63     unsigned int i,j,z;    /*working pointer*/
  64     unsigned int no_second = FALSE;
  65     unsigned char string[20];
  66
  67     /*declaration for get country information*/
  68     unsigned int byte_len;
  69     unsigned buflen = sizeof( struct internat );    /* length of data area  */
  70     unsigned int retcode;
  71     long country = 0L;
  72
  73    /************************************************/
  74    /* find the string for hour                     */
  75    /************************************************/
  76    #ifdef DEBUG
  77    printf("\ntime to be validate %s",in_string);
  78    #endif
  79    /*save the pointer of input string*/
  80    strcpy(string,in_string);
  81
  82    /* search the first occurance of country->timesep */
  83    for (i = 0; (string[i] != NULLC) && (string[i] != ctry.timesep &&
  84    string[i] != ':' && string[i] != '.'); ++i);
  85
  86    if (string[i] == NULLC) {  /*if not found*/
  87        #ifdef DEBUG
  88        printf("\nno time seperator");
  89        #endif
  90        return(FALSE);
  91    }
  92
  93    string[i] = NULLC;     /*replace it with NULLC*/
  94
  95    /*get the string which represent hour*/
  96    strcpy(chour,string);
  97    /*put the rest of the string into cminute*/
  98    strcpy(cminute,string+i+1);
  99
 100    /************************************************/
 101    /* validate hour                                */
 102    /************************************************/
 103    if (strlen(chour) > MAXHOURLEN || strlen(chour)<1 ) {
 104        #ifdef DEBUG
 105        printf("\ninvalid hour length");
 106        #endif
 107        return(FALSE);
 108    }
 109
 110    /* convert the string into integer form*/
 111    *inhour = 0;
 112    for (j=0; chour[j] != NULLC ; ++j) {
 113        if (chour[j] < '0' || chour[j] > '9') {
 114           #ifdef DEBUG
 115           printf("\nhour value not 0-9");
 116           #endif
 117           return(FALSE);
 118        }
 119        *inhour = *inhour*10 + chour[j]-'0';
 120    }
 121
 122    if (*inhour > 23 || *inhour < 0) {
 123            #ifdef DEBUG
 124            printf("\ninvalid hour value");
 125            #endif
 126            return(FALSE);
 127    }
 128
 129    /************************************************/
 130    /* find the string for minute                   */
 131    /************************************************/
 132    /*search the next occurance of country->timesep*/
 133    for (i = 0; (cminute[i] != NULLC) && (cminute[i] != ctry.timesep &&
 134    cminute[i] != ':' && cminute[i] != '.'); ++i);
 135
 136    if (cminute[i] == NULLC) {  /*if not found*/
 137       no_second = TRUE;
 138    }
 139
 140    /*put NULLC at the end of string which represent minute*/
 141    cminute[i] = NULLC;     /*replace it with NULLC*/
 142    strcpy(csecond,cminute+i+1);
 143
 144    /************************************************/
 145    /* validate minute                              */
 146    /************************************************/
 147    if (strlen(cminute) > MAXMINUTELEN || strlen(cminute)<1 ) {
 148       #ifdef DEBUG
 149       printf("\ninvalid min length");
 150       #endif
 151       return(FALSE);
 152    }
 153
 154    /*convert the string into integer*/
 155    *inminute = 0;
 156    for (j=0; cminute[j] != NULLC ; ++j) {
 157        if (cminute[j] < '0' || cminute[j] > '9')  {
 158           #ifdef DEBUG
 159           printf("\ninvalid min value, not 0-9");
 160           #endif
 161           return(FALSE);
 162        }
 163        *inminute = *inminute*10 + cminute[j]-'0';
 164    }
 165
 166    if (*inminute > 59 || *inminute < 0) {
 167            #ifdef DEBUG
 168            printf("\ninvalid min value");
 169            #endif
 170            return(FALSE);
 171    }
 172
 173    /***************************************************/
 174    /* if user input second, get the string for second */
 175    /***************************************************/
 176    if (no_second == TRUE)
 177        return(TRUE);
 178    else {
 179
 180        /************************************************/
 181        /* validate second                              */
 182        /************************************************/
 183        if (strlen(csecond) > MAXSECONDLEN || strlen(csecond) < 1 ) {
 184           #ifdef DEBUG
 185           printf("\ninvalid second length");
 186           #endif
 187           return(FALSE);
 188        }
 189
 190        /*convert the rest of the string into integer*/
 191        *insecond = 0;
 192        for (j=0; csecond[j] != NULLC; ++j)
 193        {
 194            if (csecond[j] < '0' || csecond[j] > '9') {
 195               #ifdef DEBUG
 196               printf("\ninvalid second, 0-9");
 197               #endif
 198               return(FALSE);
 199            }
 200            *insecond = *insecond*10 + csecond[j]-'0';
 201        }
 202
 203        if (*insecond > 59 || *insecond < 0) {
 204                #ifdef DEBUG
 205                printf("\ninvalid second value");
 206                #endif
 207                return(FALSE);
 208        }
 209    } /*end of if no_second is true */
 210    return(TRUE);
 211
 212 } /*end of subroutine*/
 213 /*****************  START OF SPECIFICATION  *********************************/
 214 /*                                                                          */
 215 /*  SUBROUTINE NAME :  valid_input_date                                     */
 216 /*                                                                          */
 217 /*  DESCRIPTIVE NAME :  to validate and convert the date input from the     */
 218 /*                      command line.                                       */
 219 /*                                                                          */
 220 /*  FUNCTION: This subroutine validate the date input from the command lin  */
 221 /*            against the country dependent information, and convert        */
 222 /*            the deta into three integers which are year, month, and day.  */
 223 /*  NOTES:                                                                  */
 224 /*                                                                          */
 225 /*  INPUT: (PARAMETERS)                                                     */
 226 /*          in_string - the string from command line which contains date    */
 227 /*                   information.                                           */
 228 /*  OUTPUT:                                                                 */
 229 /*          inyear - the input year after converted                         */
 230 /*          inmonth - the input month after converted                       */
 231 /*          inday - the input day after converted                           */
 232 /*                                                                          */
 233 /*  EXIT-NORMAL: returns TRUE if the date is valid                          */
 234 /*                                                                          */
 235 /*  EXIT-ERROR:  returns FALSE if the date is invalid                       */
 236 /*                                                                          */
 237 /*  EFFECTS:                                                                */
 238 /*                                                                          */
 239 /*  INTERNAL REFERENCES:                                                    */
 240 /*         ROUTINES:                                                        */
 241 /*                  usererror                                               */
 242 /*                  unexperror                                              */
 243 /*                  putmsg                                                  */
 244 /*                  set_reset_test_flag                                     */
 245 /*                                                                          */
 246 /*  EXTERNAL REFERENCES:                                                    */
 247 /*         ROUTINES:                                                        */
 248 /*                                                                          */
 249 /********************** END OF SPECIFICATIONS *******************************/
 250 int valid_input_date(in_string,inyear,inmonth,inday)
 251
 252     unsigned char *in_string;
 253     unsigned int  *inyear;
 254     unsigned int  *inmonth;
 255     unsigned int  *inday;
 256 {
 257     unsigned char c1[10];
 258     unsigned char c2[10];
 259     unsigned char c3[10];
 260     unsigned char cyear[10];
 261     unsigned char cmonth[10];
 262     unsigned char cday[10];
 263     unsigned int  in1;
 264     unsigned int  in2;
 265     unsigned int  in3;
 266     unsigned int i,j,z;    /*working pointer*/
 267     unsigned char string[30];
 268     unsigned int  remainder;
 269
 270    #ifdef DEBUG
 271    printf("\ndate to be validate %s",in_string);
 272    #endif
 273    /************************************************/
 274    /* separate the input date string into 3 parts  */
 275    /************************************************/
 276    /*save the pointer to the input string*/
 277    strcpy(string,in_string);
 278
 279    /* search the first occurance of country->datesep */
 280    for (i = 0; (string[i] != NULLC) && (string[i] != ctry.datesep &&
 281    string[i] != '/' && string[i] != '-' && string[i] != '.'); ++i);
 282
 283    if (string[i] == NULLC) {  /*if not found*/
 284       #ifdef DEBUG
 285       printf("\ninvalid date sep");
 286       #endif
 287       return(FALSE);
 288    }
 289
 290    string[i] = NULLC;     /*replace it with NULLC*/
 291
 292    /*get the string which represent year*/
 293    strcpy(c1,string);
 294    /*put the rest of the string into c2*/
 295    strcpy(c2,string+i+1);
 296
 297    /*search the next occurance of country->datesep*/
 298    for (i = 0; (c2[i] != NULLC) && (c2[i] != ctry.datesep &&
 299    c2[i] != '/' && c2[i] != '-' && c2[i] != '.'); ++i);
 300
 301    if (c2[i] == NULLC) {  /*if not found*/
 302       #ifdef DEBUG
 303       printf("\nno 2nd date sep");
 304       #endif
 305       return(FALSE);
 306    }
 307
 308    /*put NULLC at the end of string which represent month*/
 309    c2[i] = NULLC;     /*replace it with NULLC*/
 310    strcpy(c3,c2+i+1);
 311
 312    /************************************************/
 313    /* convert all 3 strings to integers            */
 314    /************************************************/
 315    in1 = 0;
 316    for (j=0; c1[j] != NULLC ; ++j) {
 317        if (c1[j] < '0' || c1[j] > '9') {
 318           #ifdef DEBUG
 319           printf("\ninvalid 1st in date not 0-9");
 320           #endif
 321           return(FALSE);
 322        }
 323        in1 = in1*10 + c1[j]-'0';
 324    }
 325
 326    in2 = 0;
 327    for (j=0; c2[j] != NULLC ; ++j) {
 328        if (c2[j] < '0' || c2[j] > '9') {
 329           #ifdef DEBUG
 330           printf("\ninvalid 2nd in date not 0-9");
 331           #endif
 332           return(FALSE);
 333        }
 334        in2 = in2*10 + c2[j]-'0';
 335    }
 336
 337    in3 = 0;
 338    for (j=0; c3[j] != NULLC ; ++j) {
 339        if (c3[j] < '0' || c3[j] > '9') {
 340           #ifdef DEBUG
 341           printf("\ninvalid 3rd in date not 0-9");
 342           #endif
 343           return(FALSE);
 344        }
 345        in3 = in3*10 + c3[j]-'0';
 346    }
 347    /************************************************/
 348    /* identify what these 3 integers are stand for */
 349    /************************************************/
 350    switch (ctry.dtformat) {
 351          case USA:
 352                    *inmonth = in1;
 353                    *inday   = in2;
 354                    *inyear  = in3;
 355                    strcpy(cmonth,c1);
 356                    strcpy(cday,c2);
 357                    strcpy(cyear,c3);
 358                    break;
 359          case EUR:
 360                    *inday   = in1;
 361                    *inmonth = in2;
 362                    *inyear  = in3;
 363                    strcpy(cday,c1);
 364                    strcpy(cmonth,c2);
 365                    strcpy(cyear,c3);
 366                    break;
 367          case JAP:
 368                    *inyear  = in1;
 369                    *inmonth = in2;
 370                    *inday   = in3;
 371                    strcpy(cyear,c1);
 372                    strcpy(cmonth,c2);
 373                    strcpy(cday,c3);
 374                    break;
 375          default:
 376                    #ifdef DEBUG
 377                    printf("\ninvalid country code %d",ctry.dtformat);
 378                    #endif
 379                    unexperror(UNEXPECTED);
 380                    break;
 381    }
 382    /************************************************/
 383    /* validate the value of year                   */
 384    /************************************************/
 385    if (strlen(cyear) > MAXYEARLEN || strlen(cyear)<1 ) {
 386           #ifdef DEBUG
 387           printf("\ninvalid year len");
 388           #endif
 389           return(FALSE);
 390    }
 391
 392    if (*inyear <= 99 && *inyear >= 80)
 393       *inyear = *inyear + 1900;
 394    if (*inyear <= 79 && *inyear >= 00)
 395       *inyear = *inyear + 2000;
 396
 397    /*validate the value of year  */
 398    if (*inyear > MAXYEAR || *inyear < MINYEAR) {
 399           #ifdef DEBUG
 400           printf("\ninvalid year value");
 401           #endif
 402           return(FALSE);
 403    }
 404
 405    /************************************************/
 406    /* validate the value of month                  */
 407    /************************************************/
 408    if (strlen(cmonth) > MAXMONTHLEN || strlen(cmonth)<1 ) {
 409           #ifdef DEBUG
 410           printf("\ninvalid month length");
 411           #endif
 412           return(FALSE);
 413     }
 414
 415    /*validate the value of year  */
 416    if (*inmonth > MAXMONTH || *inmonth <= 0) {
 417           #ifdef DEBUG
 418           printf("\ninvalid month value");
 419           #endif
 420           return(FALSE);
 421    }
 422
 423    /************************************************/
 424    /* validate the value of day                    */
 425    /************************************************/
 426    if (strlen(cday) > MAXDAYLEN || strlen(cday)<1 ) {
 427           #ifdef DEBUG
 428           printf("\ninvalid day len");
 429           #endif
 430           return(FALSE);
 431    }
 432
 433    /*validate the value of year  */
 434    if (*inday > MAXDAY || *inday <= 0 )  {
 435            #ifdef DEBUG
 436            printf("\ninvalid day value");
 437            #endif
 438            return(FALSE);
 439     }
 440    if ((*inmonth == 1 || *inmonth == 3 || *inmonth == 5 ||
 441         *inmonth == 7 || *inmonth == 8 || *inmonth == 10 ||
 442         *inmonth == 12 ) && (*inday > 31 || *inday < 1)) {
 443            #ifdef DEBUG
 444            printf("\ninvalid day value");
 445            #endif
 446            return(FALSE);
 447    }
 448    else  {
 449        if ((*inmonth == 4 || *inmonth == 6 || *inmonth == 9 ||
 450             *inmonth == 11 ) && (*inday > 30 || *inday < 1)) {
 451               #ifdef DEBUG
 452               printf("\ninvalid day value");
 453               #endif
 454               return(FALSE);
 455        }
 456        else {
 457         if (*inmonth == 2) {
 458           /*check for leap year */
 459           remainder = *inyear % 4;
 460           if (remainder == 0) {
 461              if (*inday > 29 || *inday < 1) {
 462                 #ifdef DEBUG
 463                 printf("\ninvalid day value");
 464                 #endif
 465                 return(FALSE);
 466              }
 467           }
 468           else {
 469              if (*inday > 28 || *inday < 1) {
 470                 #ifdef DEBUG
 471                 printf("\ninvalid day value");
 472                 #endif
 473                 return(FALSE);
 474              }
 475           }
 476         }
 477        }
 478    }
 479
 480    /************************************************/
 481    /* if there is no error found, return TRUE      */
 482    /************************************************/
 483    return(TRUE);
 484
 485 } /*end of subroutine valid_input_date*/
 486
 487 /**************************/
 488 \1a