lib/search/hex.c

   1 /*
   2    Search text engine.
   3    HEX-style pattern matching
   4
   5    Copyright (C) 2009, 2011
   6    The 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 <stdio.h>
  30
  31 #include "lib/global.h"
  32 #include "lib/strutil.h"
  33 #include "lib/search.h"
  34 #include "lib/strescape.h"
  35
  36 #include "lib/charsets.h"
  37
  38 #include "internal.h"
  39
  40 /*** global variables ****************************************************************************/
  41
  42 /*** file scope macro definitions ****************************************************************/
  43
  44 /*** file scope type declarations ****************************************************************/
  45
  46 /*** file scope variables ************************************************************************/
  47
  48 /*** file scope functions ************************************************************************/
  49
  50 static GString *
  51 mc_search__hex_translate_to_regex (const GString * astr)
  52 {
  53     GString *buff;
  54     gchar *tmp_str;
  55     gsize tmp_str_len;
  56     gsize loop = 0;
  57
  58     buff = g_string_sized_new (64);
  59     tmp_str = g_strndup (astr->str, astr->len);
  60     g_strchug (tmp_str);        /* trim leadind whitespaces */
  61     tmp_str_len = strlen (tmp_str);
  62
  63     while (loop < tmp_str_len)
  64     {
  65         int val, ptr;
  66
  67         if (sscanf (tmp_str + loop, "%i%n", &val, &ptr))
  68         {
  69             if (val < -128 || val > 255)
  70                 loop++;
  71             else
  72             {
  73                 g_string_append_printf (buff, "\\x%02X", (unsigned char) val);
  74                 loop += ptr;
  75             }
  76         }
  77         else if (*(tmp_str + loop) == '"')
  78         {
  79             gsize loop2 = 0;
  80
  81             loop++;
  82             while (loop + loop2 < tmp_str_len)
  83             {
  84                 if (*(tmp_str + loop + loop2) == '"' &&
  85                     !strutils_is_char_escaped (tmp_str, tmp_str + loop + loop2))
  86                     break;
  87                 loop2++;
  88             }
  89
  90             g_string_append_len (buff, tmp_str + loop, loop2 - 1);
  91             loop += loop2;
  92         }
  93         else
  94             loop++;
  95     }
  96
  97     g_free (tmp_str);
  98
  99     return buff;
 100 }
 101
 102 /*** public functions ****************************************************************************/
 103
 104 void
 105 mc_search__cond_struct_new_init_hex (const char *charset, mc_search_t * lc_mc_search,
 106                                      mc_search_cond_t * mc_search_cond)
 107 {
 108     GString *tmp;
 109
 110     tmp = mc_search__hex_translate_to_regex (mc_search_cond->str);
 111     g_string_free (mc_search_cond->str, TRUE);
 112     mc_search_cond->str = tmp;
 113
 114     mc_search__cond_struct_new_init_regex (charset, lc_mc_search, mc_search_cond);
 115 }
 116
 117 /* --------------------------------------------------------------------------------------------- */
 118
 119 gboolean
 120 mc_search__run_hex (mc_search_t * lc_mc_search, const void *user_data,
 121                     gsize start_search, gsize end_search, gsize * found_len)
 122 {
 123     return mc_search__run_regex (lc_mc_search, user_data, start_search, end_search, found_len);
 124 }
 125
 126 /* --------------------------------------------------------------------------------------------- */
 127
 128 GString *
 129 mc_search_hex_prepare_replace_str (mc_search_t * lc_mc_search, GString * replace_str)
 130 {
 131     (void) lc_mc_search;
 132     return g_string_new_len (replace_str->str, replace_str->len);
 133 }
 134
 135 /* --------------------------------------------------------------------------------------------- */