summaryrefslogtreecommitdiffstats
path: root/readline-6.2/macro.c
diff options
context:
space:
mode:
authorJoel Sherrill <joel.sherrill@OARcorp.com>2011-04-08 16:24:33 +0000
committerJoel Sherrill <joel.sherrill@OARcorp.com>2011-04-08 16:24:33 +0000
commitb667555541a4d65bb9dae6f0e0f240e6a05b148e (patch)
treeb3ae5c92f04ae68fbf9580d6efcf1a1510851495 /readline-6.2/macro.c
parent2011-04-08 Joel Sherrill <joel.sherrill@oarcorp.com> (diff)
downloadrtems-addon-packages-b667555541a4d65bb9dae6f0e0f240e6a05b148e.tar.bz2
2011-04-08 Joel Sherrill <joel.sherrill@oarcorp.com>
* RTEMS_Makefiles/Makefile.readline-6.2, readline-6.2/CHANGELOG, readline-6.2/CHANGES, readline-6.2/COPYING, readline-6.2/INSTALL, readline-6.2/MANIFEST, readline-6.2/Makefile.in, readline-6.2/NEWS, readline-6.2/README, readline-6.2/USAGE, readline-6.2/aclocal.m4, readline-6.2/ansi_stdlib.h, readline-6.2/bind.c, readline-6.2/callback.c, readline-6.2/chardefs.h, readline-6.2/compat.c, readline-6.2/complete.c, readline-6.2/config.h.in, readline-6.2/configure, readline-6.2/configure.in, readline-6.2/display.c, readline-6.2/emacs_keymap.c, readline-6.2/funmap.c, readline-6.2/histexpand.c, readline-6.2/histfile.c, readline-6.2/histlib.h, readline-6.2/history.c, readline-6.2/history.h, readline-6.2/histsearch.c, readline-6.2/input.c, readline-6.2/isearch.c, readline-6.2/keymaps.c, readline-6.2/keymaps.h, readline-6.2/kill.c, readline-6.2/macro.c, readline-6.2/mbutil.c, readline-6.2/misc.c, readline-6.2/nls.c, readline-6.2/parens.c, readline-6.2/patchlevel, readline-6.2/posixdir.h, readline-6.2/posixjmp.h, readline-6.2/posixselect.h, readline-6.2/posixstat.h, readline-6.2/readline.c, readline-6.2/readline.h, readline-6.2/rlconf.h, readline-6.2/rldefs.h, readline-6.2/rlmbutil.h, readline-6.2/rlprivate.h, readline-6.2/rlshell.h, readline-6.2/rlstdc.h, readline-6.2/rltty.c, readline-6.2/rltty.h, readline-6.2/rltypedefs.h, readline-6.2/rlwinsize.h, readline-6.2/savestring.c, readline-6.2/search.c, readline-6.2/shell.c, readline-6.2/signals.c, readline-6.2/tcap.h, readline-6.2/terminal.c, readline-6.2/text.c, readline-6.2/tilde.c, readline-6.2/tilde.h, readline-6.2/undo.c, readline-6.2/util.c, readline-6.2/vi_keymap.c, readline-6.2/vi_mode.c, readline-6.2/xfree.c, readline-6.2/xmalloc.c, readline-6.2/xmalloc.h, readline-6.2/doc/Makefile.in, readline-6.2/doc/fdl.texi, readline-6.2/doc/history.0, readline-6.2/doc/history.3, readline-6.2/doc/history.dvi, readline-6.2/doc/history.html, readline-6.2/doc/history.info, readline-6.2/doc/history.pdf, readline-6.2/doc/history.ps, readline-6.2/doc/history.texi, readline-6.2/doc/history_3.ps, readline-6.2/doc/hstech.texi, readline-6.2/doc/hsuser.texi, readline-6.2/doc/readline.0, readline-6.2/doc/readline.3, readline-6.2/doc/readline.dvi, readline-6.2/doc/readline.html, readline-6.2/doc/readline.info, readline-6.2/doc/readline.pdf, readline-6.2/doc/readline.ps, readline-6.2/doc/readline_3.ps, readline-6.2/doc/rlman.texi, readline-6.2/doc/rltech.texi, readline-6.2/doc/rluser.texi, readline-6.2/doc/rluserman.dvi, readline-6.2/doc/rluserman.html, readline-6.2/doc/rluserman.info, readline-6.2/doc/rluserman.pdf, readline-6.2/doc/rluserman.ps, readline-6.2/doc/rluserman.texi, readline-6.2/doc/texi2dvi, readline-6.2/doc/texi2html, readline-6.2/doc/texinfo.tex, readline-6.2/doc/version.texi, readline-6.2/examples/Inputrc, readline-6.2/examples/Makefile.in, readline-6.2/examples/excallback.c, readline-6.2/examples/fileman.c, readline-6.2/examples/histexamp.c, readline-6.2/examples/manexamp.c, readline-6.2/examples/readlinebuf.h, readline-6.2/examples/rl-fgets.c, readline-6.2/examples/rl.c, readline-6.2/examples/rlcat.c, readline-6.2/examples/rlevent.c, readline-6.2/examples/rlptytest.c, readline-6.2/examples/rltest.c, readline-6.2/examples/rlversion.c, readline-6.2/examples/rlwrap-0.30.tar.gz, readline-6.2/examples/autoconf/BASH_CHECK_LIB_TERMCAP, readline-6.2/examples/autoconf/RL_LIB_READLINE_VERSION, readline-6.2/examples/autoconf/wi_LIB_READLINE, readline-6.2/examples/rlfe/ChangeLog, readline-6.2/examples/rlfe/Makefile.in, readline-6.2/examples/rlfe/README, readline-6.2/examples/rlfe/config.h.in, readline-6.2/examples/rlfe/configure, readline-6.2/examples/rlfe/configure.in, readline-6.2/examples/rlfe/extern.h, readline-6.2/examples/rlfe/os.h, readline-6.2/examples/rlfe/pty.c, readline-6.2/examples/rlfe/rlfe.c, readline-6.2/examples/rlfe/screen.h, readline-6.2/shlib/Makefile.in, readline-6.2/support/config.guess, readline-6.2/support/config.rpath, readline-6.2/support/config.sub, readline-6.2/support/install.sh, readline-6.2/support/mkdirs, readline-6.2/support/mkdist, readline-6.2/support/mkinstalldirs, readline-6.2/support/shlib-install, readline-6.2/support/shobj-conf, readline-6.2/support/wcwidth.c: New files.
Diffstat (limited to 'readline-6.2/macro.c')
-rw-r--r--readline-6.2/macro.c271
1 files changed, 271 insertions, 0 deletions
diff --git a/readline-6.2/macro.c b/readline-6.2/macro.c
new file mode 100644
index 0000000..c2fac8a
--- /dev/null
+++ b/readline-6.2/macro.c
@@ -0,0 +1,271 @@
+/* macro.c -- keyboard macros for readline. */
+
+/* Copyright (C) 1994-2009 Free Software Foundation, Inc.
+
+ This file is part of the GNU Readline Library (Readline), a library
+ for reading lines of text with interactive input and history editing.
+
+ Readline is free software: you can redistribute it and/or modify
+ it under the terms of the GNU General Public License as published by
+ the Free Software Foundation, either version 3 of the License, or
+ (at your option) any later version.
+
+ Readline is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ GNU General Public License for more details.
+
+ You should have received a copy of the GNU General Public License
+ along with Readline. If not, see <http://www.gnu.org/licenses/>.
+*/
+
+#define READLINE_LIBRARY
+
+#if defined (HAVE_CONFIG_H)
+# include <config.h>
+#endif
+
+#include <sys/types.h>
+
+#if defined (HAVE_UNISTD_H)
+# include <unistd.h> /* for _POSIX_VERSION */
+#endif /* HAVE_UNISTD_H */
+
+#if defined (HAVE_STDLIB_H)
+# include <stdlib.h>
+#else
+# include "ansi_stdlib.h"
+#endif /* HAVE_STDLIB_H */
+
+#include <stdio.h>
+
+/* System-specific feature definitions and include files. */
+#include "rldefs.h"
+
+/* Some standard library routines. */
+#include "readline.h"
+#include "history.h"
+
+#include "rlprivate.h"
+#include "xmalloc.h"
+
+/* **************************************************************** */
+/* */
+/* Hacking Keyboard Macros */
+/* */
+/* **************************************************************** */
+
+/* The currently executing macro string. If this is non-zero,
+ then it is a malloc ()'ed string where input is coming from. */
+char *rl_executing_macro = (char *)NULL;
+
+/* The offset in the above string to the next character to be read. */
+static int executing_macro_index;
+
+/* The current macro string being built. Characters get stuffed
+ in here by add_macro_char (). */
+static char *current_macro = (char *)NULL;
+
+/* The size of the buffer allocated to current_macro. */
+static int current_macro_size;
+
+/* The index at which characters are being added to current_macro. */
+static int current_macro_index;
+
+/* A structure used to save nested macro strings.
+ It is a linked list of string/index for each saved macro. */
+struct saved_macro {
+ struct saved_macro *next;
+ char *string;
+ int sindex;
+};
+
+/* The list of saved macros. */
+static struct saved_macro *macro_list = (struct saved_macro *)NULL;
+
+/* Set up to read subsequent input from STRING.
+ STRING is free ()'ed when we are done with it. */
+void
+_rl_with_macro_input (string)
+ char *string;
+{
+ _rl_push_executing_macro ();
+ rl_executing_macro = string;
+ executing_macro_index = 0;
+ RL_SETSTATE(RL_STATE_MACROINPUT);
+}
+
+/* Return the next character available from a macro, or 0 if
+ there are no macro characters. */
+int
+_rl_next_macro_key ()
+{
+ int c;
+
+ if (rl_executing_macro == 0)
+ return (0);
+
+ if (rl_executing_macro[executing_macro_index] == 0)
+ {
+ _rl_pop_executing_macro ();
+ return (_rl_next_macro_key ());
+ }
+
+#if defined (READLINE_CALLBACKS)
+ c = rl_executing_macro[executing_macro_index++];
+ if (RL_ISSTATE (RL_STATE_CALLBACK) && RL_ISSTATE (RL_STATE_READCMD|RL_STATE_MOREINPUT) && rl_executing_macro[executing_macro_index] == 0)
+ _rl_pop_executing_macro ();
+ return c;
+#else
+ return (rl_executing_macro[executing_macro_index++]);
+#endif
+}
+
+/* Save the currently executing macro on a stack of saved macros. */
+void
+_rl_push_executing_macro ()
+{
+ struct saved_macro *saver;
+
+ saver = (struct saved_macro *)xmalloc (sizeof (struct saved_macro));
+ saver->next = macro_list;
+ saver->sindex = executing_macro_index;
+ saver->string = rl_executing_macro;
+
+ macro_list = saver;
+}
+
+/* Discard the current macro, replacing it with the one
+ on the top of the stack of saved macros. */
+void
+_rl_pop_executing_macro ()
+{
+ struct saved_macro *macro;
+
+ FREE (rl_executing_macro);
+ rl_executing_macro = (char *)NULL;
+ executing_macro_index = 0;
+
+ if (macro_list)
+ {
+ macro = macro_list;
+ rl_executing_macro = macro_list->string;
+ executing_macro_index = macro_list->sindex;
+ macro_list = macro_list->next;
+ xfree (macro);
+ }
+
+ if (rl_executing_macro == 0)
+ RL_UNSETSTATE(RL_STATE_MACROINPUT);
+}
+
+/* Add a character to the macro being built. */
+void
+_rl_add_macro_char (c)
+ int c;
+{
+ if (current_macro_index + 1 >= current_macro_size)
+ {
+ if (current_macro == 0)
+ current_macro = (char *)xmalloc (current_macro_size = 25);
+ else
+ current_macro = (char *)xrealloc (current_macro, current_macro_size += 25);
+ }
+
+ current_macro[current_macro_index++] = c;
+ current_macro[current_macro_index] = '\0';
+}
+
+void
+_rl_kill_kbd_macro ()
+{
+ if (current_macro)
+ {
+ xfree (current_macro);
+ current_macro = (char *) NULL;
+ }
+ current_macro_size = current_macro_index = 0;
+
+ FREE (rl_executing_macro);
+ rl_executing_macro = (char *) NULL;
+ executing_macro_index = 0;
+
+ RL_UNSETSTATE(RL_STATE_MACRODEF);
+}
+
+/* Begin defining a keyboard macro.
+ Keystrokes are recorded as they are executed.
+ End the definition with rl_end_kbd_macro ().
+ If a numeric argument was explicitly typed, then append this
+ definition to the end of the existing macro, and start by
+ re-executing the existing macro. */
+int
+rl_start_kbd_macro (ignore1, ignore2)
+ int ignore1, ignore2;
+{
+ if (RL_ISSTATE (RL_STATE_MACRODEF))
+ {
+ _rl_abort_internal ();
+ return -1;
+ }
+
+ if (rl_explicit_arg)
+ {
+ if (current_macro)
+ _rl_with_macro_input (savestring (current_macro));
+ }
+ else
+ current_macro_index = 0;
+
+ RL_SETSTATE(RL_STATE_MACRODEF);
+ return 0;
+}
+
+/* Stop defining a keyboard macro.
+ A numeric argument says to execute the macro right now,
+ that many times, counting the definition as the first time. */
+int
+rl_end_kbd_macro (count, ignore)
+ int count, ignore;
+{
+ if (RL_ISSTATE (RL_STATE_MACRODEF) == 0)
+ {
+ _rl_abort_internal ();
+ return -1;
+ }
+
+ current_macro_index -= rl_key_sequence_length - 1;
+ current_macro[current_macro_index] = '\0';
+
+ RL_UNSETSTATE(RL_STATE_MACRODEF);
+
+ return (rl_call_last_kbd_macro (--count, 0));
+}
+
+/* Execute the most recently defined keyboard macro.
+ COUNT says how many times to execute it. */
+int
+rl_call_last_kbd_macro (count, ignore)
+ int count, ignore;
+{
+ if (current_macro == 0)
+ _rl_abort_internal ();
+
+ if (RL_ISSTATE (RL_STATE_MACRODEF))
+ {
+ rl_ding (); /* no recursive macros */
+ current_macro[--current_macro_index] = '\0'; /* erase this char */
+ return 0;
+ }
+
+ while (count--)
+ _rl_with_macro_input (savestring (current_macro));
+ return 0;
+}
+
+void
+rl_push_macro_input (macro)
+ char *macro;
+{
+ _rl_with_macro_input (macro);
+}