lib/rpmatch.c

   1 /* rpmatch - determine whether string value is affirmation or negative
   2              response according to current locale's data
   3 Copyright (C) 1996 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 #ifdef HAVE_CONFIG_H
  20 # include <config.h>
  21 #endif
  22
  23 #if STDC_HEADERS || _LIBC
  24 # include <stdlib.h>
  25 #endif
  26
  27 #include <regex.h>
  28
  29 #if ENABLE_NLS
  30 # include <libintl.h>
  31 # define _(Text) gettext (Text)
  32 #else
  33 # define _(Text) Text
  34 #endif
  35
  36 static int
  37 try (response, pattern, match, nomatch, lastp, re)
  38      const char *response;
  39      const char *pattern;
  40      const int match;
  41      const int nomatch;
  42      const char **lastp;
  43      regex_t *re;
  44 {
  45   if (pattern != *lastp)
  46     {
  47       /* The pattern has changed.  */
  48       if (*lastp)
  49         {
  50           /* Free the old compiled pattern.  */
  51           regfree (re);
  52           *lastp = NULL;
  53         }
  54       /* Compile the pattern and cache it for future runs.  */
  55       if (regcomp (re, pattern, REG_EXTENDED) != 0)
  56         return -1;
  57       *lastp = pattern;
  58     }
  59
  60   /* See if the regular expression matches RESPONSE.  */
  61   return regexec (re, response, 0, NULL, 0) == 0 ? match : nomatch;
  62 }
  63
  64
  65 int
  66 rpmatch (response)
  67      const char *response;
  68 {
  69   /* Match against one of the response patterns, compiling the pattern
  70      first if necessary.  */
  71
  72   /* We cache the response patterns and compiled regexps here.  */
  73   static const char *yesexpr, *noexpr;
  74   static regex_t yesre, nore;
  75   int result;
  76
  77   return ((result = try (response, _("^[yY][[:alpha:]]*"), 1, 0,
  78                          &yesexpr, &yesre))
  79           ? result
  80           : try (response, _("^[nN][[:alpha:]]*"), 0, -1, &noexpr, &nore));
  81 }