2 * Copyright (c) 1988, 1989, 1990, 1993
3 * The Regents of the University of California. All rights reserved.
4 * Copyright (c) 1989 by Berkeley Softworks
7 * This code is derived from software contributed to Berkeley by
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 * 3. All advertising materials mentioning features or use of this software
19 * must display the following acknowledgement:
20 * This product includes software developed by the University of
21 * California, Berkeley and its contributors.
22 * 4. Neither the name of the University nor the names of its contributors
23 * may be used to endorse or promote products derived from this software
24 * without specific prior written permission.
26 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
27 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
28 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
29 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
30 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
31 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
32 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
33 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
34 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
35 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
38 * @(#)str.c 5.8 (Berkeley) 6/1/90
39 * $FreeBSD: src/usr.bin/make/str.c,v 1.40 2005/02/07 07:54:23 harti Exp $
40 * $DragonFly: src/usr.bin/make/str.c,v 1.26 2005/03/04 23:49:42 okumoto Exp $
53 static char **argv, *buffer;
54 static int argmax, curlen;
58 * Initialize the strings package
66 argv = emalloc(((argmax = 50) + 1) * sizeof(char *));
67 argv[0] = Var_Value(".MAKE", VAR_GLOBAL, &p1);
72 * concatenate the two strings, inserting a space or slash between them.
75 * the resulting string in allocated space.
78 str_concat(const char *s1, const char *s2, int flags)
83 /* get the length of both strings */
87 /* allocate length plus separator plus EOS */
88 result = emalloc(len1 + len2 + 2);
90 /* copy first string into place */
91 memcpy(result, s1, len1);
93 /* add separator character */
94 if (flags & STR_ADDSPACE) {
97 } else if (flags & STR_ADDSLASH) {
102 /* copy second string plus EOS into place */
103 memcpy(result + len1, s2, len2 + 1);
110 * Fracture a string into an array of words (as delineated by tabs or
111 * spaces) taking quotation marks into account. Leading tabs/spaces
115 * Pointer to the array of pointers to the words. To make life easier,
116 * the first word is always the value of the .MAKE variable.
119 brk_string(const char *str, int *store_argc, Boolean expand)
127 /* skip leading space chars. */
128 for (; *str == ' ' || *str == '\t'; ++str)
131 /* allocate room for a copy of the string */
132 if ((len = strlen(str) + 1) > curlen) {
135 buffer = emalloc(curlen = len);
139 * copy the string; at the same time, parse backslashes,
140 * quotes and build the argument list.
144 for (p = str, start = t = buffer;; ++p) {
152 /* Don't miss "" or '' */
170 * end of a token -- make sure there's enough argv
171 * space and save off a pointer.
177 if (argc == argmax) {
178 argmax *= 2; /* ramp up fast */
179 argv = erealloc(argv,
180 (argmax + 1) * sizeof(char *));
182 argv[argc++] = start;
184 if (ch == '\n' || ch == '\0')
199 /* hmmm; fix it up as best we can */
229 done: argv[argc] = NULL;
230 if (store_argc != NULL)
236 * Quote a string for appending it to MAKEFLAGS. According to Posix the
237 * kind of quoting here is implementation-defined. This quoting must ensure
238 * that the parsing of MAKEFLAGS's contents in a sub-shell yields the same
239 * options, option arguments and macro definitions as in the calling make.
240 * We simply quote all blanks, which according to Posix are space and tab
241 * in the POSIX locale. Don't use isblank because in that case makes with
242 * different locale settings could not communicate. We must also quote
243 * backslashes obviously.
246 MAKEFLAGS_quote(const char *str)
251 /* assume worst case - everything has to be quoted */
252 ret = emalloc(strlen(str) * 2 + 1);
274 MAKEFLAGS_break(const char *str, int *pargc)
279 /* allocate room for a copy of the string */
280 if ((len = strlen(str) + 1) > curlen)
281 buffer = erealloc(buffer, curlen = len);
303 if (argmax == *pargc) {
305 argv = erealloc(argv,
306 sizeof(*argv) * (argmax + 1));
308 argv[(*pargc)++] = start;
316 if (str[1] == ' ' || str[1] == '\t')
325 /* start of new word */
330 argv[(*pargc)] = NULL;
337 * See if a particular string matches a particular pattern.
339 * Results: Non-zero is returned if string matches pattern, 0 otherwise. The
340 * matching operation permits the following special characters in the
341 * pattern: *?\[] (see the man page for details on what these mean).
343 * Side effects: None.
346 Str_Match(const char *string, const char *pattern)
352 * See if we're at the end of both the pattern and the
353 * string. If, we succeeded. If we're at the end of the
354 * pattern but not at the end of the string, we failed.
358 if (*string == 0 && *pattern != '*')
361 * Check for a "*" as the next pattern character. It matches
362 * any substring. We handle this by calling ourselves
363 * recursively for each postfix of string, until either we
364 * match or we reach the end of the string.
366 if (*pattern == '*') {
370 while (*string != 0) {
371 if (Str_Match(string, pattern))
378 * Check for a "?" as the next pattern character. It matches
379 * any single character.
384 * Check for a "[" as the next pattern character. It is
385 * followed by a list of characters that are acceptable, or
386 * by a range (two characters separated by "-").
388 if (*pattern == '[') {
391 if ((*pattern == ']') || (*pattern == 0))
393 if (*pattern == *string)
395 if (pattern[1] == '-') {
399 if ((*pattern <= *string) &&
402 if ((*pattern >= *string) &&
409 while ((*pattern != ']') && (*pattern != 0))
414 * If the next pattern character is '/', just strip off the
415 * '/' so we do exact matching on the character that follows.
417 if (*pattern == '\\') {
423 * There's no special character. Just make sure that the
424 * next characters of each string match.
426 if (*pattern != *string)
428 thisCharOK: ++pattern;
435 *-----------------------------------------------------------------------
437 * Check word against pattern for a match (% is wild),
440 * Returns the beginning position of a match or null. The number
441 * of characters matched is returned in len.
446 *-----------------------------------------------------------------------
449 Str_SYSVMatch(const char *word, const char *pattern, int *len)
451 const char *p = pattern;
452 const char *w = word;
456 /* Zero-length word cannot be matched against */
462 /* Null pattern is the whole string */
467 if ((m = strchr(p, '%')) != NULL) {
468 /* check that the prefix matches */
469 for (; p != m && *w && *w == *p; w++, p++)
473 return (NULL); /* No match */
476 /* No more pattern, return the rest of the string */
484 /* Find a matching tail */
486 if (strcmp(p, w) == 0) {
490 while (*w++ != '\0');
497 *-----------------------------------------------------------------------
499 * Substitute '%' on the pattern with len characters from src.
500 * If the pattern does not contain a '%' prepend len characters
507 * Places result on buf
509 *-----------------------------------------------------------------------
512 Str_SYSVSubst(Buffer *buf, const char *pat, const char *src, int len)
516 if ((m = strchr(pat, '%')) != NULL) {
517 /* Copy the prefix */
518 Buf_AppendRange(buf, pat, m);
523 /* Copy the pattern */
524 Buf_AddBytes(buf, len, (const Byte *)src);
526 /* append the rest */
527 Buf_Append(buf, pat);