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 xfree (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
;
149 c
= _rl_copy_undo_entry (list
);
155 roving
= roving
->next
;
164 /* Undo the next thing in the list. Return 0 if there
165 is nothing to undo, or non-zero if there was. */
170 int waiting_for_begin
, start
, end
;
172 #define TRANS(i) ((i) == -1 ? rl_point : ((i) == -2 ? rl_end : (i)))
174 start
= end
= waiting_for_begin
= 0;
177 if (rl_undo_list
== 0)
180 _rl_doing_an_undo
= 1;
181 RL_SETSTATE(RL_STATE_UNDOING
);
183 /* To better support vi-mode, a start or end value of -1 means
184 rl_point, and a value of -2 means rl_end. */
185 if (rl_undo_list
->what
== UNDO_DELETE
|| rl_undo_list
->what
== UNDO_INSERT
)
187 start
= TRANS (rl_undo_list
->start
);
188 end
= TRANS (rl_undo_list
->end
);
191 switch (rl_undo_list
->what
)
193 /* Undoing deletes means inserting some text. */
196 rl_insert_text (rl_undo_list
->text
);
197 xfree (rl_undo_list
->text
);
200 /* Undoing inserts means deleting some text. */
202 rl_delete_text (start
, end
);
206 /* Undoing an END means undoing everything 'til we get to a BEGIN. */
211 /* Undoing a BEGIN means that we are done with this group. */
213 if (waiting_for_begin
)
220 _rl_doing_an_undo
= 0;
221 RL_UNSETSTATE(RL_STATE_UNDOING
);
223 release
= rl_undo_list
;
224 rl_undo_list
= rl_undo_list
->next
;
225 replace_history_data (-1, (histdata_t
*)release
, (histdata_t
*)rl_undo_list
);
229 while (waiting_for_begin
);
236 _rl_fix_last_undo_of_type (type
, start
, end
)
237 int type
, start
, end
;
241 for (rl
= rl_undo_list
; rl
; rl
= rl
->next
)
243 if (rl
->what
== type
)
253 /* Begin a group. Subsequent undos are undone as an atomic operation. */
255 rl_begin_undo_group ()
257 rl_add_undo (UNDO_BEGIN
, 0, 0, 0);
258 _rl_undo_group_level
++;
262 /* End an undo group started with rl_begin_undo_group (). */
266 rl_add_undo (UNDO_END
, 0, 0, 0);
267 _rl_undo_group_level
--;
271 /* Save an undo entry for the text from START to END. */
273 rl_modifying (start
, end
)
283 char *temp
= rl_copy_text (start
, end
);
284 rl_begin_undo_group ();
285 rl_add_undo (UNDO_DELETE
, start
, end
, temp
);
286 rl_add_undo (UNDO_INSERT
, start
, end
, (char *)NULL
);
287 rl_end_undo_group ();
292 /* Revert the current line to its previous state. */
294 rl_revert_line (count
, key
)
297 if (rl_undo_list
== 0)
303 #if defined (VI_MODE)
304 if (rl_editing_mode
== vi_mode
)
305 rl_point
= rl_mark
= 0; /* rl_end should be set correctly */
312 /* Do some undoing of things that were done. */
314 rl_undo_command (count
, key
)
318 return 0; /* Nothing to do. */
This page took 0.036664 seconds and 4 git commands to generate.