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 #if ENABLE_NLS
  33 # include <sys/types.h>
  34 # include <regex.h>
  35 # include <libintl.h>
  36 # define _(Text) gettext (Text)
  37
  38 static int
  39 try (const char *response, const char *pattern, const int match, const int nomatch, const char **lastp, regex_t *re)
  40 {
  41   if (pattern != *lastp)
  42     {
  43       /* The pattern has changed.  */
  44       if (*lastp)
  45         {
  46           /* Free the old compiled pattern.  */
  47           regfree (re);
  48           *lastp = NULL;
  49         }
  50       /* Compile the pattern and cache it for future runs.  */
  51       if (regcomp (re, pattern, REG_EXTENDED) != 0)
  52         return -1;
  53       *lastp = pattern;
  54     }
  55
  56   /* See if the regular expression matches RESPONSE.  */
  57   return regexec (re, response, 0, NULL, 0) == 0 ? match : nomatch;
  58 }
  59 #endif
  60
  61
  62 int
  63 rpmatch (const char *response)
  64 {
  65 #if ENABLE_NLS
  66   /* Match against one of the response patterns, compiling the pattern
  67      first if necessary.  */
  68
  69   /* We cache the response patterns and compiled regexps here.  */
  70   static const char *yesexpr, *noexpr;
  71   static regex_t yesre, nore;
  72   int result;
  73
  74   return ((result = try (response, _("^[yY]"), 1, 0,
  75                          &yesexpr, &yesre))
  76           ? result
  77           : try (response, _("^[nN]"), 0, -1, &noexpr, &nore));
  78 #else
  79   /* Test against "^[yY]" and "^[nN]", hardcoded to avoid requiring regex */
  80   return (*response == 'y' || *response == 'Y' ? 1
  81           : *response == 'n' || *response == 'N' ? 0 : -1);
  82 #endif
  83 }