From 54df2afaa61c6a03cbb4a33c9b90fa572b6d07b8 Mon Sep 17 00:00:00 2001 From: Jesse Morgan Date: Sat, 17 Dec 2016 21:28:53 -0800 Subject: Berkeley DB 4.8 with rust build script for linux. --- db-4.8.30/test/scr021/t.c | 79 +++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 79 insertions(+) create mode 100644 db-4.8.30/test/scr021/t.c (limited to 'db-4.8.30/test/scr021/t.c') diff --git a/db-4.8.30/test/scr021/t.c b/db-4.8.30/test/scr021/t.c new file mode 100644 index 0000000..046c2f2 --- /dev/null +++ b/db-4.8.30/test/scr021/t.c @@ -0,0 +1,79 @@ +/*- + * See the file LICENSE for redistribution information. + * + * Copyright (c) 2002-2009 Oracle. All rights reserved. + */ + +#include + +#include +#include +#include +#include +#include + +void +chk(f, str) + char *f, *str; +{ + char *s; + int ch, l, ok, pc; + + if (freopen(f, "r", stdin) == NULL) { + fprintf(stderr, "%s: %s\n", f, strerror(errno)); + exit(EXIT_FAILURE); + } + + for (l = 1, ok = 1, s = str; (ch = getchar()) != EOF;) { + if (ch == '\n') + ++l; + if (!ok || ch != *s) { + s = str; + ok = !isalpha(ch) && !isdigit(ch) && ch != '_'; + continue; + } + if (*++s != '\0') + continue; + + /* Match. */ + printf("%s: %d: %s", f, l, str); + for (pc = 1; (ch = getchar()) != EOF;) { + switch (ch) { + case '(': + ++pc; + break; + case ')': + --pc; + break; + case '\n': + ++l; + break; + } + if (ch == '\n') + putchar(' '); + else + putchar(ch); + if (pc <= 0) { + putchar('\n'); + break; + } + } + s = str; + } +} + +int +main(int argc, char *argv[]) +{ + int r; + + for (r = 0; *++argv != NULL;) { + chk(*argv, "FLD_CLR("); + chk(*argv, "FLD_ISSET("); + chk(*argv, "FLD_SET("); + chk(*argv, "F_CLR("); + chk(*argv, "F_ISSET("); + chk(*argv, "F_SET("); + } + return (0); +} -- cgit v1.2.3