Patch for https://github.com/matthewlmcclure/less/issues/1. 2013-06-19-01

less.diff

===================================================================
RCS file: RCS/command.c,v
retrieving revision 1.92
diff -u -r1.92 command.c
--- command.c	2012/07/03 20:10:42	1.92
+++ command.c	2013/06/18 23:41:09
@@ -47,6 +47,8 @@
 extern int shift_count;
 extern int oldbot;
 extern int forw_prompt;
+extern int incremental_search;
+extern int same_pos_bell;
 
 #if SHELL_ESCAPE
 static char *shellcmd = NULL;	/* For holding last shell command for "!!" */
@@ -61,6 +63,7 @@
 static int optgetname;
 static POSITION bottompos;
 static int save_hshift;
+static struct mark searchstack[CMDBUF_SIZE];
 #if PIPEC
 static char pipec;
 #endif
@@ -203,7 +206,7 @@
 	{
 	case A_F_SEARCH:
 	case A_B_SEARCH:
-		multi_search(cbuf, (int) number);
+		multi_search(cbuf, (int) number, 0);
 		break;
 #if HILITE_SEARCH
 	case A_FILTER:
@@ -516,6 +519,7 @@
 mca_char(c)
 	int c;
 {
+	char *cbuf;
 	int ret;
 
 	switch (mca)
@@ -606,6 +610,42 @@
 		return (MCA_DONE);
 	}
 
+	if (incremental_search && (mca == A_F_SEARCH || mca == A_B_SEARCH))
+	{
+		/*
+		 * Special case for incremental search.
+		 * Run multi_search with incremental=1
+		 * and repaint prompt after each char in search.
+		 * Don't ring the same-position bell while typing.
+		 */
+		same_pos_bell = 0;
+		if (is_erase_char(c))
+		{
+			/* Return to previous incremental search position. */
+			struct mark *m = &searchstack[len_cmdbuf()];
+			if (edit_ifile(m->m_ifile))
+				return (MCA_DONE);
+			jump_loc(m->m_scrpos.pos, m->m_scrpos.ln);
+			forw_prompt = 0;
+		} else if (len_cmdbuf() > 0)
+		{
+		    struct mark *m = &searchstack[len_cmdbuf()-1];
+		    struct scrpos scrpos;
+		    get_scrpos(&scrpos);
+		    m->m_scrpos = scrpos;
+		    m->m_ifile = curr_ifile;
+		}
+		cbuf = get_cmdbuf();
+		if (len_cmdbuf() > 0)
+			multi_search(cbuf, (int) number, 1);
+		else
+			undo_search();
+		same_pos_bell = 1;
+		/* Repaint search prompt and pattern. */
+		mca_search();
+		cmd_putstr(cbuf);
+	}
+
 	/*
 	 * Need another character.
 	 */
@@ -771,7 +811,7 @@
 		 * We have just run out of ungotten chars.
 		 */
 		unget_end = 0;
-		if (len_cmdbuf() == 0 || !empty_screen())
+		if (len_cmdbuf() == 0)
 			return (getchr());
 		/*
 		 * Command is incomplete, so try to complete it.
@@ -856,9 +896,10 @@
  * If SRCH_PAST_EOF is set, continue the search thru multiple files.
  */
 	static void
-multi_search(pattern, n)
+multi_search(pattern, n, incremental)
 	char *pattern;
 	int n;
+	int incremental;
 {
 	register int nomore;
 	IFILE save_ifile;
@@ -933,7 +974,7 @@
 	 * Didn't find it.
 	 * Print an error message if we haven't already.
 	 */
-	if (n > 0)
+	if (n > 0 && !incremental)
 		error("Pattern not found", NULL_PARG);
 
 	if (changed_file)
@@ -1376,7 +1417,7 @@
 			if (number <= 0) number = 1;	\
 			mca_search();			\
 			cmd_exec();			\
-			multi_search((char *)NULL, (int) number);
+			multi_search((char *)NULL, (int) number, 0);
 
 
 		case A_F_SEARCH:
===================================================================
RCS file: RCS/forwback.c,v
retrieving revision 1.35
diff -u -r1.35 forwback.c
--- forwback.c	2012/05/21 17:23:54	1.35
+++ forwback.c	2013/06/18 23:32:19
@@ -13,6 +13,7 @@
 public int squished;
 public int no_back_scroll = 0;
 public int forw_prompt;
+public int same_pos_bell = 1;
 
 extern int sigs;
 extern int top_scroll;
@@ -264,7 +265,7 @@
 		forw_prompt = 1;
 	}
 
-	if (nlines == 0)
+	if (nlines == 0 && same_pos_bell)
 		eof_bell();
 	else if (do_repaint)
 		repaint();
@@ -315,7 +316,7 @@
 		}
 	}
 
-	if (nlines == 0)
+	if (nlines == 0 && same_pos_bell)
 		eof_bell();
 	else if (do_repaint)
 		repaint();
===================================================================
RCS file: RCS/less.h,v
retrieving revision 1.64
diff -u -r1.64 less.h
--- less.h	2012/05/21 17:23:54	1.64
+++ less.h	2013/06/18 23:14:35
@@ -288,6 +288,15 @@
 	int ln;
 };
 
+/*
+ * A mark is an ifile (input file) plus a position within the file.
+ */
+struct mark 
+{
+	IFILE m_ifile;
+	struct scrpos m_scrpos;
+};
+
 typedef union parg
 {
 	char *p_string;
===================================================================
RCS file: RCS/mark.c,v
retrieving revision 1.17
diff -u -r1.17 mark.c
--- mark.c	2012/05/21 17:23:54	1.17
+++ mark.c	2013/06/18 23:14:25
@@ -8,14 +8,6 @@
 extern int jump_sline;
 
 /*
- * A mark is an ifile (input file) plus a position within the file.
- */
-struct mark {
-	IFILE m_ifile;
-	struct scrpos m_scrpos;
-};
-
-/*
  * The table of marks.
  * Each mark is identified by a lowercase or uppercase letter.
  * The final one is lmark, for the "last mark"; addressed by the apostrophe.
===================================================================
RCS file: RCS/opttbl.c,v
retrieving revision 1.58
diff -u -r1.58 opttbl.c
--- opttbl.c	2012/12/08 22:15:26	1.58
+++ opttbl.c	2013/05/27 23:36:25
@@ -46,6 +46,7 @@
 public int follow_mode;		/* F cmd Follows file desc or file name? */
 public int oldbot;		/* Old bottom of screen behavior {{REMOVE}} */
 public int opt_use_backslash;	/* Use backslash escaping in option parsing */
+public int incremental_search;	/* Display search results after each char in pattern */
 #if HILITE_SEARCH
 public int hilite_search;	/* Highlight matched search patterns? */
 #endif
@@ -101,6 +102,7 @@
 static struct optname x_optname      = { "tabs",                 NULL };
 static struct optname X__optname     = { "no-init",              NULL };
 static struct optname y_optname      = { "max-forw-scroll",      NULL };
+static struct optname Y__optname     = { "incremental-search",   NULL };
 static struct optname z_optname      = { "window",               NULL };
 static struct optname quote_optname  = { "quotes",               NULL };
 static struct optname tilde_optname  = { "tilde",                NULL };
@@ -385,6 +387,14 @@
 			NULL
 		}
 	},
+	{ 'Y', &Y__optname,
+		BOOL, OPT_OFF, &incremental_search, NULL,
+		{
+			"Normal search (press Enter to search)",
+			"Incremental search",
+			NULL
+		}
+	},
 	{ 'z', &z_optname,
 		NUMBER, -1, &swindow, NULL,
 		{