lib/search/glob.c

   1 /*
   2    Search text engine.
   3    Glob-style pattern matching
   4
   5    Copyright (C) 2009-2024
   6    Free Software Foundation, Inc.
   7
   8    Written by:
   9    Slava Zanko <slavazanko@gmail.com>, 2009.
  10
  11    This file is part of the Midnight Commander.
  12
  13    The Midnight Commander is free software: you can redistribute it
  14    and/or modify it under the terms of the GNU General Public License as
  15    published by the Free Software Foundation, either version 3 of the License,
  16    or (at your option) any later version.
  17
  18    The Midnight Commander is distributed in the hope that it will be useful,
  19    but WITHOUT ANY WARRANTY; without even the implied warranty of
  20    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21    GNU General Public License for more details.
  22
  23    You should have received a copy of the GNU General Public License
  24    along with this program.  If not, see <http://www.gnu.org/licenses/>.
  25  */
  26
  27 #include <config.h>
  28
  29 #include "lib/global.h"
  30 #include "lib/strutil.h"
  31 #include "lib/search.h"
  32
  33 #include "internal.h"
  34
  35 /*** global variables ****************************************************************************/
  36
  37 /*** file scope macro definitions ****************************************************************/
  38
  39 /*** file scope type declarations ****************************************************************/
  40
  41 /*** forward declarations (file scope functions) *************************************************/
  42
  43 /*** file scope variables ************************************************************************/
  44
  45 /* --------------------------------------------------------------------------------------------- */
  46 /*** file scope functions ************************************************************************/
  47 /* --------------------------------------------------------------------------------------------- */
  48
  49 static GString *
  50 mc_search__glob_translate_to_regex (const GString * astr)
  51 {
  52     const char *str = astr->str;
  53     GString *buff;
  54     gsize loop;
  55     gboolean inside_group = FALSE;
  56
  57     buff = g_string_sized_new (32);
  58
  59     for (loop = 0; loop < astr->len; loop++)
  60     {
  61         switch (str[loop])
  62         {
  63         case '*':
  64             if (!str_is_char_escaped (str, &(str[loop])))
  65             {
  66                 g_string_append (buff, inside_group ? ".*" : "(.*)");
  67                 continue;
  68             }
  69             break;
  70         case '?':
  71             if (!str_is_char_escaped (str, &(str[loop])))
  72             {
  73                 g_string_append (buff, inside_group ? "." : "(.)");
  74                 continue;
  75             }
  76             break;
  77         case ',':
  78             if (!str_is_char_escaped (str, &(str[loop])))
  79             {
  80                 g_string_append_c (buff, inside_group ? '|' : ',');
  81                 continue;
  82             }
  83             break;
  84         case '{':
  85             if (!str_is_char_escaped (str, &(str[loop])))
  86             {
  87                 g_string_append_c (buff, '(');
  88                 inside_group = TRUE;
  89                 continue;
  90             }
  91             break;
  92         case '}':
  93             if (!str_is_char_escaped (str, &(str[loop])))
  94             {
  95                 g_string_append_c (buff, ')');
  96                 inside_group = FALSE;
  97                 continue;
  98             }
  99             break;
 100         case '+':
 101         case '.':
 102         case '$':
 103         case '(':
 104         case ')':
 105         case '^':
 106             g_string_append_c (buff, '\\');
 107             break;
 108         default:
 109             break;
 110         }
 111         g_string_append_c (buff, str[loop]);
 112     }
 113     return buff;
 114 }
 115
 116 /* --------------------------------------------------------------------------------------------- */
 117
 118 static GString *
 119 mc_search__translate_replace_glob_to_regex (const char *str)
 120 {
 121     GString *buff;
 122     char cnt = '0';
 123     gboolean escaped_mode = FALSE;
 124
 125     buff = g_string_sized_new (32);
 126
 127     while (*str != '\0')
 128     {
 129         char c = *str++;
 130
 131         switch (c)
 132         {
 133         case '\\':
 134             if (!escaped_mode)
 135             {
 136                 escaped_mode = TRUE;
 137                 g_string_append_c (buff, '\\');
 138                 continue;
 139             }
 140             break;
 141         case '*':
 142         case '?':
 143             if (!escaped_mode)
 144             {
 145                 g_string_append_c (buff, '\\');
 146                 c = ++cnt;
 147             }
 148             break;
 149         case '&':
 150             if (!escaped_mode)
 151                 g_string_append_c (buff, '\\');
 152             break;
 153         default:
 154             break;
 155         }
 156         g_string_append_c (buff, c);
 157         escaped_mode = FALSE;
 158     }
 159     return buff;
 160 }
 161
 162 /*** public functions ****************************************************************************/
 163
 164 void
 165 mc_search__cond_struct_new_init_glob (const char *charset, mc_search_t * lc_mc_search,
 166                                       mc_search_cond_t * mc_search_cond)
 167 {
 168     GString *tmp;
 169
 170     tmp = mc_search__glob_translate_to_regex (mc_search_cond->str);
 171     g_string_free (mc_search_cond->str, TRUE);
 172
 173     if (lc_mc_search->is_entire_line)
 174     {
 175         g_string_prepend_c (tmp, '^');
 176         g_string_append_c (tmp, '$');
 177     }
 178     mc_search_cond->str = tmp;
 179
 180     mc_search__cond_struct_new_init_regex (charset, lc_mc_search, mc_search_cond);
 181 }
 182
 183 /* --------------------------------------------------------------------------------------------- */
 184
 185 gboolean
 186 mc_search__run_glob (mc_search_t * lc_mc_search, const void *user_data,
 187                      gsize start_search, gsize end_search, gsize * found_len)
 188 {
 189     return mc_search__run_regex (lc_mc_search, user_data, start_search, end_search, found_len);
 190 }
 191
 192 /* --------------------------------------------------------------------------------------------- */
 193
 194 GString *
 195 mc_search_glob_prepare_replace_str (mc_search_t * lc_mc_search, GString * replace_str)
 196 {
 197     GString *repl, *res;
 198
 199     repl = mc_search__translate_replace_glob_to_regex (replace_str->str);
 200     res = mc_search_regex_prepare_replace_str (lc_mc_search, repl);
 201     g_string_free (repl, TRUE);
 202
 203     return res;
 204 }
 205
 206 /* --------------------------------------------------------------------------------------------- */