pintos-os.org Git - pspp/blob - 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 #include <stdlib.h>
  24 #include <regex.h>
  25
  26
  27 static int
  28 try (tag, match, nomatch, lastp, re)
  29      const char *pattern;
  30      const int match;
  31      const int nomatch;
  32      const char **lastp;
  33      regex_t *re;
  34 {
  35   if (pattern != *lastp)
  36     {
  37       /* The pattern has changed.  */
  38       if (*lastp)
  39         {
  40           /* Free the old compiled pattern.  */
  41           regfree (re);
  42           *lastp = NULL;
  43         }
  44       /* Compile the pattern and cache it for future runs.  */
  45       if (regcomp (re, pattern, REG_EXTENDED) != 0)
  46         return -1;
  47       *lastp = pattern;
  48     }
  49
  50   /* Try the pattern.  */
  51   return regexec (re, response, 0, NULL, 0) == 0 ? match : nomatch;
  52 }
  53
  54
  55 int
  56 rpmatch (response)
  57      const char *response;
  58 {
  59   /* Match against one of the response patterns, compiling the pattern
  60      first if necessary.  */
  61
  62   /* We cache the response patterns and compiled regexps here.  */
  63   static const char *yesexpr, *noexpr;
  64   static regex_t yesre, nore;
  65   int result;
  66
  67   return ((result = try (_("[yY][[:alpha:]]"), 1, 0, &yesexpr, &yesre))
  68           ? result
  69           : try (_("[nN][[:alpha:]]"), 0, -1, &noexpr, &nore));
  70 }