1 /* readline.c -- a general facility for reading lines of input
2 with emacs style editing and completion. */
4 /* Copyright (C) 1987-2009 Free Software Foundation, Inc.
6 This file is part of the GNU Readline Library (Readline), a library
7 for reading lines of text with interactive input and history editing.
9 Readline is free software: you can redistribute it and/or modify
10 it under the terms of the GNU General Public License as published by
11 the Free Software Foundation, either version 3 of the License, or
12 (at your option) any later version.
14 Readline is distributed in the hope that it will be useful,
15 but WITHOUT ANY WARRANTY; without even the implied warranty of
16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 GNU General Public License for more details.
19 You should have received a copy of the GNU General Public License
20 along with Readline. If not, see <http://www.gnu.org/licenses/>.
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 */
43 /* System-specific feature definitions and include files. */
46 /* Some standard library routines. */
50 #include "rlprivate.h"
53 extern void replace_history_data PARAMS((int, histdata_t *, histdata_t *));
55 /* Non-zero tells rl_delete_text and rl_insert_text to not add to
57 int _rl_doing_an_undo = 0;
59 /* How many unclosed undo groups we currently have. */
60 int _rl_undo_group_level = 0;
62 /* The current undo list for THE_LINE. */
63 UNDO_LIST *rl_undo_list = (UNDO_LIST *)NULL;
65 /* **************************************************************** */
67 /* Undo, and Undoing */
69 /* **************************************************************** */
72 alloc_undo_entry (what, start, end, text)
79 temp = (UNDO_LIST *)xmalloc (sizeof (UNDO_LIST));
85 temp->next = (UNDO_LIST *)NULL;
89 /* Remember how to undo something. Concatenate some undos if that
92 rl_add_undo (what, start, end, text)
99 temp = alloc_undo_entry (what, start, end, text);
100 temp->next = rl_undo_list;
104 /* Free the existing undo list. */
108 UNDO_LIST *release, *orig_list;
110 orig_list = rl_undo_list;
113 release = rl_undo_list;
114 rl_undo_list = rl_undo_list->next;
116 if (release->what == UNDO_DELETE)
117 free (release->text);
121 rl_undo_list = (UNDO_LIST *)NULL;
122 replace_history_data (-1, (histdata_t *)orig_list, (histdata_t *)NULL);
126 _rl_copy_undo_entry (entry)
131 new = alloc_undo_entry (entry->what, entry->start, entry->end, (char *)NULL);
132 new->text = entry->text ? savestring (entry->text) : 0;
137 _rl_copy_undo_list (head)
140 UNDO_LIST *list, *new, *roving, *c;
146 c = _rl_copy_undo_entry (list);
152 roving = roving->next;
161 /* Undo the next thing in the list. Return 0 if there
162 is nothing to undo, or non-zero if there was. */
167 int waiting_for_begin, start, end;
169 #define TRANS(i) ((i) == -1 ? rl_point : ((i) == -2 ? rl_end : (i)))
171 start = end = waiting_for_begin = 0;
174 if (rl_undo_list == 0)
177 _rl_doing_an_undo = 1;
178 RL_SETSTATE(RL_STATE_UNDOING);
180 /* To better support vi-mode, a start or end value of -1 means
181 rl_point, and a value of -2 means rl_end. */
182 if (rl_undo_list->what == UNDO_DELETE || rl_undo_list->what == UNDO_INSERT)
184 start = TRANS (rl_undo_list->start);
185 end = TRANS (rl_undo_list->end);
188 switch (rl_undo_list->what)
190 /* Undoing deletes means inserting some text. */
193 rl_insert_text (rl_undo_list->text);
194 free (rl_undo_list->text);
197 /* Undoing inserts means deleting some text. */
199 rl_delete_text (start, end);
203 /* Undoing an END means undoing everything 'til we get to a BEGIN. */
208 /* Undoing a BEGIN means that we are done with this group. */
210 if (waiting_for_begin)
217 _rl_doing_an_undo = 0;
218 RL_UNSETSTATE(RL_STATE_UNDOING);
220 release = rl_undo_list;
221 rl_undo_list = rl_undo_list->next;
222 replace_history_data (-1, (histdata_t *)release, (histdata_t *)rl_undo_list);
226 while (waiting_for_begin);
233 _rl_fix_last_undo_of_type (type, start, end)
234 int type, start, end;
238 for (rl = rl_undo_list; rl; rl = rl->next)
240 if (rl->what == type)
250 /* Begin a group. Subsequent undos are undone as an atomic operation. */
252 rl_begin_undo_group ()
254 rl_add_undo (UNDO_BEGIN, 0, 0, 0);
255 _rl_undo_group_level++;
259 /* End an undo group started with rl_begin_undo_group (). */
263 rl_add_undo (UNDO_END, 0, 0, 0);
264 _rl_undo_group_level--;
268 /* Save an undo entry for the text from START to END. */
270 rl_modifying (start, end)
280 char *temp = rl_copy_text (start, end);
281 rl_begin_undo_group ();
282 rl_add_undo (UNDO_DELETE, start, end, temp);
283 rl_add_undo (UNDO_INSERT, start, end, (char *)NULL);
284 rl_end_undo_group ();
289 /* Revert the current line to its previous state. */
291 rl_revert_line (count, key)
294 if (rl_undo_list == 0)
300 #if defined (VI_MODE)
301 if (rl_editing_mode == vi_mode)
302 rl_point = rl_mark = 0; /* rl_end should be set correctly */
309 /* Do some undoing of things that were done. */
311 rl_undo_command (count, key)
315 return 0; /* Nothing to do. */