src/viewer/search.c

   1 /*
   2    Internal file viewer for the Midnight Commander
   3    Function for search data
   4
   5    Copyright (C) 1994, 1995, 1996, 1998, 1999, 2000, 2001, 2002, 2003,
   6    2004, 2005, 2006, 2007, 2009 Free Software Foundation, Inc.
   7
   8    Written by: 1994, 1995, 1998 Miguel de Icaza
   9    1994, 1995 Janne Kukonlehto
  10    1995 Jakub Jelinek
  11    1996 Joseph M. Hinkle
  12    1997 Norbert Warmuth
  13    1998 Pavel Machek
  14    2004 Roland Illig <roland.illig@gmx.de>
  15    2005 Roland Illig <roland.illig@gmx.de>
  16    2009 Slava Zanko <slavazanko@google.com>
  17    2009 Andrew Borodin <aborodin@vmail.ru>
  18    2009 Ilia Maslakov <il.smind@gmail.com>
  19
  20    This file is part of the Midnight Commander.
  21
  22    The Midnight Commander is free software; you can redistribute it
  23    and/or modify it under the terms of the GNU General Public License as
  24    published by the Free Software Foundation; either version 2 of the
  25    License, or (at your option) any later version.
  26
  27    The Midnight Commander is distributed in the hope that it will be
  28    useful, but WITHOUT ANY WARRANTY; without even the implied warranty
  29    of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  30    General Public License for more details.
  31
  32    You should have received a copy of the GNU General Public License
  33    along with this program; if not, write to the Free Software
  34    Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
  35    MA 02110-1301, USA.
  36  */
  37
  38 #include <config.h>
  39
  40 #include "lib/global.h"
  41 #include "lib/tty/tty.h"
  42 #include "lib/widget.h"
  43
  44 #include "src/setup.h"
  45
  46 #include "internal.h"
  47
  48 /*** global variables ****************************************************************************/
  49
  50 /*** file scope macro definitions ****************************************************************/
  51
  52 /*** file scope type declarations ****************************************************************/
  53
  54 /*** file scope variables ************************************************************************/
  55
  56 static int search_cb_char_curr_index = -1;
  57 static char search_cb_char_buffer[6];
  58
  59 /*** file scope functions ************************************************************************/
  60 /* --------------------------------------------------------------------------------------------- */
  61
  62 static void
  63 mcview_search_update_steps (mcview_t * view)
  64 {
  65     off_t filesize = mcview_get_filesize (view);
  66     if (filesize != 0)
  67         view->update_steps = 40000;
  68     else                        /* viewing a data stream, not a file */
  69         view->update_steps = filesize / 100;
  70
  71     /* Do not update the percent display but every 20 ks */
  72     if (view->update_steps < 20000)
  73         view->update_steps = 20000;
  74 }
  75
  76 /* --------------------------------------------------------------------------------------------- */
  77
  78 static gboolean
  79 mcview_find (mcview_t * view, gsize search_start, gsize * len)
  80 {
  81     gsize search_end;
  82
  83     view->search_numNeedSkipChar = 0;
  84     search_cb_char_curr_index = -1;
  85
  86     if (mcview_search_options.backwards)
  87     {
  88         search_end = mcview_get_filesize (view);
  89         while ((int) search_start >= 0)
  90         {
  91             view->search_nroff_seq->index = search_start;
  92             mcview_nroff_seq_info (view->search_nroff_seq);
  93
  94             if (search_end > search_start + view->search->original_len
  95                 && mc_search_is_fixed_search_str (view->search))
  96                 search_end = search_start + view->search->original_len;
  97
  98             if (mc_search_run (view->search, (void *) view, search_start, search_end, len)
  99                 && view->search->normal_offset == (off_t) search_start)
 100                 return TRUE;
 101
 102             search_start--;
 103         }
 104         view->search->error_str = g_strdup (_("Search string not found"));
 105         return FALSE;
 106     }
 107     view->search_nroff_seq->index = search_start;
 108     mcview_nroff_seq_info (view->search_nroff_seq);
 109
 110     return mc_search_run (view->search, (void *) view, search_start, mcview_get_filesize (view),
 111                           len);
 112 }
 113
 114 /* --------------------------------------------------------------------------------------------- */
 115
 116 static void
 117 mcview_search_show_result (mcview_t * view, Dlg_head ** d, size_t match_len)
 118 {
 119     int nroff_len;
 120
 121     nroff_len =
 122         view->text_nroff_mode
 123         ? mcview__get_nroff_real_len (view, view->search->start_buffer,
 124                                       view->search->normal_offset - view->search->start_buffer) : 0;
 125     view->search_start = view->search->normal_offset + nroff_len;
 126
 127     if (!view->hex_mode)
 128         view->search_start++;
 129
 130     nroff_len =
 131         view->text_nroff_mode ? mcview__get_nroff_real_len (view, view->search_start - 1,
 132                                                             match_len) : 0;
 133     view->search_end = view->search_start + match_len + nroff_len;
 134
 135     if (view->hex_mode)
 136     {
 137         view->hex_cursor = view->search_start;
 138         view->hexedit_lownibble = FALSE;
 139         view->dpy_start = view->search_start - view->search_start % view->bytes_per_line;
 140         view->dpy_end = view->search_end - view->search_end % view->bytes_per_line;
 141     }
 142
 143     if (verbose)
 144     {
 145         dlg_run_done (*d);
 146         destroy_dlg (*d);
 147         *d = create_message (D_NORMAL, _("Search"), _("Seeking to search result"));
 148         tty_refresh ();
 149     }
 150     mcview_moveto_match (view);
 151
 152 }
 153
 154 /* --------------------------------------------------------------------------------------------- */
 155 /*** public functions ****************************************************************************/
 156 /* --------------------------------------------------------------------------------------------- */
 157
 158 int
 159 mcview_search_cmd_callback (const void *user_data, gsize char_offset)
 160 {
 161     int lc_byte;
 162     mcview_t *view = (mcview_t *) user_data;
 163
 164     /*    view_read_continue (view, &view->search_onechar_info); *//* AB:FIXME */
 165     if (!view->text_nroff_mode)
 166     {
 167         if (!mcview_get_byte (view, char_offset, &lc_byte))
 168             return MC_SEARCH_CB_OK;
 169
 170         return lc_byte;
 171     }
 172
 173     if (view->search_numNeedSkipChar != 0)
 174     {
 175         view->search_numNeedSkipChar--;
 176         return MC_SEARCH_CB_SKIP;
 177     }
 178
 179     if (search_cb_char_curr_index == -1
 180         || search_cb_char_curr_index >= view->search_nroff_seq->char_width)
 181     {
 182         if (search_cb_char_curr_index != -1)
 183             mcview_nroff_seq_next (view->search_nroff_seq);
 184
 185         search_cb_char_curr_index = 0;
 186         if (view->search_nroff_seq->char_width > 1)
 187             g_unichar_to_utf8 (view->search_nroff_seq->current_char, search_cb_char_buffer);
 188         else
 189             search_cb_char_buffer[0] = (char) view->search_nroff_seq->current_char;
 190
 191         if (view->search_nroff_seq->type != NROFF_TYPE_NONE)
 192         {
 193             switch (view->search_nroff_seq->type)
 194             {
 195             case NROFF_TYPE_BOLD:
 196                 view->search_numNeedSkipChar = 1 + view->search_nroff_seq->char_width;  /* real char width and 0x8 */
 197                 break;
 198             case NROFF_TYPE_UNDERLINE:
 199                 view->search_numNeedSkipChar = 2;       /* underline symbol and ox8 */
 200                 break;
 201             default:
 202                 break;
 203             }
 204         }
 205         return MC_SEARCH_CB_INVALID;
 206     }
 207
 208     lc_byte = search_cb_char_buffer[search_cb_char_curr_index];
 209     search_cb_char_curr_index++;
 210     return (lc_byte != -1) ? (unsigned char) lc_byte : MC_SEARCH_CB_INVALID;
 211
 212 }
 213
 214 /* --------------------------------------------------------------------------------------------- */
 215
 216 int
 217 mcview_search_update_cmd_callback (const void *user_data, gsize char_offset)
 218 {
 219     mcview_t *view = (mcview_t *) user_data;
 220
 221     if (char_offset >= (gsize) view->update_activate)
 222     {
 223         view->update_activate += view->update_steps;
 224         if (verbose)
 225         {
 226             mcview_percent (view, char_offset);
 227             tty_refresh ();
 228         }
 229         if (tty_got_interrupt ())
 230             return MC_SEARCH_CB_ABORT;
 231     }
 232     /* may be in future return from this callback will change current position
 233      * in searching block. Now this just constant return value.
 234      */
 235     return MC_SEARCH_CB_OK;
 236 }
 237
 238 /* --------------------------------------------------------------------------------------------- */
 239
 240 void
 241 mcview_do_search (mcview_t * view)
 242 {
 243     off_t search_start = 0;
 244     gboolean isFound = FALSE;
 245     gboolean need_search_again = TRUE;
 246
 247     Dlg_head *d = NULL;
 248
 249     size_t match_len;
 250
 251     if (verbose)
 252     {
 253         d = create_message (D_NORMAL, _("Search"), _("Searching %s"), view->last_search_string);
 254         tty_refresh ();
 255     }
 256
 257     /*for avoid infinite search loop we need to increase or decrease start offset of search */
 258
 259     if (view->search_start != 0)
 260     {
 261         if (!view->text_nroff_mode)
 262             search_start = view->search_start + (mcview_search_options.backwards ? -2 : 0);
 263         else
 264         {
 265             int nroff_real_len = mcview__get_nroff_real_len (view, view->search_start + 1, 2);
 266             search_start = mcview_search_options.backwards ? -2 : nroff_real_len != 0 ? 1 : 0;
 267             search_start += view->search_start + nroff_real_len * search_start;
 268         }
 269     }
 270
 271     if (mcview_search_options.backwards && (int) search_start < 0)
 272         search_start = 0;
 273
 274     /* Compute the percent steps */
 275     mcview_search_update_steps (view);
 276     view->update_activate = 0;
 277
 278     tty_enable_interrupt_key ();
 279
 280     do
 281     {
 282         off_t growbufsize;
 283
 284         if (view->growbuf_in_use)
 285             growbufsize = mcview_growbuf_filesize (view);
 286         else
 287             growbufsize = view->search->original_len;
 288
 289         if (mcview_find (view, search_start, &match_len))
 290         {
 291             mcview_search_show_result (view, &d, match_len);
 292             need_search_again = FALSE;
 293             isFound = TRUE;
 294             break;
 295         }
 296
 297         if (view->search->error_str == NULL)
 298             break;
 299
 300         search_start = growbufsize - view->search->original_len;
 301         if (search_start <= 0)
 302         {
 303             search_start = 0;
 304             break;
 305         }
 306     }
 307     while (mcview_may_still_grow (view));
 308
 309     if (view->search_start != 0 && !isFound && need_search_again
 310         && !mcview_search_options.backwards)
 311     {
 312         int result;
 313
 314         mcview_update (view);
 315
 316         result =
 317             query_dialog (_("Search done"), _("Continue from beginning?"), D_NORMAL, 2, _("&Yes"),
 318                           _("&No"));
 319
 320         if (result != 0)
 321             isFound = TRUE;
 322         else
 323             search_start = 0;
 324     }
 325
 326     if (!isFound && view->search->error_str != NULL && mcview_find (view, search_start, &match_len))
 327     {
 328         mcview_search_show_result (view, &d, match_len);
 329         isFound = TRUE;
 330     }
 331
 332     if (!isFound && view->search->error_str != NULL)
 333         message (D_NORMAL, _("Search"), "%s", view->search->error_str);
 334
 335     view->dirty++;
 336     mcview_update (view);
 337
 338     tty_disable_interrupt_key ();
 339     if (verbose)
 340     {
 341         dlg_run_done (d);
 342         destroy_dlg (d);
 343     }
 344 }
 345
 346 /* --------------------------------------------------------------------------------------------- */