summaryrefslogtreecommitdiff
path: root/package/heirloom-cpio/src/gmatch.c
diff options
context:
space:
mode:
Diffstat (limited to 'package/heirloom-cpio/src/gmatch.c')
-rw-r--r--package/heirloom-cpio/src/gmatch.c136
1 files changed, 136 insertions, 0 deletions
diff --git a/package/heirloom-cpio/src/gmatch.c b/package/heirloom-cpio/src/gmatch.c
new file mode 100644
index 000000000..a2c5eb7ba
--- /dev/null
+++ b/package/heirloom-cpio/src/gmatch.c
@@ -0,0 +1,136 @@
+/*
+ * Derived from /usr/src/cmd/sh/expand.c, Unix 7th Edition:
+ *
+ * Copyright(C) Caldera International Inc. 2001-2002. All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * Redistributions of source code and documentation must retain the
+ * above copyright notice, this list of conditions and the following
+ * disclaimer.
+ * Redistributions in binary form must reproduce the above copyright
+ * notice, this list of conditions and the following disclaimer in the
+ * documentation and/or other materials provided with the distribution.
+ * All advertising materials mentioning features or use of this software
+ * must display the following acknowledgement:
+ * This product includes software developed or owned by Caldera
+ * International, Inc.
+ * Neither the name of Caldera International, Inc. nor the names of
+ * other contributors may be used to endorse or promote products
+ * derived from this software without specific prior written permission.
+ *
+ * USE OF THE SOFTWARE PROVIDED FOR UNDER THIS LICENSE BY CALDERA
+ * INTERNATIONAL, INC. AND CONTRIBUTORS ``AS IS'' AND ANY EXPRESS OR
+ * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+ * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED. IN NO EVENT SHALL CALDERA INTERNATIONAL, INC. BE
+ * LIABLE FOR ANY DIRECT, INDIRECT INCIDENTAL, SPECIAL, EXEMPLARY, OR
+ * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
+ * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
+ * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
+ * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE
+ * OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
+ * EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+ */
+
+#if __GNUC__ >= 3 && __GNUC_MINOR__ >= 4 || __GNUC__ >= 4
+#define USED __attribute__ ((used))
+#elif defined __GNUC__
+#define USED __attribute__ ((unused))
+#else
+#define USED
+#endif
+static const char sccsid[] USED = "@(#)gmatch.sl 1.5 (gritter) 5/29/05";
+
+#include <stdlib.h>
+#include <wchar.h>
+#include <limits.h>
+
+#include "mbtowi.h"
+
+#define fetch(wc, s, n) ((mb_cur_max > 1 && *(s) & 0200 ? \
+ ((n) = mbtowi(&(wc), (s), mb_cur_max), \
+ (n) = ((n) > 0 ? (n) : (n) < 0 ? (wc = WEOF, 1) : 1)) :\
+ ((wc) = *(s) & 0377, (n) = 1)), (s) += (n), (wc))
+
+int
+gmatch(const char *s, const char *p)
+{
+ const char *bs = s;
+ int mb_cur_max = MB_CUR_MAX;
+ wint_t c, scc;
+ int n;
+
+ if (fetch(scc, s, n) == WEOF)
+ return (0);
+ switch (fetch(c, p, n)) {
+
+ case '[': {
+ int ok = 0, excl;
+ unsigned long lc = ULONG_MAX;
+ const char *bp;
+
+ if (*p == '!') {
+ p++;
+ excl = 1;
+ } else
+ excl = 0;
+ fetch(c, p, n);
+ bp = p;
+ while (c != '\0') {
+ if (c == ']' && p > bp)
+ return (ok ^ excl ? gmatch(s, p) : 0);
+ else if (c == '-' && p > bp && *p != ']') {
+ if (*p == '\\')
+ p++;
+ if (fetch(c, p, n) == '\0')
+ break;
+ if (lc <= scc && scc <= c)
+ ok = 1;
+ } else {
+ if (c == '\\') {
+ if (fetch(c, p, n) == '\0')
+ break;
+ }
+ if (scc == (lc = c))
+ ok = 1;
+ }
+ fetch(c, p, n);
+ }
+ return (0);
+ }
+
+ case '\\':
+ fetch(c, p, n);
+ if (c == '\0')
+ return (0);
+ /*FALLTHRU*/
+
+ default:
+ if (c != scc)
+ return (0);
+ /*FALLTHRU*/
+
+ case '?':
+ return (scc ? gmatch(s, p) : 0);
+
+ case '*':
+ if (*p == '\0')
+ return (1);
+ s = bs;
+ while (*s) {
+ if (gmatch(s, p))
+ return (1);
+ fetch(scc, s, n);
+ }
+ return (0);
+
+ case '\0':
+ return (scc == '\0');
+
+ case WEOF:
+ return (0);
+
+ }
+}