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(list2_t *l, const char *pat)
  50 {
  51     int i;
  52
  53     if (!pat || !*pat || list_empty(l))
  54         return 0;
  55
  56     for (i = 0; i < l->length; i++) {
  57         if (!REGEXEC(((rx_t*)l->data[i])->rx, pat))
  58             return 1;
  59     }
  60
  61     return 0;
  62 }
  63
  64 int rx_lookup (list2_t *l, const char *pat)
  65 {
  66     int i;
  67
  68     if (!pat || !*pat || list_empty(l))
  69         return -1;
  70
  71     for (i = 0; i < l->length; i++) {
  72         if (!strcmp(((rx_t*)l->data[i])->pattern, pat))
  73             return i;
  74     }
  75
  76     return -1;
  77 }
  78
  79 int rx_sanitize_string(char *dst, ssize_t n, const char *src)
  80 {
  81     while (*src) {
  82         if (n <= 1)
  83             break;
  84
  85         /* these characters must be escaped in regular expressions */
  86         if (strchr("^.[$()|*+?{\\", *src)) {
  87             if (n <= 2)
  88                 break;
  89
  90             *dst++ = '\\';
  91             n--;
  92         }
  93
  94         *dst++ = *src++;
  95         n--;
  96     }
  97
  98     *dst = '\0';
  99
 100     return *src ? -1 : 0;
 101 }