Source-Changes-HG archive

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index][Old Index]

[src/trunk]: src/tests/lib/libc/regex Add a test harness for the att data files:



details:   https://anonhg.NetBSD.org/src/rev/3cf06510ede6
branches:  trunk
changeset: 771026:3cf06510ede6
user:      christos <christos%NetBSD.org@localhost>
date:      Sun Nov 06 14:23:04 2011 +0000

description:
Add a test harness for the att data files:
    http://www2.research.att.com/~gsf/testregex/
Not part of the build yet.

diffstat:

 tests/lib/libc/regex/att.c |  276 +++++++++++++++++++++++++++++++++++++++++++++
 1 files changed, 276 insertions(+), 0 deletions(-)

diffs (280 lines):

diff -r c699fb76bffa -r 3cf06510ede6 tests/lib/libc/regex/att.c
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/tests/lib/libc/regex/att.c        Sun Nov 06 14:23:04 2011 +0000
@@ -0,0 +1,276 @@
+/*     $NetBSD: att.c,v 1.1 2011/11/06 14:23:04 christos Exp $ */
+
+/*-
+ * Copyright (c) 2011 The NetBSD Foundation, Inc.
+ * All rights reserved.
+ *
+ * This code is derived from software contributed to The NetBSD Foundation
+ * by Christos Zoulas.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. 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.
+ * 3. All advertising materials mentioning features or use of this software
+ *    must display the following acknowledgement:
+ *        This product includes software developed by the NetBSD
+ *        Foundation, Inc. and its contributors.
+ * 4. Neither the name of The NetBSD Foundation nor the names of its
+ *    contributors may be used to endorse or promote products derived
+ *    from this software without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, 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 THE FOUNDATION OR CONTRIBUTORS
+ * 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.
+ */
+
+#include <sys/cdefs.h>
+__RCSID("$NetBSD: att.c,v 1.1 2011/11/06 14:23:04 christos Exp $");
+
+#include <stdio.h>
+#include <regex.h>
+#include <string.h>
+#include <stdlib.h>
+#include <vis.h>
+#include <atf-c.h>
+
+
+ATF_TC(regex_att);
+
+ATF_TC_HEAD(regex_att, tc)
+{
+
+       atf_tc_set_md_var(tc, "descr", "Driver for parsing AT&T format"
+           " input files available from:"
+           " http://www2.research.att.com/~gsf/testregex/";);
+}
+
+static const char sep[] = "\r\n\t";
+
+static const struct {
+       const char *n;
+       int v;
+       int ce;
+#define COMP 1
+#define EXEC 2
+} nv[] = {
+#define _DO(a, b)      { # a, REG_ ## a, b },
+       _DO(NOMATCH, EXEC)
+       _DO(BADPAT, COMP)
+       _DO(ECOLLATE, COMP)
+       _DO(ECTYPE, COMP)
+       _DO(EESCAPE, COMP)
+       _DO(ESUBREG, COMP)
+       _DO(EBRACK, COMP)
+       _DO(EPAREN, COMP)
+       _DO(EBRACE, COMP)
+       _DO(BADBR, COMP)
+       _DO(ERANGE, COMP)
+       _DO(ESPACE, EXEC)
+       _DO(BADRPT, COMP)
+       _DO(EMPTY, COMP)
+       _DO(ASSERT, COMP)
+       _DO(INVARG, COMP)
+       _DO(ENOSYS, COMP)
+#undef _DO
+};
+
+static void
+geterror(const char *s, int *comp, int *exec)
+{
+       *comp = 0;
+       *exec = 0;
+       for (size_t i = 0; i < __arraycount(nv); i++)
+               if (strcmp(s, nv[i].n) == 0) {
+                       if (nv[i].ce & COMP)
+                               *comp = nv[i].v;
+                       if (nv[i].ce & EXEC)
+                               *exec = nv[i].v;
+                       return;
+               }
+       ATF_REQUIRE_MSG(0, "Unknown error %s", s);
+       return;
+}
+
+static int
+getflags(char *s)
+{
+       int flags = 0;
+
+       for (;; s++)
+               switch (*s) {
+               case '0': case '1': case '2': case '3': case '4':
+               case '5': case '6': case '7': case '8': case '9':
+                       *s = '\0';
+                       break;
+               case '\0':
+                       return flags;
+               case 'B':
+               case 'E':
+               case 'F':
+               case 'L':
+                       break;
+               case 'i':
+                       flags |= REG_ICASE;
+                       *s = '\0';
+                       break;
+               case '$':
+                       *s = '\0';
+                       break;
+               case 'n':
+                       *s = '\0';
+                       break;
+               default:
+                       ATF_REQUIRE_MSG(0, "Unknown char %c", *s);
+                       break;
+               }
+}
+
+static size_t
+getmatches(const char *s)
+{
+       size_t i;
+       char *q;
+       for (i = 0; (q = strchr(s, '(')) != NULL; i++, s = q + 1)
+               continue;
+       ATF_REQUIRE_MSG(i != 0, "No parentheses found");
+       return i;
+}
+
+static void
+checkmatches(const char *matches, size_t nm, const regmatch_t *pm)
+{
+       if (nm == 0)
+               return;
+
+       char *res;
+       size_t len = strlen(matches) + 1, off = 0;
+
+       ATF_REQUIRE((res = strdup(matches)) != NULL);
+       for (size_t i = 0; i < nm; i++) {
+               int l;
+               if (pm[i].rm_so == -1 && pm[i].rm_eo == -1)
+                       l = snprintf(res + off, len - off, "(?,?)");
+               else
+                       l = snprintf(res + off, len - off, "(%lld,%lld)",
+                           (long long)pm[i].rm_so, (long long)pm[i].rm_eo);
+               ATF_REQUIRE_MSG((size_t) l < len - off, "String too long %s"
+                   " cur=%d, max=%zu", res, l, len - off);
+               off += l;
+       }
+       ATF_REQUIRE_STREQ(res, matches);
+       free(res);
+}
+
+ATF_TC_BODY(regex_att, tc)
+{
+       regex_t re;
+       char *line;
+       size_t len, lineno = 0;
+
+       for (; (line = fparseln(stdin, &len, &lineno, NULL, 0))
+           != NULL; free(line)) {
+               char *name, *pattern, *input, *matches;
+               regmatch_t *pm;
+               size_t nm;
+
+               fprintf(stderr, "[%s]\n", line);
+               if ((name = strtok(line, sep)) == NULL)
+                       continue;
+
+               if (strcmp(name, "NOTE") == 0)
+                       continue;
+
+               if (*name == '{')
+                       name++;
+               if (*name == '}')
+                       continue;
+
+               ATF_REQUIRE_MSG((pattern = strtok(NULL, sep)) != NULL,
+                       "Missing pattern at line %zu", lineno);
+               ATF_REQUIRE_MSG((input = strtok(NULL, sep)) != NULL,
+                       "Missing input at line %zu", lineno);
+
+               if (strchr(name, '$')) {
+                       ATF_REQUIRE(strunvis(pattern, pattern) != -1);
+                       ATF_REQUIRE(strunvis(input, input) != -1);
+               }
+
+
+               if (strcmp(input, "NULL") == 0)
+                       *input = '\0';
+               ATF_REQUIRE_MSG((matches = strtok(NULL, sep)) != NULL,
+                       "Missing matches at line %zu", lineno);
+
+               int comp, exec;
+               if (*matches != '(') {
+                       geterror(matches, &comp, &exec);
+                       pm = NULL;
+                       nm = 0;
+               } else {
+                       comp = exec = 0;
+                       nm = getmatches(matches);
+                       ATF_REQUIRE((pm = calloc(nm, sizeof(*pm))) != NULL);
+               }
+
+               int fail = 0;
+               int iflags = getflags(name);
+               for (; *name; name++) {
+                       int flags;
+                       switch (*name) {
+                       case 'B':
+                               flags = REG_BASIC;
+                               break;
+                       case 'E':
+                               flags = REG_EXTENDED;
+                               break;
+                       case 'L':
+                               flags = REG_NOSPEC;
+                               break;
+                       case 'F':
+                               fail++;
+                               continue;
+                       default:
+                               ATF_REQUIRE_MSG(0, "Bad name %c", *name);
+                               continue;
+                       }
+                       int c = regcomp(&re, pattern, flags | iflags);
+                       ATF_REQUIRE_MSG(c == comp,
+                           "regcomp returned %d for pattern %s at line %zu",
+                           c, pattern, lineno);
+                       if (c)
+                               continue;
+                       int e = regexec(&re, input, nm, pm, 0);
+                       if (fail)
+                               fprintf(stderr,
+                                   "skipping failed test at line %zu\n",
+                                   lineno);
+                       else {
+                               ATF_REQUIRE_MSG(e == exec, "Expected error %d,"
+                                   " got %d at line %zu", exec, e, lineno);
+                               checkmatches(matches, nm, pm);
+                       }
+                       regfree(&re);
+               }
+               free(pm);
+       }
+}
+
+ATF_TP_ADD_TCS(tp)
+{
+
+       ATF_TP_ADD_TC(tp, regex_att);
+       return atf_no_error();
+}



Home | Main Index | Thread Index | Old Index