retest.c revision 1.3 1 1.3 aymeric /* $NetBSD: retest.c,v 1.3 2000/06/23 15:40:13 aymeric Exp $ */
2 1.2 jtc
3 1.1 jtc /*
4 1.1 jtc * Copyright (c) 1980, 1993
5 1.1 jtc * The Regents of the University of California. All rights reserved.
6 1.1 jtc *
7 1.1 jtc * Redistribution and use in source and binary forms, with or without
8 1.1 jtc * modification, are permitted provided that the following conditions
9 1.1 jtc * are met:
10 1.1 jtc * 1. Redistributions of source code must retain the above copyright
11 1.1 jtc * notice, this list of conditions and the following disclaimer.
12 1.1 jtc * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 jtc * notice, this list of conditions and the following disclaimer in the
14 1.1 jtc * documentation and/or other materials provided with the distribution.
15 1.1 jtc * 3. All advertising materials mentioning features or use of this software
16 1.1 jtc * must display the following acknowledgement:
17 1.1 jtc * This product includes software developed by the University of
18 1.1 jtc * California, Berkeley and its contributors.
19 1.1 jtc * 4. Neither the name of the University nor the names of its contributors
20 1.1 jtc * may be used to endorse or promote products derived from this software
21 1.1 jtc * without specific prior written permission.
22 1.1 jtc *
23 1.1 jtc * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24 1.1 jtc * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 1.1 jtc * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 1.1 jtc * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27 1.1 jtc * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 1.1 jtc * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 1.1 jtc * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 1.1 jtc * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 1.1 jtc * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 1.1 jtc * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 1.1 jtc * SUCH DAMAGE.
34 1.1 jtc */
35 1.1 jtc
36 1.1 jtc #ifndef lint
37 1.1 jtc static char copyright[] =
38 1.1 jtc "@(#) Copyright (c) 1980, 1993\n\
39 1.1 jtc The Regents of the University of California. All rights reserved.\n";
40 1.1 jtc #endif /* not lint */
41 1.1 jtc
42 1.1 jtc #ifndef lint
43 1.2 jtc #if 0
44 1.1 jtc static char sccsid[] = "@(#)retest.c 8.1 (Berkeley) 6/6/93";
45 1.2 jtc #endif
46 1.3 aymeric static char rcsid[] = "$NetBSD: retest.c,v 1.3 2000/06/23 15:40:13 aymeric Exp $";
47 1.1 jtc #endif /* not lint */
48 1.1 jtc
49 1.1 jtc #include <ctype.h>
50 1.1 jtc
51 1.1 jtc int l_onecase = 0;
52 1.3 aymeric char * x_start;
53 1.3 aymeric char * x_escaped;
54 1.1 jtc char * convexp();
55 1.1 jtc char * expmatch();
56 1.1 jtc main()
57 1.1 jtc {
58 1.1 jtc char reg[132];
59 1.1 jtc char *ireg;
60 1.1 jtc char str[132];
61 1.1 jtc char *match;
62 1.1 jtc char matstr[132];
63 1.1 jtc char c;
64 1.1 jtc
65 1.1 jtc while (1) {
66 1.1 jtc printf ("\nexpr: ");
67 1.1 jtc scanf ("%s", reg);
68 1.1 jtc ireg = convexp(reg);
69 1.1 jtc match = ireg;
70 1.1 jtc while(*match) {
71 1.1 jtc switch (*match) {
72 1.1 jtc
73 1.1 jtc case '\\':
74 1.1 jtc case '(':
75 1.1 jtc case ')':
76 1.1 jtc case '|':
77 1.1 jtc printf ("%c", *match);
78 1.1 jtc break;
79 1.1 jtc
80 1.1 jtc default:
81 1.1 jtc if (isalnum(*match))
82 1.1 jtc printf("%c", *match);
83 1.1 jtc else
84 1.1 jtc printf ("<%03o>", *match);
85 1.1 jtc break;
86 1.1 jtc }
87 1.1 jtc match++;
88 1.1 jtc }
89 1.1 jtc printf("\n");
90 1.1 jtc getchar();
91 1.1 jtc while(1) {
92 1.1 jtc printf ("string: ");
93 1.1 jtc match = str;
94 1.1 jtc while ((c = getchar()) != '\n')
95 1.1 jtc *match++ = c;
96 1.1 jtc *match = 0;
97 1.1 jtc if (str[0] == '#')
98 1.1 jtc break;
99 1.1 jtc matstr[0] = 0;
100 1.3 aymeric x_start = str;
101 1.3 aymeric x_escaped = 0;
102 1.1 jtc match = expmatch (str, ireg, matstr);
103 1.1 jtc if (match == 0)
104 1.1 jtc printf ("FAILED\n");
105 1.1 jtc else
106 1.1 jtc printf ("match\nmatstr = %s\n", matstr);
107 1.1 jtc }
108 1.1 jtc
109 1.1 jtc }
110 1.1 jtc }
111