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