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 "src/setup.h"
  42 #include "src/wtools.h"
  43 #include "lib/tty/tty.h"
  44 #include "internal.h"
  45
  46 /*** global variables ****************************************************************************/
  47
  48 /*** file scope macro definitions ****************************************************************/
  49
  50 /*** file scope type declarations ****************************************************************/
  51
  52 /*** file scope variables ************************************************************************/
  53
  54 /*** file scope functions ************************************************************************/
  55
  56
  57 /* --------------------------------------------------------------------------------------------- */
  58 static void
  59 mcview_search_update_steps (mcview_t * view)
  60 {
  61     off_t filesize = mcview_get_filesize (view);
  62     if (filesize != 0)
  63         view->update_steps = 40000;
  64     else                        /* viewing a data stream, not a file */
  65         view->update_steps = filesize / 100;
  66
  67     /* Do not update the percent display but every 20 ks */
  68     if (view->update_steps < 20000)
  69         view->update_steps = 20000;
  70 }
  71
  72 /* --------------------------------------------------------------------------------------------- */
  73
  74 static gboolean
  75 mcview_find (mcview_t * view, gsize search_start, gsize * len)
  76 {
  77     gsize search_end;
  78
  79     view->search_numNeedSkipChar = 0;
  80
  81     if (mcview_search_options.backwards) {
  82         search_end = mcview_get_filesize (view);
  83         while ((int) search_start >= 0) {
  84             view->search_nroff_seq->index = search_start;
  85             mcview_nroff_seq_info (view->search_nroff_seq);
  86
  87             if (search_end > search_start + view->search->original_len
  88                 && mc_search_is_fixed_search_str (view->search))
  89                 search_end = search_start + view->search->original_len;
  90
  91             if (mc_search_run (view->search, (void *) view, search_start, search_end, len)
  92                 && view->search->normal_offset == (off_t) search_start)
  93                 return TRUE;
  94
  95             search_start--;
  96         }
  97         view->search->error_str = g_strdup (_(" Search string not found "));
  98         return FALSE;
  99     }
 100     view->search_nroff_seq->index = search_start;
 101     mcview_nroff_seq_info (view->search_nroff_seq);
 102
 103     return mc_search_run (view->search, (void *) view, search_start, mcview_get_filesize (view),
 104                           len);
 105 }
 106
 107 /* --------------------------------------------------------------------------------------------- */
 108
 109 static void
 110 mcview_search_show_result(mcview_t * view, Dlg_head **d, size_t match_len)
 111 {
 112
 113         view->search_start = view->search->normal_offset +
 114                 mcview__get_nroff_real_len (view,
 115                                             view->search->start_buffer,
 116                                             view->search->normal_offset -
 117                                             view->search->start_buffer);
 118
 119         if (!view->hex_mode)
 120             view->search_start++;
 121
 122         view->search_end = view->search_start + match_len +
 123             mcview__get_nroff_real_len (view, view->search_start - 1, match_len);
 124
 125         if (view->hex_mode) {
 126             view->hex_cursor = view->search_start;
 127             view->hexedit_lownibble = FALSE;
 128             view->dpy_start = view->search_start - view->search_start % view->bytes_per_line;
 129             view->dpy_end = view->search_end - view->search_end % view->bytes_per_line;
 130         }
 131
 132         if (verbose) {
 133             dlg_run_done (*d);
 134             destroy_dlg (*d);
 135             *d = create_message (D_NORMAL, _("Search"), _("Seeking to search result"));
 136             tty_refresh ();
 137         }
 138         mcview_moveto_match (view);
 139
 140 }
 141
 142 /* --------------------------------------------------------------------------------------------- */
 143
 144 /*** public functions ****************************************************************************/
 145
 146 /* --------------------------------------------------------------------------------------------- */
 147
 148 int
 149 mcview_search_cmd_callback (const void *user_data, gsize char_offset)
 150 {
 151     int lc_byte;
 152     mcview_t *view = (mcview_t *) user_data;
 153
 154     /*    view_read_continue (view, &view->search_onechar_info); *//* AB:FIXME */
 155     if (!view->text_nroff_mode) {
 156         if (! mcview_get_byte (view, char_offset, &lc_byte))
 157             return MC_SEARCH_CB_INVALID;
 158
 159         return lc_byte;
 160     }
 161
 162     if (view->search_numNeedSkipChar) {
 163         view->search_numNeedSkipChar--;
 164         return MC_SEARCH_CB_SKIP;
 165     }
 166
 167     lc_byte = view->search_nroff_seq->current_char;
 168
 169     if (lc_byte == -1)
 170         return MC_SEARCH_CB_INVALID;
 171
 172     mcview_nroff_seq_next (view->search_nroff_seq);
 173
 174     if (view->search_nroff_seq->type != NROFF_TYPE_NONE)
 175         view->search_numNeedSkipChar = 2;
 176
 177     return lc_byte;
 178 }
 179
 180 /* --------------------------------------------------------------------------------------------- */
 181
 182 int
 183 mcview_search_update_cmd_callback (const void *user_data, gsize char_offset)
 184 {
 185     mcview_t *view = (mcview_t *) user_data;
 186
 187     if (char_offset >= (gsize) view->update_activate) {
 188         view->update_activate += view->update_steps;
 189         if (verbose) {
 190             mcview_percent (view, char_offset);
 191             tty_refresh ();
 192         }
 193         if (tty_got_interrupt ())
 194             return MC_SEARCH_CB_ABORT;
 195     }
 196     /* may be in future return from this callback will change current position
 197      * in searching block. Now this just constant return value.
 198      */
 199     return MC_SEARCH_CB_OK;
 200 }
 201
 202 /* --------------------------------------------------------------------------------------------- */
 203
 204 void
 205 mcview_do_search (mcview_t * view)
 206 {
 207     off_t search_start, growbufsize;
 208     gboolean isFound = FALSE;
 209     gboolean need_search_again = TRUE;
 210
 211     Dlg_head *d = NULL;
 212
 213     size_t match_len;
 214
 215     if (verbose) {
 216         d = create_message (D_NORMAL, _("Search"), _("Searching %s"), view->last_search_string);
 217         tty_refresh ();
 218     }
 219
 220     /*for avoid infinite search loop we need to increase or decrease start offset of search */
 221
 222     if (view->search_start) {
 223         search_start = (mcview_search_options.backwards) ? -2 : 2;
 224         search_start = view->search_start + search_start +
 225             mcview__get_nroff_real_len (view, view->search_start, 2) * search_start;
 226     } else {
 227         search_start = view->search_start;
 228     }
 229
 230     if (mcview_search_options.backwards && (int) search_start < 0)
 231         search_start = 0;
 232
 233     /* Compute the percent steps */
 234     mcview_search_update_steps (view);
 235     view->update_activate = 0;
 236
 237     tty_enable_interrupt_key ();
 238
 239     do {
 240         if (view->growbuf_in_use)
 241             growbufsize = mcview_growbuf_filesize (view);
 242         else
 243             growbufsize = view->search->original_len;
 244
 245         if (! mcview_find (view, search_start, &match_len)) {
 246
 247             if (view->search->error_str == NULL)
 248                 break;
 249
 250             search_start = growbufsize - view->search->original_len;
 251             if ( search_start <= 0 ) {
 252                 search_start = 0;
 253                 break;
 254             }
 255
 256             continue;
 257         }
 258
 259         mcview_search_show_result(view, &d, match_len);
 260         need_search_again = FALSE;
 261         isFound = TRUE;
 262         break;
 263     } while (mcview_may_still_grow (view));
 264
 265     if (!isFound && need_search_again && !mcview_search_options.backwards) {
 266         int result;
 267         mcview_update (view);
 268
 269         result =
 270             query_dialog (_("Search done"), _("Continue from begining?"), D_NORMAL, 2, _("&Yes"), _("&No"));
 271
 272         if (result != 0) {
 273             isFound=TRUE;
 274         } else {
 275             search_start = 0;
 276         }
 277     }
 278
 279     if (!isFound && view->search->error_str != NULL && mcview_find (view, search_start, &match_len)) {
 280         mcview_search_show_result(view, &d, match_len);
 281         isFound = TRUE;
 282     }
 283
 284     if (!isFound) {
 285         if (view->search->error_str)
 286             message (D_NORMAL, _("Search"), "%s", view->search->error_str);
 287     }
 288
 289     view->dirty++;
 290     mcview_update (view);
 291
 292     tty_disable_interrupt_key ();
 293     if (verbose) {
 294         dlg_run_done (d);
 295         destroy_dlg (d);
 296     }
 297
 298 }
 299
 300 /* --------------------------------------------------------------------------------------------- */