X-Git-Url: https://git.lyx.org/gitweb/?a=blobdiff_plain;f=src%2Flyxfind.cpp;h=409a2e2cf7f2a1bf8d24fbf5725d111dd2311a0a;hb=d866717ef7503a1373dd1cb3925e1ac97b079192;hp=9b9b855d349c4ee7ba1071aedc81d273542bb672;hpb=fd6679bd345da445495ccb430d8d93cb90faf10c;p=lyx.git

diff --git a/src/lyxfind.cpp b/src/lyxfind.cpp
index 9b9b855d34..409a2e2cf7 100644
--- a/src/lyxfind.cpp
+++ b/src/lyxfind.cpp
@@ -18,34 +18,37 @@
 
 #include "Buffer.h"
 #include "buffer_funcs.h"
+#include "BufferList.h"
 #include "BufferParams.h"
 #include "BufferView.h"
 #include "Changes.h"
 #include "Cursor.h"
 #include "CutAndPaste.h"
 #include "FuncRequest.h"
-#include "OutputParams.h"
+#include "LyX.h"
 #include "output_latex.h"
+#include "OutputParams.h"
 #include "Paragraph.h"
 #include "ParIterator.h"
 #include "TexRow.h"
 #include "Text.h"
 
+#include "frontends/Application.h"
+#include "frontends/alert.h"
+
 #include "mathed/InsetMath.h"
 #include "mathed/InsetMathGrid.h"
 #include "mathed/InsetMathHull.h"
 #include "mathed/MathStream.h"
 
-#include "frontends/alert.h"
-
 #include "support/convert.h"
 #include "support/debug.h"
 #include "support/docstream.h"
 #include "support/gettext.h"
-#include "support/lstrings.h"
 #include "support/lassert.h"
+#include "support/lstrings.h"
 
-#include <boost/regex.hpp>
+#include "support/regex.h"
 #include <boost/next_prior.hpp>
 
 using namespace std;
@@ -65,64 +68,76 @@ bool parse_bool(docstring & howto)
 }
 
 
-class MatchString : public binary_function<Paragraph, pos_type, bool>
+class MatchString : public binary_function<Paragraph, pos_type, int>
 {
 public:
 	MatchString(docstring const & str, bool cs, bool mw)
-		: str(str), cs(cs), mw(mw)
+		: str(str), case_sens(cs), whole_words(mw)
 	{}
 
 	// returns true if the specified string is at the specified position
 	// del specifies whether deleted strings in ct mode will be considered
-	bool operator()(Paragraph const & par, pos_type pos, bool del = true) const
+	int operator()(Paragraph const & par, pos_type pos, bool del = true) const
 	{
-		return par.find(str, cs, mw, pos, del);
+		return par.find(str, case_sens, whole_words, pos, del);
 	}
 
 private:
 	// search string
 	docstring str;
 	// case sensitive
-	bool cs;
+	bool case_sens;
 	// match whole words only
-	bool mw;
+	bool whole_words;
 };
 
 
-bool findForward(DocIterator & cur, MatchString const & match,
+int findForward(DocIterator & cur, MatchString const & match,
 		 bool find_del = true)
 {
 	for (; cur; cur.forwardChar())
-		if (cur.inTexted() &&
-		    match(cur.paragraph(), cur.pos(), find_del))
-			return true;
-	return false;
+		if (cur.inTexted()) {
+			int len = match(cur.paragraph(), cur.pos(), find_del);
+			if (len > 0)
+				return len;
+		}
+	return 0;
 }
 
 
-bool findBackwards(DocIterator & cur, MatchString const & match,
+int findBackwards(DocIterator & cur, MatchString const & match,
 		 bool find_del = true)
 {
 	while (cur) {
 		cur.backwardChar();
-		if (cur.inTexted() &&
-		    match(cur.paragraph(), cur.pos(), find_del))
-			return true;
+		if (cur.inTexted()) {
+			int len = match(cur.paragraph(), cur.pos(), find_del);
+			if (len > 0)
+				return len;
+		}
 	}
-	return false;
+	return 0;
 }
 
 
-bool findChange(DocIterator & cur)
+bool findChange(DocIterator & cur, bool next)
 {
-	for (; cur; cur.forwardPos())
-		if (cur.inTexted() && !cur.paragraph().isUnchanged(cur.pos()))
+	if (!next)
+		cur.backwardPos();
+	for (; cur; next ? cur.forwardPos() : cur.backwardPos())
+		if (cur.inTexted() && cur.paragraph().isChanged(cur.pos())) {
+			if (!next)
+				// if we search backwards, take a step forward
+				// to correctly set the anchor
+				cur.forwardPos();
 			return true;
+		}
+
 	return false;
 }
 
 
-bool searchAllowed(BufferView * /*bv*/, docstring const & str)
+bool searchAllowed(docstring const & str)
 {
 	if (str.empty()) {
 		frontend::Alert::error(_("Search error"), _("Search string is empty"));
@@ -132,36 +147,38 @@ bool searchAllowed(BufferView * /*bv*/, docstring const & str)
 }
 
 
-bool find(BufferView * bv, docstring const & searchstr,
-	bool cs, bool mw, bool fw, bool find_del = true)
+bool findOne(BufferView * bv, docstring const & searchstr,
+	bool case_sens, bool whole, bool forward, bool find_del = true)
 {
-	if (!searchAllowed(bv, searchstr))
+	if (!searchAllowed(searchstr))
 		return false;
 
 	DocIterator cur = bv->cursor();
 
-	MatchString const match(searchstr, cs, mw);
+	MatchString const match(searchstr, case_sens, whole);
 
-	bool found = fw ? findForward(cur, match, find_del) :
+	int match_len = forward ? findForward(cur, match, find_del) :
 			  findBackwards(cur, match, find_del);
 
-	if (found)
-		bv->putSelectionAt(cur, searchstr.length(), !fw);
+	if (match_len > 0)
+		bv->putSelectionAt(cur, match_len, !forward);
 
-	return found;
+	return match_len > 0;
 }
 
 
 int replaceAll(BufferView * bv,
 	       docstring const & searchstr, docstring const & replacestr,
-	       bool cs, bool mw)
+	       bool case_sens, bool whole)
 {
 	Buffer & buf = bv->buffer();
 
-	if (!searchAllowed(bv, searchstr) || buf.isReadonly())
+	if (!searchAllowed(searchstr) || buf.isReadonly())
 		return 0;
 
-	MatchString const match(searchstr, cs, mw);
+	DocIterator cur_orig(bv->cursor());
+
+	MatchString const match(searchstr, case_sens, whole);
 	int num = 0;
 
 	int const rsize = replacestr.size();
@@ -169,12 +186,13 @@ int replaceAll(BufferView * bv,
 
 	Cursor cur(*bv);
 	cur.setCursor(doc_iterator_begin(&buf));
-	while (findForward(cur, match, false)) {
+	int match_len = findForward(cur, match, false);
+	while (match_len > 0) {
 		// Backup current cursor position and font.
 		pos_type const pos = cur.pos();
 		Font const font = cur.paragraph().getFontSettings(buf.params(), pos);
 		cur.recordUndo();
-		int striked = ssize - cur.paragraph().eraseChars(pos, pos + ssize,
+		int striked = ssize - cur.paragraph().eraseChars(pos, pos + match_len,
 							    buf.params().trackChanges);
 		cur.paragraph().insert(pos, replacestr, font,
 				       Change(buf.params().trackChanges ?
@@ -182,49 +200,87 @@ int replaceAll(BufferView * bv,
 		for (int i = 0; i < rsize + striked; ++i)
 			cur.forwardChar();
 		++num;
+		match_len = findForward(cur, match, false);
 	}
 
-	buf.updateLabels();
 	bv->putSelectionAt(doc_iterator_begin(&buf), 0, false);
-	if (num)
-		buf.markDirty();
-	return num;
-}
 
+	cur_orig.fixIfBroken();
+	bv->setCursor(cur_orig);
 
-bool stringSelected(BufferView * bv, docstring const & searchstr,
-		    bool cs, bool mw, bool fw)
-{
-	// if nothing selected or selection does not equal search
-	// string search and select next occurance and return
-	docstring const & str1 = searchstr;
-	docstring const str2 = bv->cursor().selectionAsString(false);
-	if ((cs && str1 != str2) || compare_no_case(str1, str2) != 0) {
-		find(bv, searchstr, cs, mw, fw);
-		return false;
-	}
-
-	return true;
+	return num;
 }
 
 
-int replace(BufferView * bv, docstring const & searchstr,
-	    docstring const & replacestr, bool cs, bool mw, bool fw)
+// the idea here is that we are going to replace the string that
+// is selected IF it is the search string. 
+// if there is a selection, but it is not the search string, then
+// we basically ignore it. (FIXME We ought to replace only within
+// the selection.)
+// if there is no selection, then:
+//  (i) if some search string has been provided, then we find it.
+//      (think of how the dialog works when you hit "replace" the
+//      first time.) 
+// (ii) if no search string has been provided, then we treat the
+//      word the cursor is in as the search string. (why? i have no
+//      idea.) but this only works in text?
+//
+// returns the number of replacements made (one, if any) and 
+// whether anything at all was done.
+pair<bool, int> replaceOne(BufferView * bv, docstring searchstr,
+	    docstring const & replacestr, bool case_sens, 
+			bool whole, bool forward)
 {
-	if (!searchAllowed(bv, searchstr) || bv->buffer().isReadonly())
-		return 0;
+	Cursor & cur = bv->cursor();
+	if (!cur.selection()) {
+		// no selection, non-empty search string: find it
+		if (!searchstr.empty()) {
+			findOne(bv, searchstr, case_sens, whole, forward);
+			return pair<bool, int>(true, 0);
+		}
+		// empty search string
+		if (!cur.inTexted())
+			// bail in math
+			return pair<bool, int>(false, 0);
+		// select current word and treat it as the search string
+		cur.innerText()->selectWord(cur, WHOLE_WORD);
+		searchstr = cur.selectionAsString(false);
+	}
+	
+	// if we still don't have a search string, report the error
+	// and abort.
+	if (!searchAllowed(searchstr))
+		return pair<bool, int>(false, 0);
+	
+	bool have_selection = cur.selection();
+	docstring const selected = cur.selectionAsString(false);
+	bool match = 
+		case_sens ? searchstr == selected
+	            : compare_no_case(searchstr, selected) == 0;
+
+	// no selection or current selection is not search word:
+	// just find the search word
+	if (!have_selection || !match) {
+		findOne(bv, searchstr, case_sens, whole, forward);
+		return pair<bool, int>(true, 0);
+	}
 
-	if (!stringSelected(bv, searchstr, cs, mw, fw))
-		return 0;
+	// we're now actually ready to replace. if the buffer is
+	// read-only, we can't, though.
+	if (bv->buffer().isReadonly())
+		return pair<bool, int>(false, 0);
 
-	Cursor & cur = bv->cursor();
-	cap::replaceSelectionWithString(cur, replacestr, fw);
-	bv->buffer().markDirty();
-	find(bv, searchstr, cs, mw, fw, false);
-	bv->buffer().updateMacros();
-	bv->processUpdateFlags(Update::Force | Update::FitCursor);
+	cap::replaceSelectionWithString(cur, replacestr, forward);
+	if (forward) {
+		cur.pos() += replacestr.length();
+		LASSERT(cur.pos() <= cur.lastpos(), /* */);
+	} else {
+		cur.pos() -= replacestr.length();
+		LASSERT(cur.pos() >= 0, /* */);
+	}
+	findOne(bv, searchstr, case_sens, whole, forward, false);
 
-	return 1;
+	return pair<bool, int>(true, 1);
 }
 
 } // namespace anon
@@ -242,13 +298,13 @@ docstring const find2string(docstring const & search,
 }
 
 
-docstring const replace2string(docstring const & search, docstring const & replace,
-			    bool casesensitive, bool matchword,
-			    bool all, bool forward)
+docstring const replace2string(docstring const & replace,
+	docstring const & search, bool casesensitive, bool matchword,
+	bool all, bool forward)
 {
 	odocstringstream ss;
-	ss << search << '\n'
-	   << replace << '\n'
+	ss << replace << '\n'
+	   << search << '\n'
 	   << int(casesensitive) << ' '
 	   << int(matchword) << ' '
 	   << int(all) << ' '
@@ -257,9 +313,9 @@ docstring const replace2string(docstring const & search, docstring const & repla
 }
 
 
-bool find(BufferView * bv, FuncRequest const & ev)
+bool lyxfind(BufferView * bv, FuncRequest const & ev)
 {
-	if (!bv || ev.action != LFUN_WORD_FIND)
+	if (!bv || ev.action() != LFUN_WORD_FIND)
 		return false;
 
 	//lyxerr << "find called, cmd: " << ev << endl;
@@ -274,14 +330,15 @@ bool find(BufferView * bv, FuncRequest const & ev)
 	bool matchword     = parse_bool(howto);
 	bool forward       = parse_bool(howto);
 
-	return find(bv, search, casesensitive, matchword, forward);
+	return findOne(bv, search, casesensitive, matchword, forward);
 }
 
 
-void replace(BufferView * bv, FuncRequest const & ev, bool has_deleted)
+bool lyxreplace(BufferView * bv, 
+		FuncRequest const & ev, bool has_deleted)
 {
-	if (!bv || ev.action != LFUN_WORD_REPLACE)
-		return;
+	if (!bv || ev.action() != LFUN_WORD_REPLACE)
+		return false;
 
 	// data is of the form
 	// "<search>
@@ -289,68 +346,138 @@ void replace(BufferView * bv, FuncRequest const & ev, bool has_deleted)
 	//  <casesensitive> <matchword> <all> <forward>"
 	docstring search;
 	docstring rplc;
-	docstring howto = split(ev.argument(), search, '\n');
-	howto = split(howto, rplc, '\n');
+	docstring howto = split(ev.argument(), rplc, '\n');
+	howto = split(howto, search, '\n');
 
 	bool casesensitive = parse_bool(howto);
 	bool matchword     = parse_bool(howto);
 	bool all           = parse_bool(howto);
 	bool forward       = parse_bool(howto);
 
+	int replace_count = 0;
+	bool update = false;
+
 	if (!has_deleted) {
-		int const replace_count = all
-			? replaceAll(bv, search, rplc, casesensitive, matchword)
-			: replace(bv, search, rplc, casesensitive, matchword, forward);
-	
-		Buffer & buf = bv->buffer();
-		if (replace_count == 0) {
+		if (all) {
+			replace_count = replaceAll(bv, search, rplc, casesensitive, matchword);
+			update = replace_count > 0;
+		} else {
+			pair<bool, int> rv = 
+				replaceOne(bv, search, rplc, casesensitive, matchword, forward);
+			update = rv.first;
+			replace_count = rv.second;
+		}
+
+		Buffer const & buf = bv->buffer();
+		if (!update) {
 			// emit message signal.
 			buf.message(_("String not found!"));
 		} else {
-			if (replace_count == 1) {
-				// emit message signal.
+			if (replace_count == 0) {
+				buf.message(_("String found."));
+			} else if (replace_count == 1) {
 				buf.message(_("String has been replaced."));
 			} else {
-				docstring str = convert<docstring>(replace_count);
-				str += _(" strings have been replaced.");
-				// emit message signal.
+				docstring const str = 
+					bformat(_("%1$d strings have been replaced."), replace_count);
 				buf.message(str);
 			}
 		}
 	} else {
 		// if we have deleted characters, we do not replace at all, but
 		// rather search for the next occurence
-		if (find(bv, search, casesensitive, matchword, forward))
-			bv->showCursor();
+		if (findOne(bv, search, casesensitive, matchword, forward))
+			update = true;
 		else
 			bv->message(_("String not found!"));
 	}
+	return update;
 }
 
 
 bool findNextChange(BufferView * bv)
 {
+	return findChange(bv, true);
+}
+
+
+bool findPreviousChange(BufferView * bv)
+{
+	return findChange(bv, false);
+}
+
+
+bool findChange(BufferView * bv, bool next)
+{
+	if (bv->cursor().selection()) {
+		// set the cursor at the beginning or at the end of the selection
+		// before searching. Otherwise, the current change will be found.
+		if (next != (bv->cursor().top() > bv->cursor().normalAnchor()))
+			bv->cursor().setCursorToAnchor();
+	}
+
 	DocIterator cur = bv->cursor();
 
-	if (!findChange(cur))
+	// Are we within a change ? Then first search forward (backward),
+	// clear the selection and search the other way around (see the end
+	// of this function). This will avoid changes to be selected half.
+	bool search_both_sides = false;
+	DocIterator tmpcur = cur;
+	// Leave math first
+	while (tmpcur.inMathed())
+		tmpcur.pop_back();
+	Change change_next_pos
+		= tmpcur.paragraph().lookupChange(tmpcur.pos());
+	if (change_next_pos.changed() && cur.inMathed()) {
+		cur = tmpcur;
+		search_both_sides = true;
+	} else if (tmpcur.pos() > 0 && tmpcur.inTexted()) {
+		Change change_prev_pos
+			= tmpcur.paragraph().lookupChange(tmpcur.pos() - 1);
+		if (change_next_pos.isSimilarTo(change_prev_pos))
+			search_both_sides = true;
+	}
+
+	if (!findChange(cur, next))
 		return false;
 
 	bv->cursor().setCursor(cur);
 	bv->cursor().resetAnchor();
 
+	if (!next)
+		// take a step into the change
+		cur.backwardPos();
+
 	Change orig_change = cur.paragraph().lookupChange(cur.pos());
 
 	CursorSlice & tip = cur.top();
-	for (; !tip.at_end(); tip.forwardPos()) {
-		Change change = tip.paragraph().lookupChange(tip.pos());
-		if (change != orig_change)
-			break;
+	if (next) {
+		for (; !tip.at_end(); tip.forwardPos()) {
+			Change change = tip.paragraph().lookupChange(tip.pos());
+			if (!change.isSimilarTo(orig_change))
+				break;
+		}
+	} else {
+		for (; !tip.at_begin();) {
+			tip.backwardPos();
+			Change change = tip.paragraph().lookupChange(tip.pos());
+			if (!change.isSimilarTo(orig_change)) {
+				// take a step forward to correctly set the selection
+				tip.forwardPos();
+				break;
+			}
+		}
 	}
 
 	// Now put cursor to end of selection:
 	bv->cursor().setCursor(cur);
 	bv->cursor().setSelection();
 
+	if (search_both_sides) {
+		bv->cursor().setSelection(false);
+		findChange(bv, !next);
+	}
+
 	return true;
 }
 
@@ -399,19 +526,19 @@ Escapes const & get_lyx_unescapes() {
  **/
 string apply_escapes(string s, Escapes const & escape_map)
 {
-	LYXERR(Debug::DEBUG, "Escaping: '" << s << "'");
+	LYXERR(Debug::FIND, "Escaping: '" << s << "'");
 	Escapes::const_iterator it;
 	for (it = escape_map.begin(); it != escape_map.end(); ++it) {
-//		LYXERR(Debug::DEBUG, "Escaping " << it->first << " as " << it->second);
+//		LYXERR(Debug::FIND, "Escaping " << it->first << " as " << it->second);
 		unsigned int pos = 0;
 		while (pos < s.length() && (pos = s.find(it->first, pos)) < s.length()) {
 			s.replace(pos, it->first.length(), it->second);
-//			LYXERR(Debug::DEBUG, "After escape: " << s);
+//			LYXERR(Debug::FIND, "After escape: " << s);
 			pos += it->second.length();
-//			LYXERR(Debug::DEBUG, "pos: " << pos);
+//			LYXERR(Debug::FIND, "pos: " << pos);
 		}
 	}
-	LYXERR(Debug::DEBUG, "Escaped : '" << s << "'");
+	LYXERR(Debug::FIND, "Escaped : '" << s << "'");
 	return s;
 }
 
@@ -436,50 +563,51 @@ size_t find_matching_brace(string const & s, size_t pos)
 	return s.size();
 }
 
-/// Within \regex{} apply get_regex_escapes(), while outside apply get_lyx_unescapes().
+/// Within \regexp{} apply get_regex_escapes(), while outside apply get_lyx_unescapes().
 string escape_for_regex(string s)
 {
 	size_t pos = 0;
 	while (pos < s.size()) {
-			size_t new_pos = s.find("\\regexp{", pos);
-			if (new_pos == string::npos)
-					new_pos = s.size();
-			LYXERR(Debug::DEBUG, "new_pos: " << new_pos);
-			string t = apply_escapes(s.substr(pos, new_pos - pos), get_lyx_unescapes());
-			LYXERR(Debug::DEBUG, "t      : " << t);
-			t = apply_escapes(t, get_regexp_escapes());
-			s.replace(pos, new_pos - pos, t);
-			new_pos = pos + t.size();
-			LYXERR(Debug::DEBUG, "Regexp after escaping: " << s);
-			LYXERR(Debug::DEBUG, "new_pos: " << new_pos);
-			if (new_pos == s.size())
-					break;
-			size_t end_pos = find_matching_brace(s, new_pos + 7);
-			LYXERR(Debug::DEBUG, "end_pos: " << end_pos);
-			t = apply_escapes(s.substr(new_pos + 8, end_pos - (new_pos + 8)), get_lyx_unescapes());
-			LYXERR(Debug::DEBUG, "t      : " << t);
-			if (end_pos == s.size()) {
-					s.replace(new_pos, end_pos - new_pos, t);
-					pos = s.size();
-					LYXERR(Debug::DEBUG, "Regexp after \\regexp{} removal: " << s);
-					break;
-			}
-			s.replace(new_pos, end_pos + 1 - new_pos, t);
-			LYXERR(Debug::DEBUG, "Regexp after \\regexp{} removal: " << s);
-			pos = new_pos + t.size();
-			LYXERR(Debug::DEBUG, "pos: " << pos);
+		size_t new_pos = s.find("\\regexp{{{", pos);
+		if (new_pos == string::npos)
+			new_pos = s.size();
+		LYXERR(Debug::FIND, "new_pos: " << new_pos);
+		string t = apply_escapes(s.substr(pos, new_pos - pos), get_lyx_unescapes());
+		LYXERR(Debug::FIND, "t      : " << t);
+		t = apply_escapes(t, get_regexp_escapes());
+		LYXERR(Debug::FIND, "t      : " << t);
+		s.replace(pos, new_pos - pos, t);
+		new_pos = pos + t.size();
+		LYXERR(Debug::FIND, "Regexp after escaping: " << s);
+		LYXERR(Debug::FIND, "new_pos: " << new_pos);
+		if (new_pos == s.size())
+			break;
+		size_t end_pos = s.find("}}}", new_pos + 10); // find_matching_brace(s, new_pos + 7);
+		LYXERR(Debug::FIND, "end_pos: " << end_pos);
+		t = apply_escapes(s.substr(new_pos + 10, end_pos - (new_pos + 10)), get_lyx_unescapes());
+		LYXERR(Debug::FIND, "t      : " << t);
+		if (end_pos == s.size()) {
+			s.replace(new_pos, end_pos - new_pos, t);
+			pos = s.size();
+			LYXERR(Debug::FIND, "Regexp after \\regexp{} removal: " << s);
+			break;
+		}
+		s.replace(new_pos, end_pos + 3 - new_pos, t);
+		LYXERR(Debug::FIND, "Regexp after \\regexp{} removal: " << s);
+		pos = new_pos + t.size();
+		LYXERR(Debug::FIND, "pos: " << pos);
 	}
 	return s;
 }
 
-/// Wrapper for boost::regex_replace with simpler interface
+/// Wrapper for lyx::regex_replace with simpler interface
 bool regex_replace(string const & s, string & t, string const & searchstr,
 	string const & replacestr)
 {
-	boost::regex e(searchstr);
+	lyx::regex e(searchstr);
 	ostringstream oss;
 	ostream_iterator<char, char> it(oss);
-	boost::regex_replace(it, s.begin(), s.end(), e, replacestr);
+	lyx::regex_replace(it, s.begin(), s.end(), e, replacestr);
 	// tolerate t and s be references to the same variable
 	bool rv = (s != oss.str());
 	t = oss.str();
@@ -495,11 +623,12 @@ bool regex_replace(string const & s, string & t, string const & searchstr,
  ** Number of open braces that must remain open at the end for the verification to succeed.
  **/
 bool braces_match(string::const_iterator const & beg,
-	string::const_iterator const & end, int unmatched = 0)
+		  string::const_iterator const & end,
+		  int unmatched = 0)
 {
 	int open_pars = 0;
 	string::const_iterator it = beg;
-	LYXERR(Debug::DEBUG, "Checking " << unmatched << " unmatched braces in '" << string(beg, end) << "'");
+	LYXERR(Debug::FIND, "Checking " << unmatched << " unmatched braces in '" << string(beg, end) << "'");
 	for (; it != end; ++it) {
 		// Skip escaped braces in the count
 		if (*it == '\\') {
@@ -510,28 +639,27 @@ bool braces_match(string::const_iterator const & beg,
 			++open_pars;
 		} else if (*it == '}') {
 			if (open_pars == 0) {
-				LYXERR(Debug::DEBUG, "Found unmatched closed brace");
+				LYXERR(Debug::FIND, "Found unmatched closed brace");
 				return false;
 			} else
 				--open_pars;
 		}
 	}
 	if (open_pars != unmatched) {
-	  LYXERR(Debug::DEBUG, "Found " << open_pars << " instead of " << unmatched << " unmatched open braces at the end of count");
+	  LYXERR(Debug::FIND, "Found " << open_pars 
+		 << " instead of " << unmatched 
+		 << " unmatched open braces at the end of count");
 			return false;
 	}
-	LYXERR(Debug::DEBUG, "Braces match as expected");
+	LYXERR(Debug::FIND, "Braces match as expected");
 	return true;
 }
 
 /** The class performing a match between a position in the document and the FindAdvOptions.
- **
- ** @todo The user-entered regexp expression(s) should be enclosed within something like \regexp{},
- **       to be written by a dedicated Inset, so to avoid escaping it in escape_for_regex().
  **/
 class MatchStringAdv {
 public:
-	MatchStringAdv(lyx::Buffer const & buf, FindAdvOptions const & opt);
+	MatchStringAdv(lyx::Buffer & buf, FindAndReplaceOptions const & opt);
 
 	/** Tests if text starting at the supplied position matches with the one provided to the MatchStringAdv
 	 ** constructor as opt.search, under the opt.* options settings.
@@ -539,7 +667,7 @@ public:
 	 ** @param at_begin
 	 ** 	If set, then match is searched only against beginning of text starting at cur.
 	 ** 	If unset, then match is searched anywhere in text starting at cur.
-	 ** 
+	 **
 	 ** @return
 	 ** The length of the matching text, or zero if no match was found.
 	 **/
@@ -547,11 +675,16 @@ public:
 
 public:
 	/// buffer
-	lyx::Buffer const & buf;
+	lyx::Buffer * p_buf;
+	/// first buffer on which search was started
+	lyx::Buffer * const p_first_buf;
 	/// options
-	FindAdvOptions const & opt;
+	FindAndReplaceOptions const & opt;
 
 private:
+	/// Auxiliary find method (does not account for opt.matchword)
+	int findAux(DocIterator const & cur, int len = -1, bool at_begin = true) const;
+
 	/** Normalize a stringified or latexified LyX paragraph.
 	 **
 	 ** Normalize means:
@@ -569,28 +702,92 @@ private:
 	// normalized string to search
 	string par_as_string;
 	// regular expression to use for searching
-	boost::regex regexp;
+	lyx::regex regexp;
 	// same as regexp, but prefixed with a ".*"
-	boost::regex regexp2;
+	lyx::regex regexp2;
 	// unmatched open braces in the search string/regexp
 	int open_braces;
 	// number of (.*?) subexpressions added at end of search regexp for closing
 	// environments, math mode, styles, etc...
 	int close_wildcards;
+	// Are we searching with regular expressions ?
+	bool use_regexp;
 };
 
 
-MatchStringAdv::MatchStringAdv(lyx::Buffer const & buf, FindAdvOptions const & opt)
-  : buf(buf), opt(opt)
+static docstring buffer_to_latex(Buffer & buffer) 
 {
-	par_as_string = normalize(opt.search);
+	OutputParams runparams(&buffer.params().encoding());
+	TexRow texrow;
+	odocstringstream ods;
+	otexstream os(ods, texrow);
+	runparams.nice = true;
+	runparams.flavor = OutputParams::LATEX;
+	runparams.linelen = 80; //lyxrc.plaintext_linelen;
+	// No side effect of file copying and image conversion
+	runparams.dryrun = true;
+	pit_type const endpit = buffer.paragraphs().size();
+	for (pit_type pit = 0; pit != endpit; ++pit) {
+		TeXOnePar(buffer, buffer.text(), pit, os, runparams);
+		LYXERR(Debug::FIND, "searchString up to here: " << ods.str());
+	}
+	return ods.str();
+}
+
+
+static docstring stringifySearchBuffer(Buffer & buffer, FindAndReplaceOptions const & opt) {
+	docstring str;
+	if (!opt.ignoreformat) {
+		str = buffer_to_latex(buffer);
+	} else {
+		ParIterator it = buffer.par_iterator_begin();
+		ParIterator end = buffer.par_iterator_end();
+		OutputParams runparams(&buffer.params().encoding());
+		odocstringstream os;
+		runparams.nice = true;
+		runparams.flavor = OutputParams::LATEX;
+		runparams.linelen = 100000; //lyxrc.plaintext_linelen;
+		runparams.dryrun = true;
+		for (; it != end; ++it) {
+			LYXERR(Debug::FIND, "Adding to search string: '"
+				<< it->asString(false)
+				<< "'");
+			str +=
+				it->stringify(pos_type(0), it->size(),
+					      AS_STR_INSETS, runparams);
+		}
+	}
+	return str;
+}
+
+
+/// Return separation pos between the leading material and the rest
+static size_t identifyLeading(string const & s)  {
+	string t = s;
+	// @TODO Support \item[text]
+	while (regex_replace(t, t, "\\\\(emph|textbf|subsubsection|subsection|section|subparagraph|paragraph|part)\\{", "")
+	       || regex_replace(t, t, "^\\$", "")
+	       || regex_replace(t, t, "^\\\\\\[ ", "")
+	       || regex_replace(t, t, "^\\\\item ", ""))
+		LYXERR(Debug::FIND, "  after removing leading $, \\[ , \\emph{, \\textbf{, etc.: " << t);
+	return s.find(t);
+}
+
+
+MatchStringAdv::MatchStringAdv(lyx::Buffer & buf, FindAndReplaceOptions const & opt)
+	: p_buf(&buf), p_first_buf(&buf), opt(opt)
+{
+	Buffer & find_buf = *theBufferList().getBuffer(FileName(to_utf8(opt.find_buf_name)), true);
+	par_as_string = normalize(stringifySearchBuffer(find_buf, opt));
 	open_braces = 0;
 	close_wildcards = 0;
 
-	if (! opt.regexp) {
+	use_regexp = !opt.ignoreformat || par_as_string.find("\\regexp") != std::string::npos;
+
+	if (!use_regexp) {
 		// Remove trailing closure of math, macros and environments, so to catch parts of them.
 		do {
-			LYXERR(Debug::DEBUG, "par_as_string now is '" << par_as_string << "'");
+			LYXERR(Debug::FIND, "par_as_string now is '" << par_as_string << "'");
 			if (regex_replace(par_as_string, par_as_string, "(.*)[[:blank:]]\\'", "$1"))
 					continue;
 			if (regex_replace(par_as_string, par_as_string, "(.*[^\\\\]) ?\\$\\'", "$1"))
@@ -606,69 +803,91 @@ MatchStringAdv::MatchStringAdv(lyx::Buffer const & buf, FindAdvOptions const & o
 			}
 			break;
 		} while (true);
-		LYXERR(Debug::DEBUG, "Open braces: " << open_braces);
-		LASSERT(braces_match(par_as_string.begin(), par_as_string.end(), open_braces), /* */);
-		LYXERR(Debug::DEBUG, "Built MatchStringAdv object: par_as_string = '" << par_as_string << "'");
+		LYXERR(Debug::FIND, "Open braces: " << open_braces);
+		LYXERR(Debug::FIND, "Built MatchStringAdv object: par_as_string = '" << par_as_string << "'");
 	} else {
+		size_t lead_size = identifyLeading(par_as_string);
+		string lead_as_regexp;
+		if (lead_size > 0) {
+			lead_as_regexp = escape_for_regex(par_as_string.substr(0, lead_size));
+			par_as_string = par_as_string.substr(lead_size, par_as_string.size() - lead_size);
+			LYXERR(Debug::FIND, "lead_as_regexp is '" << lead_as_regexp << "'");
+			LYXERR(Debug::FIND, "par_as_string now is '" << par_as_string << "'");
+		}
 		par_as_string = escape_for_regex(par_as_string);
 		// Insert (.*?) before trailing closure of math, macros and environments, so to catch parts of them.
-		LYXERR(Debug::DEBUG, "par_as_string now is '" << par_as_string << "'");
+		LYXERR(Debug::FIND, "par_as_string now is '" << par_as_string << "'");
 		if (
 			// Insert .* before trailing '\$' ('$' has been escaped by escape_for_regex)
 			regex_replace(par_as_string, par_as_string, "(.*[^\\\\])(\\\\\\$)\\'", "$1(.*?)$2")
 				// Insert .* before trailing '\\\]' ('\]' has been escaped by escape_for_regex)
 				|| regex_replace(par_as_string, par_as_string, "(.*[^\\\\])(\\\\\\\\\\\\\\])\\'", "$1(.*?)$2")
 				// Insert .* before trailing '\\end\{...}' ('\end{...}' has been escaped by escape_for_regex)
-				|| regex_replace(par_as_string, par_as_string, "(.*[^\\\\])(\\\\\\\\end\\\\\\{[a-zA-Z_]*\\\\\\})\\'", "$1(.*?)$2")
+				|| regex_replace(par_as_string, par_as_string, 
+					"(.*[^\\\\])(\\\\\\\\end\\\\\\{[a-zA-Z_]*\\\\\\})\\'", "$1(.*?)$2")
 				// Insert .* before trailing '\}' ('}' has been escaped by escape_for_regex)
 				|| regex_replace(par_as_string, par_as_string, "(.*[^\\\\])(\\\\\\})\\'", "$1(.*?)$2")
 		) {
 			++close_wildcards;
 		}
-		LYXERR(Debug::DEBUG, "par_as_string now is '" << par_as_string << "'");
-		LYXERR(Debug::DEBUG, "Open braces: " << open_braces);
-		LYXERR(Debug::DEBUG, "Close .*?  : " << close_wildcards);
-		LASSERT(braces_match(par_as_string.begin(), par_as_string.end(), open_braces), /* */);
-		// Entered regexp must match at begin of searched string buffer
-		par_as_string = string("\\`") + par_as_string;
-		LYXERR(Debug::DEBUG, "Replaced text (to be used as regex): " << par_as_string);
-		regexp = boost::regex(par_as_string);
-		regexp2 = boost::regex(string(".*") + par_as_string);
+		LYXERR(Debug::FIND, "par_as_string now is '" << par_as_string << "'");
+		LYXERR(Debug::FIND, "Open braces: " << open_braces);
+		LYXERR(Debug::FIND, "Close .*?  : " << close_wildcards);
+		LYXERR(Debug::FIND, "Replaced text (to be used as regex): " << par_as_string);
+		// If entered regexp must match at begin of searched string buffer
+		string regexp_str = string("\\`") + lead_as_regexp + par_as_string;
+		LYXERR(Debug::FIND, "Setting regexp to : " << regexp_str << endl);
+		regexp = lyx::regex(regexp_str);
+
+		// If entered regexp may match wherever in searched string buffer
+		string regexp2_str = string("\\`.*") + lead_as_regexp + ".*" + par_as_string;
+		LYXERR(Debug::FIND, "Setting regexp2 to: " << regexp2_str << endl);
+		regexp2 = lyx::regex(regexp2_str);
 	}
 }
 
 
-int MatchStringAdv::operator()(DocIterator const & cur, int len, bool at_begin) const
+int MatchStringAdv::findAux(DocIterator const & cur, int len, bool at_begin) const
 {
 	docstring docstr = stringifyFromForSearch(opt, cur, len);
-	LYXERR(Debug::DEBUG, "Matching against     '" << lyx::to_utf8(docstr) << "'");
+	LYXERR(Debug::FIND, "Matching against     '" << lyx::to_utf8(docstr) << "'");
 	string str = normalize(docstr);
-	LYXERR(Debug::DEBUG, "After normalization: '" << str << "'");
-	if (! opt.regexp) {
+	LYXERR(Debug::FIND, "After normalization: '" << str << "'");
+	if (! use_regexp) {
+		LYXERR(Debug::FIND, "Searching in normal mode: par_as_string='" << par_as_string << "', str='" << str << "'");
 		if (at_begin) {
+			LYXERR(Debug::FIND, "size=" << par_as_string.size() << ", substr='" << str.substr(0, par_as_string.size()) << "'");
 			if (str.substr(0, par_as_string.size()) == par_as_string)
 				return par_as_string.size();
 		} else {
-			size_t pos = str.find(par_as_string);
+			string t = par_as_string;
+			while (regex_replace(t, t, "\\\\(emph|textbf|subsubsection|subsection|section|subparagraph|paragraph|part)\\{", "")
+			       || regex_replace(t, t, "^\\$", "")
+			       || regex_replace(t, t, "^\\\\\\[ ", ""))
+				LYXERR(Debug::FIND, "  after removing leading $, \\[ , \\emph{, \\textbf{, etc.: " << t);
+			size_t pos = str.find(t);
 			if (pos != string::npos)
 				return par_as_string.size();
 		}
 	} else {
-		// Try all possible regexp matches, until one that verifies the braces match test is found
-		boost::regex const *p_regexp = at_begin ? &regexp : &regexp2;
-		boost::sregex_iterator re_it(str.begin(), str.end(), *p_regexp);
-		boost::sregex_iterator re_it_end;
+		LYXERR(Debug::FIND, "Searching in regexp mode: at_begin=" << at_begin);
+		// Try all possible regexp matches, 
+		//until one that verifies the braces match test is found
+		regex const *p_regexp = at_begin ? &regexp : &regexp2;
+		sregex_iterator re_it(str.begin(), str.end(), *p_regexp);
+		sregex_iterator re_it_end;
 		for (; re_it != re_it_end; ++re_it) {
-			boost::match_results<string::const_iterator> const & m = *re_it;
+			match_results<string::const_iterator> const & m = *re_it;
 			// Check braces on the segment that matched the entire regexp expression,
 			// plus the last subexpression, if a (.*?) was inserted in the constructor.
-			if (! braces_match(m[0].first, m[0].second, open_braces))
+			if (!braces_match(m[0].first, m[0].second, open_braces))
 				return 0;
 			// Check braces on segments that matched all (.*?) subexpressions.
 			for (size_t i = 1; i < m.size(); ++i)
-				if (! braces_match(m[i].first, m[i].second))
+				if (!braces_match(m[i].first, m[i].second))
 					return false;
-			// Exclude from the returned match length any length due to close wildcards added at end of regexp
+			// Exclude from the returned match length any length 
+			// due to close wildcards added at end of regexp
 			if (close_wildcards == 0)
 				return m[0].second - m[0].first;
 			else
@@ -679,6 +898,28 @@ int MatchStringAdv::operator()(DocIterator const & cur, int len, bool at_begin)
 }
 
 
+int MatchStringAdv::operator()(DocIterator const & cur, int len, bool at_begin) const
+{
+	int res = findAux(cur, len, at_begin);
+	LYXERR(Debug::FIND,
+	       "res=" << res << ", at_begin=" << at_begin << ", matchword=" << opt.matchword << ", inTexted=" << cur.inTexted());
+	if (res == 0 || !at_begin || !opt.matchword || !cur.inTexted())
+		return res;
+	Paragraph const & par = cur.paragraph();
+	bool ws_left = cur.pos() > 0 ?
+		par.isWordSeparator(cur.pos() - 1) : true;
+	bool ws_right = cur.pos() + res < par.size() ?
+		par.isWordSeparator(cur.pos() + res) : true;
+	LYXERR(Debug::FIND,
+	       "cur.pos()=" << cur.pos() << ", res=" << res
+	       << ", separ: " << ws_left << ", " << ws_right
+	       << endl);
+	if (ws_left && ws_right)
+		return res;
+	return 0;
+}
+
+
 string MatchStringAdv::normalize(docstring const & s) const
 {
 	string t;
@@ -697,20 +938,22 @@ string MatchStringAdv::normalize(docstring const & s) const
 	while ((pos = t.find("\n")) != string::npos)
 		t.replace(pos, 1, " ");
 	// Remove stale empty \emph{}, \textbf{} and similar blocks from latexify
-	while (regex_replace(t, t, "\\\\[a-zA-Z_]+(\\{\\})+", ""))
-		;
+	LYXERR(Debug::FIND, "Removing stale empty \\emph{}, \\textbf{}, \\*section{} macros from: " << t);
+	while (regex_replace(t, t, "\\\\(emph|textbf|subsubsection|subsection|section|subparagraph|paragraph|part)(\\{\\})+", ""))
+		LYXERR(Debug::FIND, "  further removing stale empty \\emph{}, \\textbf{} macros from: " << t);
 	return t;
 }
 
 
 docstring stringifyFromCursor(DocIterator const & cur, int len)
 {
-	LYXERR(Debug::DEBUG, "Stringifying with len=" << len << " from cursor at pos: " << cur);
+	LYXERR(Debug::FIND, "Stringifying with len=" << len << " from cursor at pos: " << cur);
 	if (cur.inTexted()) {
 			Paragraph const & par = cur.paragraph();
 			// TODO what about searching beyond/across paragraph breaks ?
 			// TODO Try adding a AS_STR_INSERTS as last arg
-			pos_type end = ( len == -1 || cur.pos() + len > int(par.size()) ) ? int(par.size()) : cur.pos() + len;
+			pos_type end = ( len == -1 || cur.pos() + len > int(par.size()) ) ?
+				int(par.size()) : cur.pos() + len;
 			OutputParams runparams(&cur.buffer()->params().encoding());
 			odocstringstream os;
 			runparams.nice = true;
@@ -718,36 +961,40 @@ docstring stringifyFromCursor(DocIterator const & cur, int len)
 			runparams.linelen = 100000; //lyxrc.plaintext_linelen;
 			// No side effect of file copying and image conversion
 			runparams.dryrun = true;
-			LYXERR(Debug::DEBUG, "Stringifying with cur: " << cur << ", from pos: " << cur.pos() << ", end: " << end);
+			LYXERR(Debug::FIND, "Stringifying with cur: " 
+				<< cur << ", from pos: " << cur.pos() << ", end: " << end);
 			return par.stringify(cur.pos(), end, AS_STR_INSETS, runparams);
 	} else if (cur.inMathed()) {
 			odocstringstream os;
 			CursorSlice cs = cur.top();
 			MathData md = cs.cell();
-			MathData::const_iterator it_end = ( ( len == -1 || cs.pos() + len > int(md.size()) ) ? md.end() : md.begin() + cs.pos() + len );
+			MathData::const_iterator it_end = 
+				( ( len == -1 || cs.pos() + len > int(md.size()) )
+					? md.end() : md.begin() + cs.pos() + len );
 			for (MathData::const_iterator it = md.begin() + cs.pos(); it != it_end; ++it)
 					os << *it;
 			return os.str();
 	}
-	LYXERR(Debug::DEBUG, "Don't know how to stringify from here: " << cur);
+	LYXERR(Debug::FIND, "Don't know how to stringify from here: " << cur);
 	return docstring();
 }
 
+
 /** Computes the LaTeX export of buf starting from cur and ending len positions
  * after cur, if len is positive, or at the paragraph or innermost inset end
  * if len is -1.
  */
-
 docstring latexifyFromCursor(DocIterator const & cur, int len)
 {
-	LYXERR(Debug::DEBUG, "Latexifying with len=" << len << " from cursor at pos: " << cur);
-	LYXERR(Debug::DEBUG, "  with cur.lastpost=" << cur.lastpos() << ", cur.lastrow="
+	LYXERR(Debug::FIND, "Latexifying with len=" << len << " from cursor at pos: " << cur);
+	LYXERR(Debug::FIND, "  with cur.lastpost=" << cur.lastpos() << ", cur.lastrow="
 		<< cur.lastrow() << ", cur.lastcol=" << cur.lastcol());
 	Buffer const & buf = *cur.buffer();
 	LASSERT(buf.isLatex(), /* */);
 
 	TexRow texrow;
 	odocstringstream ods;
+	otexstream os(ods, texrow);
 	OutputParams runparams(&buf.params().encoding());
 	runparams.nice = false;
 	runparams.flavor = OutputParams::LATEX;
@@ -756,18 +1003,13 @@ docstring latexifyFromCursor(DocIterator const & cur, int len)
 	runparams.dryrun = true;
 
 	if (cur.inTexted()) {
-			// @TODO what about searching beyond/across paragraph breaks ?
-			ParagraphList::const_iterator pit = cur.innerText()->paragraphs().begin();
-			for (int i = 0; i < cur.pit(); ++i)
-					++pit;
-//		ParagraphList::const_iterator pit_end = pit;
-//		++pit_end;
-//		lyx::latexParagraphs(buf, cur.innerText()->paragraphs(), ods, texrow, runparams, string(), pit, pit_end);
-		pos_type const endpos = (len == -1 || cur.pos() + len > int(pit->size()))
-			? pit->size() : cur.pos() + len;
-		TeXOnePar(buf, *cur.innerText(), pit, ods, texrow, runparams, string(),
-			cur.pos(), endpos);
-		LYXERR(Debug::DEBUG, "Latexified text: '" << lyx::to_utf8(ods.str()) << "'");
+		// @TODO what about searching beyond/across paragraph breaks ?
+		pos_type endpos = cur.paragraph().size();
+		if (len != -1 && endpos > cur.pos() + len)
+			endpos = cur.pos() + len;
+		TeXOnePar(buf, *cur.innerText(), cur.pit(), os, runparams,
+			string(), cur.pos(), endpos);
+		LYXERR(Debug::FIND, "Latexified text: '" << lyx::to_utf8(ods.str()) << "'");
 	} else if (cur.inMathed()) {
 		// Retrieve the math environment type, and add '$' or '$[' or others (\begin{equation}) accordingly
 		for (int s = cur.depth() - 1; s >= 0; --s) {
@@ -786,13 +1028,6 @@ docstring latexifyFromCursor(DocIterator const & cur, int len)
 		for (MathData::const_iterator it = md.begin() + cs.pos(); it != it_end; ++it)
 				ods << *it;
 
-		// MathData md = cur.cell();
-		// MathData::const_iterator it_end = ( ( len == -1 || cur.pos() + len > int(md.size()) ) ? md.end() : md.begin() + cur.pos() + len );
-		// for (MathData::const_iterator it = md.begin() + cur.pos(); it != it_end; ++it) {
-		//	MathAtom const & ma = *it;
-		//	ma.nucleus()->latex(buf, ods, runparams);
-		// }
-
 		// Retrieve the math environment type, and add '$' or '$]'
 		// or others (\end{equation}) accordingly
 		for (int s = cur.depth() - 1; s >= 0; --s) {
@@ -804,13 +1039,14 @@ docstring latexifyFromCursor(DocIterator const & cur, int len)
 				break;
 			}
 		}
-		LYXERR(Debug::DEBUG, "Latexified math: '" << lyx::to_utf8(ods.str()) << "'");
+		LYXERR(Debug::FIND, "Latexified math: '" << lyx::to_utf8(ods.str()) << "'");
 	} else {
-		LYXERR(Debug::DEBUG, "Don't know how to stringify from here: " << cur);
+		LYXERR(Debug::FIND, "Don't know how to stringify from here: " << cur);
 	}
 	return ods.str();
 }
 
+
 /** Finalize an advanced find operation, advancing the cursor to the innermost
  ** position that matches, plus computing the length of the matching text to
  ** be selected
@@ -822,21 +1058,23 @@ int findAdvFinalize(DocIterator & cur, MatchStringAdv const & match)
 	size_t d;
 	DocIterator old_cur(cur.buffer());
 	do {
-		LYXERR(Debug::DEBUG, "Forwarding one step (searching for innermost match)");
+		LYXERR(Debug::FIND, "Forwarding one step (searching for innermost match)");
 		d = cur.depth();
 		old_cur = cur;
 		cur.forwardPos();
 	} while (cur && cur.depth() > d && match(cur) > 0);
 	cur = old_cur;
 	LASSERT(match(cur) > 0, /* */);
-	LYXERR(Debug::DEBUG, "Ok");
+	LYXERR(Debug::FIND, "Ok");
 
 	// Compute the match length
 	int len = 1;
-	LYXERR(Debug::DEBUG, "verifying unmatch with len = " << len);
+	if (cur.pos() + len > cur.lastpos())
+		return 0;
+	LYXERR(Debug::FIND, "verifying unmatch with len = " << len);
 	while (cur.pos() + len <= cur.lastpos() && match(cur, len) == 0) {
 		++len;
-		LYXERR(Debug::DEBUG, "verifying unmatch with len = " << len);
+		LYXERR(Debug::FIND, "verifying unmatch with len = " << len);
 	}
 	// Length of matched text (different from len param)
 	int old_len = match(cur, len);
@@ -845,107 +1083,127 @@ int findAdvFinalize(DocIterator & cur, MatchStringAdv const & match)
 	while ((new_len = match(cur, len + 1)) > old_len) {
 		++len;
 		old_len = new_len;
-		LYXERR(Debug::DEBUG, "verifying   match with len = " << len);
+		LYXERR(Debug::FIND, "verifying   match with len = " << len);
 	}
 	return len;
 }
 
 
 /// Finds forward
-int findForwardAdv(DocIterator & cur, MatchStringAdv const & match)
+int findForwardAdv(DocIterator & cur, MatchStringAdv & match)
 {
 	if (!cur)
 		return 0;
-	int wrap_answer;
-	do {
-		while (cur && !match(cur, -1, false)) {
-			if (cur.pit() < cur.lastpit())
-				cur.forwardPar();
-			else {
-				cur.forwardPos();
+	while (cur) {
+		LYXERR(Debug::FIND, "findForwardAdv() cur: " << cur);
+		if (match(cur, -1, false)) {
+			for (; cur; cur.forwardPos()) {
+				LYXERR(Debug::FIND, "Advancing cur: " << cur);
+				if (match(cur)) {
+					// Sometimes in finalize we understand it wasn't a match
+					// and we need to continue the outest loop
+					int len = findAdvFinalize(cur, match);
+					if (len > 0)
+						return len;
+				}
 			}
+			if (!cur)
+				return 0;
 		}
-		for (; cur; cur.forwardPos()) {
-			if (match(cur))
-				return findAdvFinalize(cur, match);
+		if (cur.pit() < cur.lastpit()) {
+			LYXERR(Debug::FIND, "Advancing par: cur=" << cur);
+			cur.forwardPar();
+		} else {
+			// This should exit nested insets, if any, or otherwise undefine the currsor.
+			cur.pos() = cur.lastpos();
+			LYXERR(Debug::FIND, "Advancing pos: cur=" << cur);
+			cur.forwardPos();
 		}
-		wrap_answer = frontend::Alert::prompt(
-			_("Wrap search ?"),
-			_("End of document reached while searching forward\n"
-				"\n"
-				"Continue searching from beginning ?"),
-			0, 1, _("&Yes"), _("&No"));
-		cur.clear();
-		cur.push_back(CursorSlice(match.buf.inset()));
-	} while (wrap_answer == 0);
+	}
 	return 0;
 }
 
 
+/// Find the most backward consecutive match within same paragraph while searching backwards.
+int findMostBackwards(DocIterator & cur, MatchStringAdv const & match)
+{
+	DocIterator cur_begin = doc_iterator_begin(cur.buffer());
+	DocIterator tmp_cur = cur;
+	int len = findAdvFinalize(tmp_cur, match);
+	Inset & inset = cur.inset();
+	for (; cur != cur_begin; cur.backwardPos()) {
+		LYXERR(Debug::FIND, "findMostBackwards(): cur=" << cur);
+		DocIterator new_cur = cur;
+		new_cur.backwardPos();
+		if (new_cur == cur || &new_cur.inset() != &inset || !match(new_cur))
+			break;
+		int new_len = findAdvFinalize(new_cur, match);
+		if (new_len == len)
+			break;
+		len = new_len;
+	}
+	LYXERR(Debug::FIND, "findMostBackwards(): exiting with cur=" << cur);
+	return len;
+}
+
+
 /// Finds backwards
-int findBackwardsAdv(DocIterator & cur, MatchStringAdv const & match) {
-	//	if (cur.pos() > 0 || cur.depth() > 0)
-	//		cur.backwardPos();
+int findBackwardsAdv(DocIterator & cur, MatchStringAdv & match) {
+	if (! cur)
+		return 0;
+	// Backup of original position
+	DocIterator cur_begin = doc_iterator_begin(cur.buffer());
+	if (cur == cur_begin)
+		return 0;
+	cur.backwardPos();
 	DocIterator cur_orig(cur);
-	if (match(cur_orig))
-		findAdvFinalize(cur_orig, match);
-	//	int total = cur.bottom().pit() + 1;
-	int wrap_answer;
+	bool found_match;
+	bool pit_changed = false;
+	found_match = false;
 	do {
-		// TODO No ! così non va.
-		bool pit_changed = false;
-		while (cur && !match(cur, -1, false)) {
-			if (cur.pit() > 0)
-				--cur.pit();
-			else {
+		cur.pos() = 0;
+		found_match = match(cur, -1, false);
+
+		if (found_match) {
+			if (pit_changed)
+				cur.pos() = cur.lastpos();
+			else
+				cur.pos() = cur_orig.pos();
+			LYXERR(Debug::FIND, "findBackAdv2: cur: " << cur);
+			DocIterator cur_prev_iter;
+			do {
+				found_match = match(cur);
+				LYXERR(Debug::FIND, "findBackAdv3: found_match=" 
+				       << found_match << ", cur: " << cur);
+				if (found_match)
+					return findMostBackwards(cur, match);
+
+				// Stop if begin of document reached
+				if (cur == cur_begin)
+					break;
+				cur_prev_iter = cur;
 				cur.backwardPos();
-				if (cur)
-					cur.pos() = 0;
-			}
-			pit_changed = true;
+			} while (true);
 		}
-		if (cur && pit_changed)
-			cur.pos() = cur.lastpos();
-		for (; cur; cur.backwardPos()) {
-			if (match(cur)) {
-				// Find the most backward consecutive match within same paragraph while searching backwards.
-				int pit = cur.pit();
-				int old_len;
-				DocIterator old_cur;
-				int len = findAdvFinalize(cur, match);
-				do {
-					old_cur = cur;
-					old_len = len;
-					cur.backwardPos();
-					LYXERR(Debug::DEBUG, "old_cur: " << old_cur << ", old_len=" << len << ", cur: " << cur);
-				} while (cur && cur.pit() == pit && match(cur)
-					&& (len = findAdvFinalize(cur, match)) > old_len);
-				cur = old_cur;
-				len = old_len;
-				LYXERR(Debug::DEBUG, "cur_orig    : " << cur_orig);
-				LYXERR(Debug::DEBUG, "cur         : " << cur);
-				if (cur != cur_orig)
-					return len;
-			}
-		}
-		wrap_answer = frontend::Alert::prompt(
-			_("Wrap search ?"),
-			_("Beginning of document reached while searching backwards\n"
-				"\n"
-				"Continue searching from end ?"),
-			0, 1, _("&Yes"), _("&No"));
-		cur = doc_iterator_end(&match.buf);
-		cur.backwardPos();
-	} while (wrap_answer == 0);
+		if (cur == cur_begin)
+			break;
+		if (cur.pit() > 0)
+			--cur.pit();
+		else
+			cur.backwardPos();
+		pit_changed = true;
+	} while (true);
 	return 0;
 }
 
+
 } // anonym namespace
 
 
-docstring stringifyFromForSearch(FindAdvOptions const & opt,
+docstring stringifyFromForSearch(FindAndReplaceOptions const & opt,
 	DocIterator const & cur, int len)
 {
+	LASSERT(cur.pos() >= 0 && cur.pos() <= cur.lastpos(), /* */);
 	if (!opt.ignoreformat)
 		return latexifyFromCursor(cur, len);
 	else
@@ -953,38 +1211,156 @@ docstring stringifyFromForSearch(FindAdvOptions const & opt,
 }
 
 
-lyx::FindAdvOptions::FindAdvOptions(docstring const & search, bool casesensitive,
+FindAndReplaceOptions::FindAndReplaceOptions(docstring const & find_buf_name, bool casesensitive,
 	bool matchword, bool forward, bool expandmacros, bool ignoreformat,
-	bool regexp)
-	: search(search), casesensitive(casesensitive), matchword(matchword),
+	docstring const & repl_buf_name, bool keep_case,
+	SearchScope scope)
+	: find_buf_name(find_buf_name), casesensitive(casesensitive), matchword(matchword),
 	forward(forward), expandmacros(expandmacros), ignoreformat(ignoreformat),
-	regexp(regexp)
+	repl_buf_name(repl_buf_name), keep_case(keep_case), scope(scope)
 {
 }
 
-/// Perform a FindAdv operation.
-bool findAdv(BufferView * bv, FindAdvOptions const & opt)
-{
-	DocIterator cur = bv->cursor();
-	int match_len = 0;
 
-	if (opt.search.empty()) {
-			bv->message(_("Search text is empty!"));
+namespace {
+
+
+/** Check if 'len' letters following cursor are all non-lowercase */
+static bool allNonLowercase(DocIterator const & cur, int len) {
+	pos_type end_pos = cur.pos() + len;
+	for (pos_type pos = cur.pos(); pos != end_pos; ++pos)
+		if (isLowerCase(cur.paragraph().getChar(pos)))
 			return false;
+	return true;
+}
+
+
+/** Check if first letter is upper case and second one is lower case */
+static bool firstUppercase(DocIterator const & cur) {
+	char_type ch1, ch2;
+	if (cur.pos() >= cur.lastpos() - 1) {
+		LYXERR(Debug::FIND, "No upper-case at cur: " << cur);
+		return false;
+	}
+	ch1 = cur.paragraph().getChar(cur.pos());
+	ch2 = cur.paragraph().getChar(cur.pos()+1);
+	bool result = isUpperCase(ch1) && isLowerCase(ch2);
+	LYXERR(Debug::FIND, "firstUppercase(): "
+	       << "ch1=" << ch1 << "(" << char(ch1) << "), ch2=" 
+	       << ch2 << "(" << char(ch2) << ")"
+	       << ", result=" << result << ", cur=" << cur);
+	return result;
+}
+
+
+/** Make first letter of supplied buffer upper-case, and the rest lower-case.
+ **
+ ** \fixme What to do with possible further paragraphs in replace buffer ?
+ **/
+static void changeFirstCase(Buffer & buffer, TextCase first_case, TextCase others_case) {
+	ParagraphList::iterator pit = buffer.paragraphs().begin();
+	pos_type right = pos_type(1);
+	pit->changeCase(buffer.params(), pos_type(0), right, first_case);
+	right = pit->size() + 1;
+	pit->changeCase(buffer.params(), right, right, others_case);
+}
+} // anon namespace
+
+///
+static void findAdvReplace(BufferView * bv, FindAndReplaceOptions const & opt, MatchStringAdv & matchAdv)
+{
+	Cursor & cur = bv->cursor();
+	if (opt.repl_buf_name == docstring())
+		return;
+
+	DocIterator sel_beg = cur.selectionBegin();
+	DocIterator sel_end = cur.selectionEnd();
+	if (&sel_beg.inset() != &sel_end.inset()
+	    || sel_beg.pit() != sel_end.pit())
+		return;
+	int sel_len = sel_end.pos() - sel_beg.pos();
+	LYXERR(Debug::FIND, "sel_beg: " << sel_beg << ", sel_end: " << sel_end
+	       << ", sel_len: " << sel_len << endl);
+	if (sel_len == 0)
+		return;
+	LASSERT(sel_len > 0, /**/);
+
+	if (!matchAdv(sel_beg, sel_len))
+		return;
+
+	// Build a copy of the replace buffer, adapted to the KeepCase option
+	Buffer & repl_buffer_orig = *theBufferList().getBuffer(FileName(to_utf8(opt.repl_buf_name)), true);
+	ostringstream oss;
+	repl_buffer_orig.write(oss);
+	string lyx = oss.str();
+	Buffer repl_buffer("", false);
+	repl_buffer.setUnnamed(true);
+	LASSERT(repl_buffer.readString(lyx), /**/);
+	if (opt.keep_case && sel_len >= 2) {
+		if (cur.inTexted()) {
+			if (firstUppercase(cur))
+				changeFirstCase(repl_buffer, text_uppercase, text_lowercase);
+			else if (allNonLowercase(cur, sel_len))
+				changeFirstCase(repl_buffer, text_uppercase, text_uppercase);
+		}
 	}
-// 	if (! bv->buffer()) {
-// 		bv->message(_("No open document !"));
-// 		return false;
-// 	}
+	cap::cutSelection(cur, false, false);
+	if (!cur.inMathed()) {
+		repl_buffer.changeLanguage(
+			repl_buffer.language(),
+			cur.getFont().language());
+		LYXERR(Debug::FIND, "Replacing by pasteParagraphList()ing repl_buffer");
+		LYXERR(Debug::FIND, "Before pasteParagraphList() cur=" << cur << endl);
+		cap::pasteParagraphList(cur, repl_buffer.paragraphs(),
+					repl_buffer.params().documentClassPtr(),
+					bv->buffer().errorList("Paste"));
+		LYXERR(Debug::FIND, "After pasteParagraphList() cur=" << cur << endl);
+		sel_len = repl_buffer.paragraphs().begin()->size();
+	} else {
+		TexRow texrow;
+		odocstringstream ods;
+		otexstream os(ods, texrow);
+		OutputParams runparams(&repl_buffer.params().encoding());
+		runparams.nice = false;
+		runparams.flavor = OutputParams::LATEX;
+		runparams.linelen = 8000; //lyxrc.plaintext_linelen;
+		runparams.dryrun = true;
+		TeXOnePar(repl_buffer, repl_buffer.text(), 0, os, runparams);
+		//repl_buffer.getSourceCode(ods, 0, repl_buffer.paragraphs().size(), false);
+		docstring repl_latex = ods.str();
+		LYXERR(Debug::FIND, "Latexified replace_buffer: '" << repl_latex << "'");
+		string s;
+		regex_replace(to_utf8(repl_latex), s, "\\$(.*)\\$", "$1");
+		regex_replace(s, s, "\\\\\\[(.*)\\\\\\]", "$1");
+		repl_latex = from_utf8(s);
+		LYXERR(Debug::FIND, "Replacing by niceInsert()ing latex: '" << repl_latex << "'");
+		sel_len = cur.niceInsert(repl_latex);
+	}
+	cur.pos() -= sel_len;
+	if (cur.pos() < 0)
+		cur.pos() = 0;
+	LYXERR(Debug::FIND, "Putting selection at cur=" << cur << " with len: " << sel_len);
+	bv->putSelectionAt(DocIterator(cur), sel_len, !opt.forward);
+	bv->processUpdateFlags(Update::Force);
+}
+
+
+/// Perform a FindAdv operation.
+bool findAdv(BufferView * bv, FindAndReplaceOptions const & opt)
+{
+	DocIterator cur;
+	int match_len = 0;
 
 	try {
-		MatchStringAdv const matchAdv(bv->buffer(), opt);
+		MatchStringAdv matchAdv(bv->buffer(), opt);
+		findAdvReplace(bv, opt, matchAdv);
+		cur = bv->cursor();
 		if (opt.forward)
 				match_len = findForwardAdv(cur, matchAdv);
 		else
 				match_len = findBackwardsAdv(cur, matchAdv);
 	} catch (...) {
-		// This may only be raised by boost::regex()
+		// This may only be raised by lyx::regex()
 		bv->message(_("Invalid regular expression!"));
 		return false;
 	}
@@ -994,45 +1370,36 @@ bool findAdv(BufferView * bv, FindAdvOptions const & opt)
 		return false;
 	}
 
-	LYXERR(Debug::DEBUG, "Putting selection at " << cur << " with len: " << match_len);
-	bv->putSelectionAt(cur, match_len, ! opt.forward);
 	bv->message(_("Match found!"));
-	//bv->update();
-
-	return true;
-}
 
+	LYXERR(Debug::FIND, "Putting selection at cur=" << cur << " with len: " << match_len);
+	bv->putSelectionAt(cur, match_len, !opt.forward);
 
-void findAdv(BufferView * bv, FuncRequest const & ev)
-{
-	if (!bv || ev.action != LFUN_WORD_FINDADV)
-		return;
-
-	FindAdvOptions opt;
-	istringstream iss(to_utf8(ev.argument()));
-	iss >> opt;
-	findAdv(bv, opt);
+	return true;
 }
 
 
-ostringstream & operator<<(ostringstream & os, lyx::FindAdvOptions const & opt)
+ostringstream & operator<<(ostringstream & os, FindAndReplaceOptions const & opt)
 {
-	os << to_utf8(opt.search) << "\nEOSS\n"
+	os << to_utf8(opt.find_buf_name) << "\nEOSS\n"
 	   << opt.casesensitive << ' '
 	   << opt.matchword << ' '
 	   << opt.forward << ' '
 	   << opt.expandmacros << ' '
 	   << opt.ignoreformat << ' '
-	   << opt.regexp;
+	   << to_utf8(opt.repl_buf_name) << "\nEOSS\n"
+	   << opt.keep_case << ' '
+	   << int(opt.scope);
 
-	LYXERR(Debug::DEBUG, "built: " << os.str());
+	LYXERR(Debug::FIND, "built: " << os.str());
 
 	return os;
 }
 
-istringstream & operator>>(istringstream & is, lyx::FindAdvOptions & opt)
+
+istringstream & operator>>(istringstream & is, FindAndReplaceOptions & opt)
 {
-	LYXERR(Debug::DEBUG, "parsing");
+	LYXERR(Debug::FIND, "parsing");
 	string s;
 	string line;
 	getline(is, line);
@@ -1044,11 +1411,28 @@ istringstream & operator>>(istringstream & is, lyx::FindAdvOptions & opt)
 				break;
 		getline(is, line);
 	}
-	LYXERR(Debug::DEBUG, "searching for: '" << s << "'");
-	opt.search = from_utf8(s);
-	is >> opt.casesensitive >> opt.matchword >> opt.forward >> opt.expandmacros >> opt.ignoreformat >> opt.regexp;
-	LYXERR(Debug::DEBUG, "parsed: " << opt.casesensitive << ' ' << opt.matchword << ' ' << opt.forward << ' '
-		   << opt.expandmacros << ' ' << opt.ignoreformat << ' ' << opt.regexp);
+	LYXERR(Debug::FIND, "file_buf_name: '" << s << "'");
+	opt.find_buf_name = from_utf8(s);
+	is >> opt.casesensitive >> opt.matchword >> opt.forward >> opt.expandmacros >> opt.ignoreformat;
+	is.get();	// Waste space before replace string
+	s = "";
+	getline(is, line);
+	while (line != "EOSS") {
+		if (! s.empty())
+				s = s + "\n";
+		s = s + line;
+		if (is.eof())	// Tolerate malformed request
+				break;
+		getline(is, line);
+	}
+	LYXERR(Debug::FIND, "repl_buf_name: '" << s << "'");
+	opt.repl_buf_name = from_utf8(s);
+	is >> opt.keep_case;
+	int i;
+	is >> i;
+	opt.scope = FindAndReplaceOptions::SearchScope(i);
+	LYXERR(Debug::FIND, "parsed: " << opt.casesensitive << ' ' << opt.matchword << ' ' << opt.forward << ' '
+		   << opt.expandmacros << ' ' << opt.ignoreformat << ' ' << opt.keep_case);
 	return is;
 }