1 /*-
2 * Copyright (c) 1991 The Regents of the University of California.
3 * All rights reserved.
4 *
5 * This code is derived from software contributed to Berkeley by
6 * Arthur David Olson of the National Cancer Institute.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 * 3. All advertising materials mentioning features or use of this software
17 * must display the following acknowledgement:
18 * This product includes software developed by the University of
19 * California, Berkeley and its contributors.
20 * 4. Neither the name of the University nor the names of its contributors
21 * may be used to endorse or promote products derived from this software
22 * without specific prior written permission.
23 *
24 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
25 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34 * SUCH DAMAGE.
35 */
36
37 #ifndef lint
38 static char sccsid[] = "@(#)scheck.c 5.3 (Berkeley) 4/20/91";
39 #endif /* not lint */
40
41 #ifdef notdef
42 static char elsieid[] = "@(#)scheck.c 8.9";
43 #endif
44
45 /*LINTLIBRARY*/
46
47 #include <stdio.h>
48 #include <ctype.h>
49 #include <string.h>
50 #include <stdlib.h>
51
52 char *
scheck(string,format)53 scheck(string, format)
54 const char * const string;
55 const char * const format;
56 {
57 register char * fbuf;
58 register const char * fp;
59 register char * tp;
60 register int c;
61 register char * result;
62 char dummy;
63
64 result = "";
65 if (string == NULL || format == NULL)
66 return result;
67 fbuf = malloc(2 * strlen(format) + 4);
68 if (fbuf == NULL)
69 return result;
70 fp = format;
71 tp = fbuf;
72 while ((*tp++ = c = *fp++) != '\0') {
73 if (c != '%')
74 continue;
75 if (*fp == '%') {
76 *tp++ = *fp++;
77 continue;
78 }
79 *tp++ = '*';
80 if (*fp == '*')
81 ++fp;
82 while (isascii(*fp) && isdigit(*fp))
83 *tp++ = *fp++;
84 if (*fp == 'l' || *fp == 'h')
85 *tp++ = *fp++;
86 else if (*fp == '[')
87 do *tp++ = *fp++;
88 while (*fp != '\0' && *fp != ']');
89 if ((*tp++ = *fp++) == '\0')
90 break;
91 }
92 *(tp - 1) = '%';
93 *tp++ = 'c';
94 *tp = '\0';
95 if (sscanf((char *)string, fbuf, &dummy) != 1)
96 result = (char *) format;
97 ifree(fbuf);
98 return result;
99 }
100