lib-lib/rx.c

   1 /*
   2  *  This program is free software; you can redistribute it and/or modify
   3  *  it under the terms of the GNU General Public License as published by
   4  *  the Free Software Foundation; either version 2 of the License, or (at
   5  *  your option) any later version.
   6  *
   7  *  This program is distributed in the hope that it will be useful, but
   8  *  WITHOUT ANY WARRANTY; without even the implied warranty of
   9  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  10  *  General Public License for more details.
  11  *
  12  *  You should have received a copy of the GNU General Public License
  13  *  along with this program; if not, write to the Free Software
  14  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
  15  *  MA 02110-1301, USA.
  16  *
  17  *  Copyright © 2006 Pierre Habouzit
  18  */
  19 /*
  20  * This file is part of mutt-ng, see http://www.muttng.org/.
  21  * It's licensed under the GNU General Public License,
  22  * please see the file GPL in the top level source directory.
  23  */
  24
  25 #include "lib-lib.h"
  26
  27 rx_t *rx_compile(const char *s, int flags)
  28 {
  29     rx_t *pp = p_new(rx_t, 1);
  30
  31     pp->pattern = m_strdup(s);
  32     pp->rx = p_new(regex_t, 1);
  33
  34     if (REGCOMP(pp->rx, NONULL(s), flags) != 0) {
  35         rx_delete(&pp);
  36     }
  37
  38     return pp;
  39 }
  40
  41 void rx_delete(rx_t **p)
  42 {
  43     p_delete(&(*p)->pattern);
  44     regfree((*p)->rx);
  45     p_delete(&(*p)->rx);
  46     p_delete(p);
  47 }
  48
  49 int rx_list_match(rx_t *l, const char *pat)
  50 {
  51     if (!pat || !*pat)
  52         return 0;
  53
  54     while (l) {
  55         if (!REGEXEC(l->rx, pat))
  56             return 1;
  57         l = l->next;
  58     }
  59
  60     return 0;
  61 }
  62
  63 rx_t **rx_lookup(rx_t **l, const char *pat)
  64 {
  65     if (!pat || !*pat)
  66         return NULL;
  67
  68     while (*l) {
  69         if (!strcmp((*l)->pattern, pat))
  70             return l;
  71         l = &(*l)->next;
  72     }
  73
  74     return NULL;
  75 }
  76
  77 int rx_sanitize_string(char *dst, ssize_t n, const char *src)
  78 {
  79     while (*src) {
  80         if (n <= 1)
  81             break;
  82
  83         /* these characters must be escaped in regular expressions */
  84         if (strchr("^.[$()|*+?{\\", *src)) {
  85             if (n <= 2)
  86                 break;
  87
  88             *dst++ = '\\';
  89             n--;
  90         }
  91
  92         *dst++ = *src++;
  93         n--;
  94     }
  95
  96     *dst = '\0';
  97
  98     return *src ? -1 : 0;
  99 }