1 /* readline.c -- a general facility for reading lines of input
2 with emacs style editing and completion. */
4 /* Copyright (C) 1987, 1989, 1992 Free Software Foundation, Inc.
6 This file is part of the GNU Readline Library, a library for
7 reading lines of text with interactive input and history editing.
9 The GNU Readline Library is free software; you can redistribute it
10 and/or modify it under the terms of the GNU General Public License
11 as published by the Free Software Foundation; either version 1, or
12 (at your option) any later version.
14 The GNU Readline Library is distributed in the hope that it will be
15 useful, but WITHOUT ANY WARRANTY; without even the implied warranty
16 of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 GNU General Public License for more details.
19 The GNU General Public License is often shipped with GNU software, and
20 is generally kept in a file called COPYING or LICENSE. If you do not
21 have a copy of the license, write to the Free Software Foundation,
22 675 Mass Ave, Cambridge, MA 02139, USA. */
23 #define READLINE_LIBRARY
25 #if defined (HAVE_CONFIG_H)
29 #include <sys/types.h>
31 #if defined (HAVE_UNISTD_H)
32 # include <unistd.h> /* for _POSIX_VERSION */
33 #endif /* HAVE_UNISTD_H */
35 #if defined (HAVE_STDLIB_H)
38 # include "ansi_stdlib.h"
39 #endif /* HAVE_STDLIB_H */
44 /* System-specific feature definitions and include files. */
47 /* Some standard library routines. */
51 #define SWAP(s, e) do { int t; t = s; s = e; e = t; } while (0)
53 /* Non-zero tells rl_delete_text and rl_insert_text to not add to
55 int _rl_doing_an_undo = 0;
57 /* How many unclosed undo groups we currently have. */
58 int _rl_undo_group_level = 0;
60 /* The current undo list for THE_LINE. */
61 UNDO_LIST *rl_undo_list = (UNDO_LIST *)NULL;
63 /* **************************************************************** */
65 /* Undo, and Undoing */
67 /* **************************************************************** */
69 /* Remember how to undo something. Concatenate some undos if that
72 rl_add_undo (what, start, end, text)
77 UNDO_LIST *temp = (UNDO_LIST *)xmalloc (sizeof (UNDO_LIST));
82 temp->next = rl_undo_list;
86 /* Free the existing undo list. */
92 UNDO_LIST *release = rl_undo_list;
93 rl_undo_list = rl_undo_list->next;
95 if (release->what == UNDO_DELETE)
100 rl_undo_list = (UNDO_LIST *)NULL;
103 /* Undo the next thing in the list. Return 0 if there
104 is nothing to undo, or non-zero if there was. */
109 int waiting_for_begin = 0;
112 #define TRANS(i) ((i) == -1 ? rl_point : ((i) == -2 ? rl_end : (i)))
119 _rl_doing_an_undo = 1;
121 /* To better support vi-mode, a start or end value of -1 means
122 rl_point, and a value of -2 means rl_end. */
123 if (rl_undo_list->what == UNDO_DELETE || rl_undo_list->what == UNDO_INSERT)
125 start = TRANS (rl_undo_list->start);
126 end = TRANS (rl_undo_list->end);
129 switch (rl_undo_list->what)
131 /* Undoing deletes means inserting some text. */
134 rl_insert_text (rl_undo_list->text);
135 free (rl_undo_list->text);
138 /* Undoing inserts means deleting some text. */
140 rl_delete_text (start, end);
144 /* Undoing an END means undoing everything 'til we get to a BEGIN. */
149 /* Undoing a BEGIN means that we are done with this group. */
151 if (waiting_for_begin)
158 _rl_doing_an_undo = 0;
160 release = rl_undo_list;
161 rl_undo_list = rl_undo_list->next;
164 while (waiting_for_begin);
171 _rl_fix_last_undo_of_type (type, start, end)
172 int type, start, end;
176 for (rl = rl_undo_list; rl; rl = rl->next)
178 if (rl->what == type)
188 /* Begin a group. Subsequent undos are undone as an atomic operation. */
190 rl_begin_undo_group ()
192 rl_add_undo (UNDO_BEGIN, 0, 0, 0);
193 _rl_undo_group_level++;
197 /* End an undo group started with rl_begin_undo_group (). */
201 rl_add_undo (UNDO_END, 0, 0, 0);
202 _rl_undo_group_level--;
206 /* Save an undo entry for the text from START to END. */
208 rl_modifying (start, end)
218 char *temp = rl_copy_text (start, end);
219 rl_begin_undo_group ();
220 rl_add_undo (UNDO_DELETE, start, end, temp);
221 rl_add_undo (UNDO_INSERT, start, end, (char *)NULL);
222 rl_end_undo_group ();
227 /* Revert the current line to its previous state. */
229 rl_revert_line (count, key)
242 /* Do some undoing of things that were done. */
244 rl_undo_command (count, key)
248 return 0; /* Nothing to do. */