Change guard on <regex.h> inclusion to use new
[gnulib.git] / lib / rpmatch.c
1 /* Determine whether string value is affirmation or negative response
2    according to current locale's data.
3    Copyright (C) 1996, 1998 Free Software Foundation, Inc.
4
5    This program is free software; you can redistribute it and/or modify
6    it under the terms of the GNU General Public License as published by
7    the Free Software Foundation; either version 2, or (at your option)
8    any later version.
9
10    This program is distributed in the hope that it will be useful,
11    but WITHOUT ANY WARRANTY; without even the implied warranty of
12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13    GNU General Public License for more details.
14
15    You should have received a copy of the GNU General Public License
16    along with this program; if not, write to the Free Software Foundation,
17    Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
18
19 #if HAVE_CONFIG_H
20 # include <config.h>
21 #endif
22
23 #if STDC_HEADERS || _LIBC
24 # include <stddef.h>
25 # include <stdlib.h>
26 #else
27 # ifndef NULL
28 #  define NULL 0
29 # endif
30 #endif
31
32 #include <sys/types.h>
33 #if ! HAVE_LIBC_REGEX
34 # include <regex.h>
35 #endif
36
37 #if ENABLE_NLS
38 # include <libintl.h>
39 # define _(Text) gettext (Text)
40 #else
41 # define _(Text) Text
42 #endif
43
44 static int
45 try (response, pattern, match, nomatch, lastp, re)
46      const char *response;
47      const char *pattern;
48      const int match;
49      const int nomatch;
50      const char **lastp;
51      regex_t *re;
52 {
53   if (pattern != *lastp)
54     {
55       /* The pattern has changed.  */
56       if (*lastp)
57         {
58           /* Free the old compiled pattern.  */
59           regfree (re);
60           *lastp = NULL;
61         }
62       /* Compile the pattern and cache it for future runs.  */
63       if (regcomp (re, pattern, REG_EXTENDED) != 0)
64         return -1;
65       *lastp = pattern;
66     }
67
68   /* See if the regular expression matches RESPONSE.  */
69   return regexec (re, response, 0, NULL, 0) == 0 ? match : nomatch;
70 }
71
72
73 int
74 rpmatch (response)
75      const char *response;
76 {
77   /* Match against one of the response patterns, compiling the pattern
78      first if necessary.  */
79
80   /* We cache the response patterns and compiled regexps here.  */
81   static const char *yesexpr, *noexpr;
82   static regex_t yesre, nore;
83   int result;
84
85   return ((result = try (response, _("^[yY]"), 1, 0,
86                          &yesexpr, &yesre))
87           ? result
88           : try (response, _("^[nN]"), 0, -1, &noexpr, &nore));
89 }