Ticket #3890: syntax - add mjs extension to JavaScript pattern
[midnight-commander.git] / src / diffviewer / search.c
blobe7427df3467569cb47fb3e7824c7ab9e47f3f28d
1 /*
2 Search functions for diffviewer.
4 Copyright (C) 2010-2017
5 Free Software Foundation, Inc.
7 Written by:
8 Slava Zanko <slavazanko@gmail.com>, 2010.
9 Andrew Borodin <aborodin@vmail.ru>, 2012
11 This file is part of the Midnight Commander.
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.
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.
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/>.
27 #include <config.h>
29 #include <stdio.h>
31 #include "lib/global.h"
32 #include "lib/strutil.h"
33 #include "lib/tty/key.h"
34 #include "lib/widget.h"
35 #ifdef HAVE_CHARSET
36 #include "lib/charsets.h"
37 #endif
39 #include "src/history.h"
41 #include "internal.h"
43 /*** global variables ****************************************************************************/
45 /*** file scope macro definitions ****************************************************************/
47 /*** file scope type declarations ****************************************************************/
49 typedef struct mcdiffview_search_options_struct
51 mc_search_type_t type;
52 gboolean case_sens;
53 gboolean backwards;
54 gboolean whole_words;
55 gboolean all_codepages;
56 } mcdiffview_search_options_t;
58 /*** file scope variables ************************************************************************/
60 static mcdiffview_search_options_t mcdiffview_search_options = {
61 .type = MC_SEARCH_T_NORMAL,
62 .case_sens = FALSE,
63 .backwards = FALSE,
64 .whole_words = FALSE,
65 .all_codepages = FALSE,
68 /* --------------------------------------------------------------------------------------------- */
69 /*** file scope functions ************************************************************************/
70 /* --------------------------------------------------------------------------------------------- */
72 static gboolean
73 mcdiffview_dialog_search (WDiff * dview)
75 char *exp = NULL;
76 int qd_result;
77 size_t num_of_types = 0;
78 gchar **list_of_types;
80 list_of_types = mc_search_get_types_strings_array (&num_of_types);
83 quick_widget_t quick_widgets[] = {
84 /* *INDENT-OFF* */
85 QUICK_LABELED_INPUT (N_("Enter search string:"), input_label_above, INPUT_LAST_TEXT,
86 MC_HISTORY_SHARED_SEARCH, &exp, NULL, FALSE, FALSE, INPUT_COMPLETE_NONE),
87 QUICK_SEPARATOR (TRUE),
88 QUICK_START_COLUMNS,
89 QUICK_RADIO (num_of_types, (const char **) list_of_types,
90 (int *) &mcdiffview_search_options.type, NULL),
91 QUICK_NEXT_COLUMN,
92 QUICK_CHECKBOX (N_("Cas&e sensitive"), &mcdiffview_search_options.case_sens, NULL),
93 QUICK_CHECKBOX (N_("&Backwards"), &mcdiffview_search_options.backwards, NULL),
94 QUICK_CHECKBOX (N_("&Whole words"), &mcdiffview_search_options.whole_words, NULL),
95 #ifdef HAVE_CHARSET
96 QUICK_CHECKBOX (N_("&All charsets"), &mcdiffview_search_options.all_codepages, NULL),
97 #endif
98 QUICK_STOP_COLUMNS,
99 QUICK_BUTTONS_OK_CANCEL,
100 QUICK_END
101 /* *INDENT-ON* */
104 quick_dialog_t qdlg = {
105 -1, -1, 58,
106 N_("Search"), "[Input Line Keys]",
107 quick_widgets, NULL, NULL
110 qd_result = quick_dialog (&qdlg);
113 g_strfreev (list_of_types);
115 if ((qd_result == B_CANCEL) || (exp == NULL) || (exp[0] == '\0'))
117 g_free (exp);
118 return FALSE;
121 #ifdef HAVE_CHARSET
123 GString *tmp;
125 tmp = str_convert_to_input (exp);
126 if (tmp != NULL)
128 g_free (exp);
129 exp = g_string_free (tmp, FALSE);
132 #endif
134 g_free (dview->search.last_string);
135 dview->search.last_string = exp;
137 return TRUE;
140 /* --------------------------------------------------------------------------------------------- */
142 static gboolean
143 mcdiffview_do_search_backward (WDiff * dview)
145 ssize_t ind;
147 if (dview->search.last_accessed_num_line < 0)
149 dview->search.last_accessed_num_line = -1;
150 return FALSE;
153 if ((size_t) dview->search.last_accessed_num_line >= dview->a[dview->ord]->len)
154 dview->search.last_accessed_num_line = (ssize_t) dview->a[dview->ord]->len;
156 for (ind = --dview->search.last_accessed_num_line; ind >= 0; ind--)
158 DIFFLN *p;
160 p = (DIFFLN *) & g_array_index (dview->a[dview->ord], DIFFLN, (size_t) ind);
161 if (p->u.len == 0)
162 continue;
164 if (mc_search_run (dview->search.handle, p->p, 0, p->u.len, NULL))
166 dview->skip_rows = dview->search.last_found_line =
167 dview->search.last_accessed_num_line = ind;
168 return TRUE;
171 return FALSE;
174 /* --------------------------------------------------------------------------------------------- */
177 static gboolean
178 mcdiffview_do_search_forward (WDiff * dview)
180 size_t ind;
182 if (dview->search.last_accessed_num_line < 0)
183 dview->search.last_accessed_num_line = -1;
184 else if ((size_t) dview->search.last_accessed_num_line >= dview->a[dview->ord]->len)
186 dview->search.last_accessed_num_line = (ssize_t) dview->a[dview->ord]->len;
187 return FALSE;
190 for (ind = (size_t)++ dview->search.last_accessed_num_line; ind < dview->a[dview->ord]->len;
191 ind++)
193 DIFFLN *p;
195 p = (DIFFLN *) & g_array_index (dview->a[dview->ord], DIFFLN, ind);
196 if (p->u.len == 0)
197 continue;
199 if (mc_search_run (dview->search.handle, p->p, 0, p->u.len, NULL))
201 dview->skip_rows = dview->search.last_found_line =
202 dview->search.last_accessed_num_line = (ssize_t) ind;
203 return TRUE;
206 return FALSE;
209 /* --------------------------------------------------------------------------------------------- */
211 static void
212 mcdiffview_do_search (WDiff * dview)
214 gboolean present_result = FALSE;
216 tty_enable_interrupt_key ();
218 if (mcdiffview_search_options.backwards)
220 present_result = mcdiffview_do_search_backward (dview);
222 else
224 present_result = mcdiffview_do_search_forward (dview);
227 tty_disable_interrupt_key ();
229 if (!present_result)
231 dview->search.last_found_line = -1;
232 query_dialog (_("Search"), _(STR_E_NOTFOUND), D_NORMAL, 1, _("&Dismiss"));
236 /* --------------------------------------------------------------------------------------------- */
237 /*** public functions ****************************************************************************/
238 /* --------------------------------------------------------------------------------------------- */
240 void
241 dview_search_cmd (WDiff * dview)
243 if (dview->dsrc != DATA_SRC_MEM)
245 error_dialog (_("Search"), _("Search is disabled"));
246 return;
249 if (!mcdiffview_dialog_search (dview))
250 return;
252 mc_search_free (dview->search.handle);
253 #ifdef HAVE_CHARSET
254 dview->search.handle = mc_search_new (dview->search.last_string, cp_source);
255 #else
256 dview->search.handle = mc_search_new (dview->search.last_string, NULL);
257 #endif
259 if (dview->search.handle == NULL)
260 return;
262 dview->search.handle->search_type = mcdiffview_search_options.type;
263 #ifdef HAVE_CHARSET
264 dview->search.handle->is_all_charsets = mcdiffview_search_options.all_codepages;
265 #endif
266 dview->search.handle->is_case_sensitive = mcdiffview_search_options.case_sens;
267 dview->search.handle->whole_words = mcdiffview_search_options.whole_words;
269 mcdiffview_do_search (dview);
272 /* --------------------------------------------------------------------------------------------- */
274 void
275 dview_continue_search_cmd (WDiff * dview)
277 if (dview->dsrc != DATA_SRC_MEM)
278 error_dialog (_("Search"), _("Search is disabled"));
279 else if (dview->search.handle == NULL)
280 dview_search_cmd (dview);
281 else
282 mcdiffview_do_search (dview);
285 /* --------------------------------------------------------------------------------------------- */