1 /* readline.c -- a general facility for reading lines of input
2 with emacs style editing and completion. */
4 /* Copyright (C) 1987, 1989, 1992, 2006 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 2, 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 59 Temple Place, Suite 330, Boston, MA 02111 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 */
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;
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)
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. */