1 /* Determine whether string value is affirmation or negative response
2    according to current locale's data.
3    This file is part of the GNU C Library.
4    Copyright (C) 1996-2022 Free Software Foundation, Inc.
5 
6    The GNU C Library is free software; you can redistribute it and/or
7    modify it under the terms of the GNU Lesser General Public
8    License as published by the Free Software Foundation; either
9    version 2.1 of the License, or (at your option) any later version.
10 
11    The GNU C Library is distributed in the hope that it will be useful,
12    but WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14    Lesser General Public License for more details.
15 
16    You should have received a copy of the GNU Lesser General Public
17    License along with the GNU C Library; if not, see
18    <https://www.gnu.org/licenses/>.  */
19 
20 #include <langinfo.h>
21 #include <stdlib.h>
22 #include <regex.h>
23 
24 
25 /* Match against one of the response patterns, compiling the pattern
26    first if necessary.  */
27 static int
try(const char * response,const int tag,const int match,const int nomatch,const char ** lastp,regex_t * re)28 try (const char *response,
29      const int tag, const int match, const int nomatch,
30      const char **lastp, regex_t *re)
31 {
32   const char *pattern = nl_langinfo (tag);
33   if (pattern != *lastp)
34     {
35       /* The pattern has changed.  */
36       if (*lastp != NULL)
37         {
38           /* Free the old compiled pattern.  */
39           __regfree (re);
40           *lastp = NULL;
41         }
42       /* Compile the pattern and cache it for future runs.  */
43       if (__regcomp (re, pattern, REG_EXTENDED) != 0)
44         return -1;
45       *lastp = pattern;
46     }
47 
48   /* Try the pattern.  */
49   return __regexec (re, response, 0, NULL, 0) == 0 ? match : nomatch;
50 }
51 
52 int
rpmatch(const char * response)53 rpmatch (const char *response)
54 {
55   /* We cache the response patterns and compiled regexps here.  */
56   static const char *yesexpr, *noexpr;
57   static regex_t yesre, nore;
58 
59   return (try (response, YESEXPR, 1, 0, &yesexpr, &yesre) ?:
60 	  try (response, NOEXPR, 0, -1, &noexpr, &nore));
61 }
62