BSD 4_3_Tahoe release

[unix-history] / usr / src / etc / tzone / scheck.c

#ifndef lint
static char sccsid[] = "@(#)scheck.c    1.1 (Berkeley) 3/29/87";
#endif

/*LINTLIBRARY*/

#include "stdio.h"
#include "ctype.h"

extern char *   imalloc();

char *
scheck(string, format)
char *  string;
char *  format;
{
       register char * fbuf;
       register char * fp;
       register char * tp;
       register int    c;
       register char * result;
       char            dummy;

       result = "";
       if (string == NULL || format == NULL)
               return result;
       fbuf = imalloc(2 * strlen(format) + 4);
       if (fbuf == NULL)
               return result;
       fp = format;
       tp = fbuf;
       while ((*tp++ = c = *fp++) != '\0') {
               if (c != '%')
                       continue;
               if (*fp == '%') {
                       *tp++ = *fp++;
                       continue;
               }
               *tp++ = '*';
               if (*fp == '*')
                       ++fp;
               while (isascii(*fp) && isdigit(*fp))
                       *tp++ = *fp++;
               if (*fp == 'l' || *fp == 'h')
                       *tp++ = *fp++;
               else if (*fp == '[')
                       do *tp++ = *fp++;
                               while (*fp != '\0' && *fp != ']');
               if ((*tp++ = *fp++) == '\0')
                       break;
       }
       *(tp - 1) = '%';
       *tp++ = 'c';
       *tp = '\0';
       if (sscanf(string, fbuf, &dummy) != 1)
               result = format;
       free(fbuf);
       return result;
}