GCC47: Add local modifications
[dragonfly.git] / contrib / cvs-1.12 / 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, 2000, 2002, 2003 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., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.  */
18
19 #ifdef HAVE_CONFIG_H
20 # include <config.h>
21 #endif
22
23 #include <stddef.h>
24 #include <stdlib.h>
25
26 #if ENABLE_NLS
27 # include <sys/types.h>
28 # include <limits.h>
29 # include <regex.h>
30 # include "gettext.h"
31 # define _(msgid) gettext (msgid)
32
33 static int
34 try (const char *response, const char *pattern, const int match,
35      const int nomatch, const char **lastp, regex_t *re)
36 {
37   if (pattern != *lastp)
38     {
39       /* The pattern has changed.  */
40       if (*lastp)
41         {
42           /* Free the old compiled pattern.  */
43           regfree (re);
44           *lastp = NULL;
45         }
46       /* Compile the pattern and cache it for future runs.  */
47       if (regcomp (re, pattern, REG_EXTENDED) != 0)
48         return -1;
49       *lastp = pattern;
50     }
51
52   /* See if the regular expression matches RESPONSE.  */
53   return regexec (re, response, 0, NULL, 0) == 0 ? match : nomatch;
54 }
55 #endif
56
57
58 int
59 rpmatch (const char *response)
60 {
61 #if ENABLE_NLS
62   /* Match against one of the response patterns, compiling the pattern
63      first if necessary.  */
64
65   /* We cache the response patterns and compiled regexps here.  */
66   static const char *yesexpr, *noexpr;
67   static regex_t yesre, nore;
68   int result;
69
70   return ((result = try (response, _("^[yY]"), 1, 0,
71                          &yesexpr, &yesre))
72           ? result
73           : try (response, _("^[nN]"), 0, -1, &noexpr, &nore));
74 #else
75   /* Test against "^[yY]" and "^[nN]", hardcoded to avoid requiring regex */
76   return (*response == 'y' || *response == 'Y' ? 1
77           : *response == 'n' || *response == 'N' ? 0 : -1);
78 #endif
79 }