Commit f0bccc62 authored by unknown's avatar unknown

Merge mysqldev@production.mysql.com:jimw/mysql-5.0-readline

into  mysql.com:/home/jimw/my/mysql-5.0-readline
parents 67f4acba 82474fa9
Basic Installation Basic Installation
================== ==================
These are installation instructions for Readline-4.3. These are installation instructions for Readline-5.0.
The simplest way to compile readline is: The simplest way to compile readline is:
......
...@@ -17,7 +17,8 @@ libreadline_a_SOURCES = readline.c funmap.c keymaps.c \ ...@@ -17,7 +17,8 @@ libreadline_a_SOURCES = readline.c funmap.c keymaps.c \
callback.c terminal.c xmalloc.c \ callback.c terminal.c xmalloc.c \
history.c histsearch.c histexpand.c \ history.c histsearch.c histexpand.c \
histfile.c nls.c search.c \ histfile.c nls.c search.c \
shell.c tilde.c misc.c text.c mbutil.c shell.c tilde.c misc.c text.c mbutil.c \
compat.c savestring.c
pkginclude_HEADERS = readline.h chardefs.h keymaps.h \ pkginclude_HEADERS = readline.h chardefs.h keymaps.h \
history.h tilde.h rlmbutil.h rltypedefs.h rlprivate.h \ history.h tilde.h rlmbutil.h rltypedefs.h rlprivate.h \
......
Introduction Introduction
============ ============
This is the Gnu Readline library, version 4.3. This is the Gnu Readline library, version 5.0.
The Readline library provides a set of functions for use by applications The Readline library provides a set of functions for use by applications
that allow users to edit command lines as they are typed in. Both that allow users to edit command lines as they are typed in. Both
......
...@@ -19,8 +19,13 @@ ...@@ -19,8 +19,13 @@
is generally kept in a file called COPYING or LICENSE. If you do not is generally kept in a file called COPYING or LICENSE. If you do not
have a copy of the license, write to the Free Software Foundation, have a copy of the license, write to the Free Software Foundation,
59 Temple Place, Suite 330, Boston, MA 02111 USA. */ 59 Temple Place, Suite 330, Boston, MA 02111 USA. */
#define READLINE_LIBRARY #define READLINE_LIBRARY
#if defined (__TANDEM)
# include <floss.h>
#endif
#include "config_readline.h" #include "config_readline.h"
#include <stdio.h> #include <stdio.h>
...@@ -146,6 +151,34 @@ rl_bind_key_in_map (key, function, map) ...@@ -146,6 +151,34 @@ rl_bind_key_in_map (key, function, map)
return (result); return (result);
} }
/* Bind key sequence KEYSEQ to DEFAULT_FUNC if KEYSEQ is unbound. Right
now, this is always used to attempt to bind the arrow keys, hence the
check for rl_vi_movement_mode. */
int
rl_bind_key_if_unbound_in_map (key, default_func, kmap)
int key;
rl_command_func_t *default_func;
Keymap kmap;
{
char keyseq[2];
keyseq[0] = (unsigned char)key;
keyseq[1] = '\0';
return (rl_bind_keyseq_if_unbound_in_map (keyseq, default_func, kmap));
}
int
rl_bind_key_if_unbound (key, default_func)
int key;
rl_command_func_t *default_func;
{
char keyseq[2];
keyseq[0] = (unsigned char)key;
keyseq[1] = '\0';
return (rl_bind_keyseq_if_unbound_in_map (keyseq, default_func, _rl_keymap));
}
/* Make KEY do nothing in the currently selected keymap. /* Make KEY do nothing in the currently selected keymap.
Returns non-zero in case of error. */ Returns non-zero in case of error. */
int int
...@@ -197,10 +230,31 @@ rl_unbind_command_in_map (command, map) ...@@ -197,10 +230,31 @@ rl_unbind_command_in_map (command, map)
return (rl_unbind_function_in_map (func, map)); return (rl_unbind_function_in_map (func, map));
} }
/* Bind the key sequence represented by the string KEYSEQ to
FUNCTION, starting in the current keymap. This makes new
keymaps as necessary. */
int
rl_bind_keyseq (keyseq, function)
const char *keyseq;
rl_command_func_t *function;
{
return (rl_generic_bind (ISFUNC, keyseq, (char *)function, _rl_keymap));
}
/* Bind the key sequence represented by the string KEYSEQ to /* Bind the key sequence represented by the string KEYSEQ to
FUNCTION. This makes new keymaps as necessary. The initial FUNCTION. This makes new keymaps as necessary. The initial
place to do bindings is in MAP. */ place to do bindings is in MAP. */
int int
rl_bind_keyseq_in_map (keyseq, function, map)
const char *keyseq;
rl_command_func_t *function;
Keymap map;
{
return (rl_generic_bind (ISFUNC, keyseq, (char *)function, map));
}
/* Backwards compatibility; equivalent to rl_bind_keyseq_in_map() */
int
rl_set_key (keyseq, function, map) rl_set_key (keyseq, function, map)
const char *keyseq; const char *keyseq;
rl_command_func_t *function; rl_command_func_t *function;
...@@ -209,6 +263,40 @@ rl_set_key (keyseq, function, map) ...@@ -209,6 +263,40 @@ rl_set_key (keyseq, function, map)
return (rl_generic_bind (ISFUNC, keyseq, (char *)function, map)); return (rl_generic_bind (ISFUNC, keyseq, (char *)function, map));
} }
/* Bind key sequence KEYSEQ to DEFAULT_FUNC if KEYSEQ is unbound. Right
now, this is always used to attempt to bind the arrow keys, hence the
check for rl_vi_movement_mode. */
int
rl_bind_keyseq_if_unbound_in_map (keyseq, default_func, kmap)
const char *keyseq;
rl_command_func_t *default_func;
Keymap kmap;
{
rl_command_func_t *func;
if (keyseq)
{
func = rl_function_of_keyseq (keyseq, kmap, (int *)NULL);
#if defined (VI_MODE)
if (!func || func == rl_do_lowercase_version || func == rl_vi_movement_mode)
#else
if (!func || func == rl_do_lowercase_version)
#endif
return (rl_bind_keyseq_in_map (keyseq, default_func, kmap));
else
return 1;
}
return 0;
}
int
rl_bind_keyseq_if_unbound (keyseq, default_func)
const char *keyseq;
rl_command_func_t *default_func;
{
return (rl_bind_keyseq_if_unbound_in_map (keyseq, default_func, _rl_keymap));
}
/* Bind the key sequence represented by the string KEYSEQ to /* Bind the key sequence represented by the string KEYSEQ to
the string of characters MACRO. This makes new keymaps as the string of characters MACRO. This makes new keymaps as
necessary. The initial place to do bindings is in MAP. */ necessary. The initial place to do bindings is in MAP. */
...@@ -346,7 +434,7 @@ rl_translate_keyseq (seq, array, len) ...@@ -346,7 +434,7 @@ rl_translate_keyseq (seq, array, len)
{ {
register int i, c, l, temp; register int i, c, l, temp;
for (i = l = 0; (c = seq[i]); i++) for (i = l = 0; c = seq[i]; i++)
{ {
if (c == '\\') if (c == '\\')
{ {
...@@ -678,7 +766,7 @@ _rl_read_file (filename, sizep) ...@@ -678,7 +766,7 @@ _rl_read_file (filename, sizep)
/* Re-read the current keybindings file. */ /* Re-read the current keybindings file. */
int int
rl_re_read_init_file (count, ignore) rl_re_read_init_file (count, ignore)
int count __attribute__((unused)), ignore __attribute__((unused)); int count, ignore;
{ {
int r; int r;
r = rl_read_init_file ((const char *)NULL); r = rl_read_init_file ((const char *)NULL);
...@@ -900,7 +988,7 @@ parser_if (args) ...@@ -900,7 +988,7 @@ parser_if (args)
/* Invert the current parser state if there is anything on the stack. */ /* Invert the current parser state if there is anything on the stack. */
static int static int
parser_else (args) parser_else (args)
char *args __attribute__((unused)); char *args;
{ {
register int i; register int i;
...@@ -910,9 +998,15 @@ parser_else (args) ...@@ -910,9 +998,15 @@ parser_else (args)
return 0; return 0;
} }
#if 0
/* Check the previous (n - 1) levels of the stack to make sure that /* Check the previous (n - 1) levels of the stack to make sure that
we haven't previously turned off parsing. */ we haven't previously turned off parsing. */
for (i = 0; i < if_stack_depth - 1; i++) for (i = 0; i < if_stack_depth - 1; i++)
#else
/* Check the previous (n) levels of the stack to make sure that
we haven't previously turned off parsing. */
for (i = 0; i < if_stack_depth; i++)
#endif
if (if_stack[i] == 1) if (if_stack[i] == 1)
return 0; return 0;
...@@ -925,7 +1019,7 @@ parser_else (args) ...@@ -925,7 +1019,7 @@ parser_else (args)
_rl_parsing_conditionalized_out from the stack. */ _rl_parsing_conditionalized_out from the stack. */
static int static int
parser_endif (args) parser_endif (args)
char *args __attribute__((unused)); char *args;
{ {
if (if_stack_depth) if (if_stack_depth)
_rl_parsing_conditionalized_out = if_stack[--if_stack_depth]; _rl_parsing_conditionalized_out = if_stack[--if_stack_depth];
...@@ -1048,7 +1142,7 @@ rl_parse_and_bind (string) ...@@ -1048,7 +1142,7 @@ rl_parse_and_bind (string)
{ {
int passc = 0; int passc = 0;
for (i = 1; (c = string[i]); i++) for (i = 1; c = string[i]; i++)
{ {
if (passc) if (passc)
{ {
...@@ -1124,7 +1218,7 @@ rl_parse_and_bind (string) ...@@ -1124,7 +1218,7 @@ rl_parse_and_bind (string)
{ {
int delimiter = string[i++], passc; int delimiter = string[i++], passc;
for (passc = 0; (c = string[i]); i++) for (passc = 0; c = string[i]; i++)
{ {
if (passc) if (passc)
{ {
...@@ -1159,7 +1253,7 @@ rl_parse_and_bind (string) ...@@ -1159,7 +1253,7 @@ rl_parse_and_bind (string)
} }
/* If this is a new-style key-binding, then do the binding with /* If this is a new-style key-binding, then do the binding with
rl_set_key (). Otherwise, let the older code deal with it. */ rl_bind_keyseq (). Otherwise, let the older code deal with it. */
if (*string == '"') if (*string == '"')
{ {
char *seq; char *seq;
...@@ -1198,7 +1292,7 @@ rl_parse_and_bind (string) ...@@ -1198,7 +1292,7 @@ rl_parse_and_bind (string)
rl_macro_bind (seq, &funname[1], _rl_keymap); rl_macro_bind (seq, &funname[1], _rl_keymap);
} }
else else
rl_set_key (seq, rl_named_function (funname), _rl_keymap); rl_bind_keyseq (seq, rl_named_function (funname));
free (seq); free (seq);
return 0; return 0;
...@@ -1279,10 +1373,11 @@ static struct { ...@@ -1279,10 +1373,11 @@ static struct {
{ "prefer-visible-bell", &_rl_prefer_visible_bell, V_SPECIAL }, { "prefer-visible-bell", &_rl_prefer_visible_bell, V_SPECIAL },
{ "print-completions-horizontally", &_rl_print_completions_horizontally, 0 }, { "print-completions-horizontally", &_rl_print_completions_horizontally, 0 },
{ "show-all-if-ambiguous", &_rl_complete_show_all, 0 }, { "show-all-if-ambiguous", &_rl_complete_show_all, 0 },
{ "show-all-if-unmodified", &_rl_complete_show_unmodified, 0 },
#if defined (VISIBLE_STATS) #if defined (VISIBLE_STATS)
{ "visible-stats", &rl_visible_stats, 0 }, { "visible-stats", &rl_visible_stats, 0 },
#endif /* VISIBLE_STATS */ #endif /* VISIBLE_STATS */
{ (char *)NULL, (int *)NULL, 0 } { (char *)NULL, (int *)NULL }
}; };
static int static int
...@@ -1351,7 +1446,7 @@ static struct { ...@@ -1351,7 +1446,7 @@ static struct {
{ "editing-mode", V_STRING, sv_editmode }, { "editing-mode", V_STRING, sv_editmode },
{ "isearch-terminators", V_STRING, sv_isrchterm }, { "isearch-terminators", V_STRING, sv_isrchterm },
{ "keymap", V_STRING, sv_keymap }, { "keymap", V_STRING, sv_keymap },
{ (char *)NULL, 0, 0 } { (char *)NULL, 0 }
}; };
static int static int
...@@ -1626,8 +1721,7 @@ rl_set_keymap_from_edit_mode () ...@@ -1626,8 +1721,7 @@ rl_set_keymap_from_edit_mode ()
#endif /* VI_MODE */ #endif /* VI_MODE */
} }
char *
const char *
rl_get_keymap_name_from_edit_mode () rl_get_keymap_name_from_edit_mode ()
{ {
if (rl_editing_mode == emacs_mode) if (rl_editing_mode == emacs_mode)
...@@ -1637,7 +1731,7 @@ rl_get_keymap_name_from_edit_mode () ...@@ -1637,7 +1731,7 @@ rl_get_keymap_name_from_edit_mode ()
return "vi"; return "vi";
#endif /* VI_MODE */ #endif /* VI_MODE */
else else
return "nope"; return "none";
} }
/* **************************************************************** */ /* **************************************************************** */
...@@ -1649,7 +1743,7 @@ rl_get_keymap_name_from_edit_mode () ...@@ -1649,7 +1743,7 @@ rl_get_keymap_name_from_edit_mode ()
/* Each of the following functions produces information about the /* Each of the following functions produces information about the
state of keybindings and functions known to Readline. The info state of keybindings and functions known to Readline. The info
is always printed to rl_outstream, and in such a way that it can is always printed to rl_outstream, and in such a way that it can
be read back in (i.e., passed to rl_parse_and_bind (). */ be read back in (i.e., passed to rl_parse_and_bind ()). */
/* Print the names of functions known to Readline. */ /* Print the names of functions known to Readline. */
void void
...@@ -1872,7 +1966,7 @@ rl_function_dumper (print_readably) ...@@ -1872,7 +1966,7 @@ rl_function_dumper (print_readably)
fprintf (rl_outstream, "\n"); fprintf (rl_outstream, "\n");
for (i = 0; (name = names[i]); i++) for (i = 0; name = names[i]; i++)
{ {
rl_command_func_t *function; rl_command_func_t *function;
char **invokers; char **invokers;
...@@ -1932,7 +2026,7 @@ rl_function_dumper (print_readably) ...@@ -1932,7 +2026,7 @@ rl_function_dumper (print_readably)
the output in such a way that it can be read back in. */ the output in such a way that it can be read back in. */
int int
rl_dump_functions (count, key) rl_dump_functions (count, key)
int count __attribute__((unused)), key __attribute__((unused)); int count, key;
{ {
if (rl_dispatching) if (rl_dispatching)
fprintf (rl_outstream, "\r\n"); fprintf (rl_outstream, "\r\n");
...@@ -2012,7 +2106,7 @@ rl_macro_dumper (print_readably) ...@@ -2012,7 +2106,7 @@ rl_macro_dumper (print_readably)
int int
rl_dump_macros (count, key) rl_dump_macros (count, key)
int count __attribute__((unused)), key __attribute__((unused)); int count, key;
{ {
if (rl_dispatching) if (rl_dispatching)
fprintf (rl_outstream, "\r\n"); fprintf (rl_outstream, "\r\n");
...@@ -2102,7 +2196,7 @@ rl_variable_dumper (print_readably) ...@@ -2102,7 +2196,7 @@ rl_variable_dumper (print_readably)
the output in such a way that it can be read back in. */ the output in such a way that it can be read back in. */
int int
rl_dump_variables (count, key) rl_dump_variables (count, key)
int count __attribute__((unused)), key __attribute__((unused)); int count, key;
{ {
if (rl_dispatching) if (rl_dispatching)
fprintf (rl_outstream, "\r\n"); fprintf (rl_outstream, "\r\n");
...@@ -2111,28 +2205,6 @@ rl_dump_variables (count, key) ...@@ -2111,28 +2205,6 @@ rl_dump_variables (count, key)
return (0); return (0);
} }
/* Bind key sequence KEYSEQ to DEFAULT_FUNC if KEYSEQ is unbound. Right
now, this is always used to attempt to bind the arrow keys, hence the
check for rl_vi_movement_mode. */
void
_rl_bind_if_unbound (keyseq, default_func)
const char *keyseq;
rl_command_func_t *default_func;
{
rl_command_func_t *func;
if (keyseq)
{
func = rl_function_of_keyseq (keyseq, _rl_keymap, (int *)NULL);
#if defined (VI_MODE)
if (!func || func == rl_do_lowercase_version || func == rl_vi_movement_mode)
#else
if (!func || func == rl_do_lowercase_version)
#endif
rl_set_key (keyseq, default_func, _rl_keymap);
}
}
/* Return non-zero if any members of ARRAY are a substring in STRING. */ /* Return non-zero if any members of ARRAY are a substring in STRING. */
static int static int
substring_member_of_array (string, array) substring_member_of_array (string, array)
......
...@@ -129,7 +129,7 @@ rl_callback_read_char () ...@@ -129,7 +129,7 @@ rl_callback_read_char ()
if (in_handler == 0 && rl_linefunc) if (in_handler == 0 && rl_linefunc)
_rl_callback_newline (); _rl_callback_newline ();
} }
if (rl_pending_input) if (rl_pending_input || _rl_pushed_input_available ())
eof = readline_internal_char (); eof = readline_internal_char ();
else else
break; break;
......
...@@ -77,7 +77,11 @@ ...@@ -77,7 +77,11 @@
# define isxdigit(c) (isdigit((c)) || ((c) >= 'a' && (c) <= 'f') || ((c) >= 'A' && (c) <= 'F')) # define isxdigit(c) (isdigit((c)) || ((c) >= 'a' && (c) <= 'f') || ((c) >= 'A' && (c) <= 'F'))
#endif #endif
#define NON_NEGATIVE(c) ((unsigned char)(c) == (c)) #if defined (CTYPE_NON_ASCII)
# define NON_NEGATIVE(c) 1
#else
# define NON_NEGATIVE(c) ((unsigned char)(c) == (c))
#endif
/* Some systems define these; we want our definitions. */ /* Some systems define these; we want our definitions. */
#undef ISPRINT #undef ISPRINT
......
/* compat.c -- backwards compatibility functions. */
/* Copyright (C) 2000 Free Software Foundation, Inc.
This file is part of the GNU Readline Library, a library for
reading lines of text with interactive input and history editing.
The GNU Readline Library 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 2, or
(at your option) any later version.
The GNU Readline Library 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.
The GNU General Public License is often shipped with GNU software, and
is generally kept in a file called COPYING or LICENSE. If you do not
have a copy of the license, write to the Free Software Foundation,
59 Temple Place, Suite 330, Boston, MA 02111 USA. */
#define READLINE_LIBRARY
#include "config_readline.h"
#include <stdio.h>
#include "rlstdc.h"
#include "rltypedefs.h"
extern void rl_free_undo_list PARAMS((void));
extern int rl_maybe_save_line PARAMS((void));
extern int rl_maybe_unsave_line PARAMS((void));
extern int rl_maybe_replace_line PARAMS((void));
extern int rl_crlf PARAMS((void));
extern int rl_ding PARAMS((void));
extern int rl_alphabetic PARAMS((int));
extern char **rl_completion_matches PARAMS((const char *, rl_compentry_func_t *));
extern char *rl_username_completion_function PARAMS((const char *, int));
extern char *rl_filename_completion_function PARAMS((const char *, int));
/* Provide backwards-compatible entry points for old function names. */
void
free_undo_list ()
{
rl_free_undo_list ();
}
int
maybe_replace_line ()
{
return rl_maybe_replace_line ();
}
int
maybe_save_line ()
{
return rl_maybe_save_line ();
}
int
maybe_unsave_line ()
{
return rl_maybe_unsave_line ();
}
int
ding ()
{
return rl_ding ();
}
int
crlf ()
{
return rl_crlf ();
}
int
alphabetic (c)
int c;
{
return rl_alphabetic (c);
}
char **
completion_matches (s, f)
const char *s;
rl_compentry_func_t *f;
{
return rl_completion_matches (s, f);
}
char *
username_completion_function (s, i)
const char *s;
int i;
{
return rl_username_completion_function (s, i);
}
char *
filename_completion_function (s, i)
const char *s;
int i;
{
return rl_filename_completion_function (s, i);
}
This diff is collapsed.
...@@ -4,9 +4,9 @@ dnl ...@@ -4,9 +4,9 @@ dnl
dnl report bugs to chet@po.cwru.edu dnl report bugs to chet@po.cwru.edu
dnl dnl
dnl Process this file with autoconf to produce a configure script. dnl Process this file with autoconf to produce a configure script.
AC_REVISION([for Readline 4.3, version 2.45, from autoconf version] AC_ACVERSION) AC_REVISION([for Readline 5.0, version 2.52, from autoconf version] AC_ACVERSION)
AC_INIT(readline, 4.3, bug-readline@gnu.org) AC_INIT(readline, 5.0-rc1, bug-readline@gnu.org)
dnl make sure we are using a recent autoconf version dnl make sure we are using a recent autoconf version
AC_PREREQ(2.50) AC_PREREQ(2.50)
...@@ -16,7 +16,7 @@ AC_CONFIG_AUX_DIR(./support) ...@@ -16,7 +16,7 @@ AC_CONFIG_AUX_DIR(./support)
AC_CONFIG_HEADERS(config.h) AC_CONFIG_HEADERS(config.h)
dnl update the value of RL_READLINE_VERSION in readline.h when this changes dnl update the value of RL_READLINE_VERSION in readline.h when this changes
LIBVERSION=4.3 LIBVERSION=5.0
AC_CANONICAL_HOST AC_CANONICAL_HOST
...@@ -31,12 +31,18 @@ if test "$opt_curses" = "yes"; then ...@@ -31,12 +31,18 @@ if test "$opt_curses" = "yes"; then
fi fi
dnl option parsing for optional features dnl option parsing for optional features
opt_multibyte=yes
opt_static_libs=yes opt_static_libs=yes
opt_shared_libs=yes opt_shared_libs=yes
AC_ARG_ENABLE(multibyte, AC_HELP_STRING([--enable-multibyte], [enable multibyte characters if OS supports them]), opt_multibyte=$enableval)
AC_ARG_ENABLE(shared, AC_HELP_STRING([--enable-shared], [build shared libraries [[default=YES]]]), opt_shared_libs=$enableval) AC_ARG_ENABLE(shared, AC_HELP_STRING([--enable-shared], [build shared libraries [[default=YES]]]), opt_shared_libs=$enableval)
AC_ARG_ENABLE(static, AC_HELP_STRING([--enable-static], [build static libraries [[default=YES]]]), opt_static_libs=$enableval) AC_ARG_ENABLE(static, AC_HELP_STRING([--enable-static], [build static libraries [[default=YES]]]), opt_static_libs=$enableval)
if test $opt_multibyte = no; then
AC_DEFINE(NO_MULTIBYTE_SUPPORT)
fi
echo "" echo ""
echo "Beginning configuration for readline-$LIBVERSION for ${host_cpu}-${host_vendor}-${host_os}" echo "Beginning configuration for readline-$LIBVERSION for ${host_cpu}-${host_vendor}-${host_os}"
echo "" echo ""
...@@ -72,6 +78,8 @@ AC_TYPE_SIGNAL ...@@ -72,6 +78,8 @@ AC_TYPE_SIGNAL
AC_TYPE_SIZE_T AC_TYPE_SIZE_T
AC_CHECK_TYPE(ssize_t, int) AC_CHECK_TYPE(ssize_t, int)
AC_HEADER_STDC
AC_HEADER_STAT AC_HEADER_STAT
AC_HEADER_DIRENT AC_HEADER_DIRENT
...@@ -90,6 +98,7 @@ BASH_SYS_REINSTALL_SIGHANDLERS ...@@ -90,6 +98,7 @@ BASH_SYS_REINSTALL_SIGHANDLERS
BASH_FUNC_POSIX_SETJMP BASH_FUNC_POSIX_SETJMP
BASH_FUNC_LSTAT BASH_FUNC_LSTAT
BASH_FUNC_STRCOLL BASH_FUNC_STRCOLL
BASH_FUNC_CTYPE_NONASCII
BASH_CHECK_GETPW_FUNCS BASH_CHECK_GETPW_FUNCS
......
This diff is collapsed.
...@@ -129,6 +129,7 @@ static FUNMAP default_funmap[] = { ...@@ -129,6 +129,7 @@ static FUNMAP default_funmap[] = {
{ "tty-status", rl_tty_status }, { "tty-status", rl_tty_status },
{ "undo", rl_undo_command }, { "undo", rl_undo_command },
{ "universal-argument", rl_universal_argument }, { "universal-argument", rl_universal_argument },
{ "unix-filename-rubout", rl_unix_filename_rubout },
{ "unix-line-discard", rl_unix_line_discard }, { "unix-line-discard", rl_unix_line_discard },
{ "unix-word-rubout", rl_unix_word_rubout }, { "unix-word-rubout", rl_unix_word_rubout },
{ "upcase-word", rl_upcase_word }, { "upcase-word", rl_upcase_word },
......
This diff is collapsed.
/* histfile.c - functions to manipulate the history file. */ /* histfile.c - functions to manipulate the history file. */
/* Copyright (C) 1989, 1992 Free Software Foundation, Inc. /* Copyright (C) 1989-2003 Free Software Foundation, Inc.
This file contains the GNU History Library (the Library), a set of This file contains the GNU History Library (the Library), a set of
routines for managing the text of previously typed lines. routines for managing the text of previously typed lines.
...@@ -23,14 +23,19 @@ ...@@ -23,14 +23,19 @@
/* The goal is to make the implementation transparent, so that you /* The goal is to make the implementation transparent, so that you
don't have to know what data types are used, just what functions don't have to know what data types are used, just what functions
you can call. I think I have done that. */ you can call. I think I have done that. */
#define READLINE_LIBRARY #define READLINE_LIBRARY
#if defined (__TANDEM)
# include <floss.h>
#endif
#include "config_readline.h" #include "config_readline.h"
#include <stdio.h> #include <stdio.h>
#include <sys/types.h> #include <sys/types.h>
#ifndef _MINIX #if ! defined (_MINIX) && defined (HAVE_SYS_FILE_H)
# include <sys/file.h> # include <sys/file.h>
#endif #endif
#include "posixstat.h" #include "posixstat.h"
...@@ -50,7 +55,7 @@ ...@@ -50,7 +55,7 @@
# undef HAVE_MMAP # undef HAVE_MMAP
#endif #endif
#ifdef HAVE_MMAP #ifdef HISTORY_USE_MMAP
# include <sys/mman.h> # include <sys/mman.h>
# ifdef MAP_FILE # ifdef MAP_FILE
...@@ -65,7 +70,7 @@ ...@@ -65,7 +70,7 @@
# define MAP_FAILED ((void *)-1) # define MAP_FAILED ((void *)-1)
# endif # endif
#endif /* HAVE_MMAP */ #endif /* HISTORY_USE_MMAP */
/* If we're compiling for __EMX__ (OS/2) or __CYGWIN__ (cygwin32 environment /* If we're compiling for __EMX__ (OS/2) or __CYGWIN__ (cygwin32 environment
on win 95/98/nt), we want to open files with O_BINARY mode so that there on win 95/98/nt), we want to open files with O_BINARY mode so that there
...@@ -91,6 +96,13 @@ extern int errno; ...@@ -91,6 +96,13 @@ extern int errno;
#include "rlshell.h" #include "rlshell.h"
#include "xmalloc.h" #include "xmalloc.h"
/* If non-zero, we write timestamps to the history file in history_do_write() */
int history_write_timestamps = 0;
/* Does S look like the beginning of a history timestamp entry? Placeholder
for more extensive tests. */
#define HIST_TIMESTAMP_START(s) (*(s) == history_comment_char)
/* Return the string that should be used in the place of this /* Return the string that should be used in the place of this
filename. This only matters when you don't specify the filename. This only matters when you don't specify the
filename to read_history (), or write_history (). */ filename to read_history (), or write_history (). */
...@@ -149,13 +161,20 @@ read_history_range (filename, from, to) ...@@ -149,13 +161,20 @@ read_history_range (filename, from, to)
const char *filename; const char *filename;
int from, to; int from, to;
{ {
register char *line_start, *line_end; register char *line_start, *line_end, *p;
char *input, *buffer, *bufend; char *input, *buffer, *bufend, *last_ts;
int file, current_line, chars_read; int file, current_line, chars_read;
struct stat finfo; struct stat finfo;
size_t file_size; size_t file_size;
#if defined (EFBIG)
int overflow_errno = EFBIG;
#elif defined (EOVERFLOW)
int overflow_errno = EOVERFLOW;
#else
int overflow_errno = EIO;
#endif
buffer = (char *)NULL; buffer = last_ts = (char *)NULL;
input = history_filename (filename); input = history_filename (filename);
file = open (input, O_RDONLY|O_BINARY, 0666); file = open (input, O_RDONLY|O_BINARY, 0666);
...@@ -167,37 +186,42 @@ read_history_range (filename, from, to) ...@@ -167,37 +186,42 @@ read_history_range (filename, from, to)
/* check for overflow on very large files */ /* check for overflow on very large files */
if (file_size != finfo.st_size || file_size + 1 < file_size) if (file_size != finfo.st_size || file_size + 1 < file_size)
{ {
#if defined (EFBIG) errno = overflow_errno;
errno = EFBIG;
#elif defined (EOVERFLOW)
errno = EOVERFLOW;
#endif
goto error_and_exit; goto error_and_exit;
} }
#ifdef HAVE_MMAP #ifdef HISTORY_USE_MMAP
/* We map read/write and private so we can change newlines to NULs without /* We map read/write and private so we can change newlines to NULs without
affecting the underlying object. */ affecting the underlying object. */
buffer = (char *)mmap (0, file_size, PROT_READ|PROT_WRITE, MAP_RFLAGS, file, 0); buffer = (char *)mmap (0, file_size, PROT_READ|PROT_WRITE, MAP_RFLAGS, file, 0);
if ((void *)buffer == MAP_FAILED) if ((void *)buffer == MAP_FAILED)
goto error_and_exit; {
errno = overflow_errno;
goto error_and_exit;
}
chars_read = file_size; chars_read = file_size;
#else #else
buffer = (char *)malloc (file_size + 1); buffer = (char *)malloc (file_size + 1);
if (buffer == 0) if (buffer == 0)
goto error_and_exit; {
errno = overflow_errno;
goto error_and_exit;
}
chars_read = read (file, buffer, file_size); chars_read = read (file, buffer, file_size);
#endif #endif
if (chars_read < 0) if (chars_read < 0)
{ {
error_and_exit: error_and_exit:
chars_read = errno; if (errno != 0)
chars_read = errno;
else
chars_read = EIO;
if (file >= 0) if (file >= 0)
close (file); close (file);
FREE (input); FREE (input);
#ifndef HAVE_MMAP #ifndef HISTORY_USE_MMAP
FREE (buffer); FREE (buffer);
#endif #endif
...@@ -218,8 +242,12 @@ read_history_range (filename, from, to) ...@@ -218,8 +242,12 @@ read_history_range (filename, from, to)
for (line_start = line_end = buffer; line_end < bufend && current_line < from; line_end++) for (line_start = line_end = buffer; line_end < bufend && current_line < from; line_end++)
if (*line_end == '\n') if (*line_end == '\n')
{ {
current_line++; p = line_end + 1;
line_start = line_end + 1; /* If we see something we think is a timestamp, continue with this
line. We should check more extensively here... */
if (HIST_TIMESTAMP_START(p) == 0)
current_line++;
line_start = p;
} }
/* If there are lines left to gobble, then gobble them now. */ /* If there are lines left to gobble, then gobble them now. */
...@@ -229,7 +257,22 @@ read_history_range (filename, from, to) ...@@ -229,7 +257,22 @@ read_history_range (filename, from, to)
*line_end = '\0'; *line_end = '\0';
if (*line_start) if (*line_start)
add_history (line_start); {
if (HIST_TIMESTAMP_START(line_start) == 0)
{
add_history (line_start);
if (last_ts)
{
add_history_time (last_ts);
last_ts = NULL;
}
}
else
{
last_ts = line_start;
current_line--;
}
}
current_line++; current_line++;
...@@ -240,7 +283,7 @@ read_history_range (filename, from, to) ...@@ -240,7 +283,7 @@ read_history_range (filename, from, to)
} }
FREE (input); FREE (input);
#ifndef HAVE_MMAP #ifndef HISTORY_USE_MMAP
FREE (buffer); FREE (buffer);
#else #else
munmap (buffer, file_size); munmap (buffer, file_size);
...@@ -257,7 +300,7 @@ history_truncate_file (fname, lines) ...@@ -257,7 +300,7 @@ history_truncate_file (fname, lines)
const char *fname; const char *fname;
int lines; int lines;
{ {
char *buffer, *filename, *bp; char *buffer, *filename, *bp, *bp1; /* bp1 == bp+1 */
int file, chars_read, rv; int file, chars_read, rv;
struct stat finfo; struct stat finfo;
size_t file_size; size_t file_size;
...@@ -320,11 +363,14 @@ history_truncate_file (fname, lines) ...@@ -320,11 +363,14 @@ history_truncate_file (fname, lines)
} }
/* Count backwards from the end of buffer until we have passed /* Count backwards from the end of buffer until we have passed
LINES lines. */ LINES lines. bp1 is set funny initially. But since bp[1] can't
for (bp = buffer + chars_read - 1; lines && bp > buffer; bp--) be a comment character (since it's off the end) and *bp can't be
both a newline and the history comment character, it should be OK. */
for (bp1 = bp = buffer + chars_read - 1; lines && bp > buffer; bp--)
{ {
if (*bp == '\n') if (*bp == '\n' && HIST_TIMESTAMP_START(bp1) == 0)
lines--; lines--;
bp1 = bp;
} }
/* If this is the first line, then the file contains exactly the /* If this is the first line, then the file contains exactly the
...@@ -333,11 +379,14 @@ history_truncate_file (fname, lines) ...@@ -333,11 +379,14 @@ history_truncate_file (fname, lines)
the current value of i and 0. Otherwise, write from the start of the current value of i and 0. Otherwise, write from the start of
this line until the end of the buffer. */ this line until the end of the buffer. */
for ( ; bp > buffer; bp--) for ( ; bp > buffer; bp--)
if (*bp == '\n') {
{ if (*bp == '\n' && HIST_TIMESTAMP_START(bp1) == 0)
bp++; {
break; bp++;
} break;
}
bp1 = bp;
}
/* Write only if there are more lines in the file than we want to /* Write only if there are more lines in the file than we want to
truncate to. */ truncate to. */
...@@ -372,9 +421,9 @@ history_do_write (filename, nelements, overwrite) ...@@ -372,9 +421,9 @@ history_do_write (filename, nelements, overwrite)
register int i; register int i;
char *output; char *output;
int file, mode, rv; int file, mode, rv;
#ifdef HISTORY_USE_MMAP
size_t cursize; size_t cursize;
#ifdef HAVE_MMAP
mode = overwrite ? O_RDWR|O_CREAT|O_TRUNC|O_BINARY : O_RDWR|O_APPEND|O_BINARY; mode = overwrite ? O_RDWR|O_CREAT|O_TRUNC|O_BINARY : O_RDWR|O_APPEND|O_BINARY;
#else #else
mode = overwrite ? O_WRONLY|O_CREAT|O_TRUNC|O_BINARY : O_WRONLY|O_APPEND|O_BINARY; mode = overwrite ? O_WRONLY|O_CREAT|O_TRUNC|O_BINARY : O_WRONLY|O_APPEND|O_BINARY;
...@@ -388,7 +437,7 @@ history_do_write (filename, nelements, overwrite) ...@@ -388,7 +437,7 @@ history_do_write (filename, nelements, overwrite)
return (errno); return (errno);
} }
#ifdef HAVE_MMAP #ifdef HISTORY_USE_MMAP
cursize = overwrite ? 0 : lseek (file, 0, SEEK_END); cursize = overwrite ? 0 : lseek (file, 0, SEEK_END);
#endif #endif
...@@ -406,10 +455,18 @@ history_do_write (filename, nelements, overwrite) ...@@ -406,10 +455,18 @@ history_do_write (filename, nelements, overwrite)
the_history = history_list (); the_history = history_list ();
/* Calculate the total number of bytes to write. */ /* Calculate the total number of bytes to write. */
for (buffer_size = 0, i = history_length - nelements; i < history_length; i++) for (buffer_size = 0, i = history_length - nelements; i < history_length; i++)
buffer_size += 1 + strlen (the_history[i]->line); #if 0
buffer_size += 2 + HISTENT_BYTES (the_history[i]);
#else
{
if (history_write_timestamps && the_history[i]->timestamp && the_history[i]->timestamp[0])
buffer_size += strlen (the_history[i]->timestamp) + 1;
buffer_size += strlen (the_history[i]->line) + 1;
}
#endif
/* Allocate the buffer, and fill it. */ /* Allocate the buffer, and fill it. */
#ifdef HAVE_MMAP #ifdef HISTORY_USE_MMAP
if (ftruncate (file, buffer_size+cursize) == -1) if (ftruncate (file, buffer_size+cursize) == -1)
goto mmap_error; goto mmap_error;
buffer = (char *)mmap (0, buffer_size, PROT_READ|PROT_WRITE, MAP_WFLAGS, file, cursize); buffer = (char *)mmap (0, buffer_size, PROT_READ|PROT_WRITE, MAP_WFLAGS, file, cursize);
...@@ -434,12 +491,18 @@ history_do_write (filename, nelements, overwrite) ...@@ -434,12 +491,18 @@ history_do_write (filename, nelements, overwrite)
for (j = 0, i = history_length - nelements; i < history_length; i++) for (j = 0, i = history_length - nelements; i < history_length; i++)
{ {
if (history_write_timestamps && the_history[i]->timestamp && the_history[i]->timestamp[0])
{
strcpy (buffer + j, the_history[i]->timestamp);
j += strlen (the_history[i]->timestamp);
buffer[j++] = '\n';
}
strcpy (buffer + j, the_history[i]->line); strcpy (buffer + j, the_history[i]->line);
j += strlen (the_history[i]->line); j += strlen (the_history[i]->line);
buffer[j++] = '\n'; buffer[j++] = '\n';
} }
#ifdef HAVE_MMAP #ifdef HISTORY_USE_MMAP
if (msync (buffer, buffer_size, 0) != 0 || munmap (buffer, buffer_size) != 0) if (msync (buffer, buffer_size, 0) != 0 || munmap (buffer, buffer_size) != 0)
rv = errno; rv = errno;
#else #else
......
/* History.c -- standalone history library */ /* history.c -- standalone history library */
/* Copyright (C) 1989, 1992 Free Software Foundation, Inc. /* Copyright (C) 1989-2003 Free Software Foundation, Inc.
This file contains the GNU History Library (the Library), a set of This file contains the GNU History Library (the Library), a set of
routines for managing the text of previously typed lines. routines for managing the text of previously typed lines.
...@@ -50,6 +50,8 @@ ...@@ -50,6 +50,8 @@
/* The number of slots to increase the_history by. */ /* The number of slots to increase the_history by. */
#define DEFAULT_HISTORY_GROW_SIZE 50 #define DEFAULT_HISTORY_GROW_SIZE 50
static char *hist_inittime PARAMS((void));
/* **************************************************************** */ /* **************************************************************** */
/* */ /* */
/* History Functions */ /* History Functions */
...@@ -121,14 +123,15 @@ using_history () ...@@ -121,14 +123,15 @@ using_history ()
} }
/* Return the number of bytes that the primary history entries are using. /* Return the number of bytes that the primary history entries are using.
This just adds up the lengths of the_history->lines. */ This just adds up the lengths of the_history->lines and the associated
timestamps. */
int int
history_total_bytes () history_total_bytes ()
{ {
register int i, result; register int i, result;
for (i = result = 0; the_history && the_history[i]; i++) for (i = result = 0; the_history && the_history[i]; i++)
result += strlen (the_history[i]->line); result += HISTENT_BYTES (the_history[i]);
return (result); return (result);
} }
...@@ -204,6 +207,40 @@ history_get (offset) ...@@ -204,6 +207,40 @@ history_get (offset)
: the_history[local_index]; : the_history[local_index];
} }
time_t
history_get_time (hist)
HIST_ENTRY *hist;
{
char *ts;
time_t t;
if (hist == 0 || hist->timestamp == 0)
return 0;
ts = hist->timestamp;
if (ts[0] != history_comment_char)
return 0;
t = (time_t) atol (ts + 1); /* XXX - should use strtol() here */
return t;
}
static char *
hist_inittime ()
{
time_t t;
char ts[64], *ret;
t = (time_t) time ((time_t *)0);
#if defined (HAVE_VSNPRINTF) /* assume snprintf if vsnprintf exists */
snprintf (ts, sizeof (ts) - 1, "X%lu", (unsigned long) t);
#else
sprintf (ts, "X%lu", (unsigned long) t);
#endif
ret = savestring (ts);
ret[0] = history_comment_char;
return ret;
}
/* Place STRING at the end of the history list. The data field /* Place STRING at the end of the history list. The data field
is set to NULL. */ is set to NULL. */
void void
...@@ -223,10 +260,7 @@ add_history (string) ...@@ -223,10 +260,7 @@ add_history (string)
/* If there is something in the slot, then remove it. */ /* If there is something in the slot, then remove it. */
if (the_history[0]) if (the_history[0])
{ (void) free_history_entry (the_history[0]);
free (the_history[0]->line);
free (the_history[0]);
}
/* Copy the rest of the entries, moving down one slot. */ /* Copy the rest of the entries, moving down one slot. */
for (i = 0; i < history_length; i++) for (i = 0; i < history_length; i++)
...@@ -258,10 +292,41 @@ add_history (string) ...@@ -258,10 +292,41 @@ add_history (string)
temp->line = savestring (string); temp->line = savestring (string);
temp->data = (char *)NULL; temp->data = (char *)NULL;
temp->timestamp = hist_inittime ();
the_history[history_length] = (HIST_ENTRY *)NULL; the_history[history_length] = (HIST_ENTRY *)NULL;
the_history[history_length - 1] = temp; the_history[history_length - 1] = temp;
} }
/* Change the time stamp of the most recent history entry to STRING. */
void
add_history_time (string)
const char *string;
{
HIST_ENTRY *hs;
hs = the_history[history_length - 1];
FREE (hs->timestamp);
hs->timestamp = savestring (string);
}
/* Free HIST and return the data so the calling application can free it
if necessary and desired. */
histdata_t
free_history_entry (hist)
HIST_ENTRY *hist;
{
histdata_t x;
if (hist == 0)
return ((histdata_t) 0);
FREE (hist->line);
FREE (hist->timestamp);
x = hist->data;
free (hist);
return (x);
}
/* Make the history entry at WHICH have LINE and DATA. This returns /* Make the history entry at WHICH have LINE and DATA. This returns
the old entry so you can dispose of the data. In the case of an the old entry so you can dispose of the data. In the case of an
invalid WHICH, a NULL pointer is returned. */ invalid WHICH, a NULL pointer is returned. */
...@@ -281,6 +346,7 @@ replace_history_entry (which, line, data) ...@@ -281,6 +346,7 @@ replace_history_entry (which, line, data)
temp->line = savestring (line); temp->line = savestring (line);
temp->data = data; temp->data = data;
temp->timestamp = savestring (old_value->timestamp);
the_history[which] = temp; the_history[which] = temp;
return (old_value); return (old_value);
...@@ -325,10 +391,7 @@ stifle_history (max) ...@@ -325,10 +391,7 @@ stifle_history (max)
{ {
/* This loses because we cannot free the data. */ /* This loses because we cannot free the data. */
for (i = 0, j = history_length - max; i < j; i++) for (i = 0, j = history_length - max; i < j; i++)
{ free_history_entry (the_history[i]);
free (the_history[i]->line);
free (the_history[i]);
}
history_base = i; history_base = i;
for (j = 0, i = history_length - max; j < max; i++, j++) for (j = 0, i = history_length - max; j < max; i++, j++)
...@@ -370,8 +433,7 @@ clear_history () ...@@ -370,8 +433,7 @@ clear_history ()
/* This loses because we cannot free the data. */ /* This loses because we cannot free the data. */
for (i = 0; i < history_length; i++) for (i = 0; i < history_length; i++)
{ {
free (the_history[i]->line); free_history_entry (the_history[i]);
free (the_history[i]);
the_history[i] = (HIST_ENTRY *)NULL; the_history[i] = (HIST_ENTRY *)NULL;
} }
......
/* History.h -- the names of functions that you can call in history. */ /* history.h -- the names of functions that you can call in history. */
/* Copyright (C) 1989, 1992 Free Software Foundation, Inc. /* Copyright (C) 1989-2003 Free Software Foundation, Inc.
This file contains the GNU History Library (the Library), a set of This file contains the GNU History Library (the Library), a set of
routines for managing the text of previously typed lines. routines for managing the text of previously typed lines.
...@@ -26,6 +26,8 @@ ...@@ -26,6 +26,8 @@
extern "C" { extern "C" {
#endif #endif
#include <time.h> /* XXX - for history timestamp code */
#if defined READLINE_LIBRARY #if defined READLINE_LIBRARY
# include "rlstdc.h" # include "rlstdc.h"
# include "rltypedefs.h" # include "rltypedefs.h"
...@@ -43,9 +45,13 @@ typedef char *histdata_t; ...@@ -43,9 +45,13 @@ typedef char *histdata_t;
/* The structure used to store a history entry. */ /* The structure used to store a history entry. */
typedef struct _hist_entry { typedef struct _hist_entry {
char *line; char *line;
char *timestamp; /* char * rather than time_t for read/write */
histdata_t data; histdata_t data;
} HIST_ENTRY; } HIST_ENTRY;
/* Size of the history-library-managed space in history entry HS. */
#define HISTENT_BYTES(hs) (strlen ((hs)->line) + strlen ((hs)->timestamp))
/* A structure used to pass the current state of the history stuff around. */ /* A structure used to pass the current state of the history stuff around. */
typedef struct _hist_state { typedef struct _hist_state {
HIST_ENTRY **entries; /* Pointer to the entries themselves. */ HIST_ENTRY **entries; /* Pointer to the entries themselves. */
...@@ -76,11 +82,19 @@ extern void history_set_history_state PARAMS((HISTORY_STATE *)); ...@@ -76,11 +82,19 @@ extern void history_set_history_state PARAMS((HISTORY_STATE *));
The associated data field (if any) is set to NULL. */ The associated data field (if any) is set to NULL. */
extern void add_history PARAMS((const char *)); extern void add_history PARAMS((const char *));
/* Change the timestamp associated with the most recent history entry to
STRING. */
extern void add_history_time PARAMS((const char *));
/* A reasonably useless function, only here for completeness. WHICH /* A reasonably useless function, only here for completeness. WHICH
is the magic number that tells us which element to delete. The is the magic number that tells us which element to delete. The
elements are numbered from 0. */ elements are numbered from 0. */
extern HIST_ENTRY *remove_history PARAMS((int)); extern HIST_ENTRY *remove_history PARAMS((int));
/* Free the history entry H and return any application-specific data
associated with it. */
extern histdata_t free_history_entry PARAMS((HIST_ENTRY *));
/* Make the history entry at WHICH have LINE and DATA. This returns /* Make the history entry at WHICH have LINE and DATA. This returns
the old entry so you can dispose of the data. In the case of an the old entry so you can dispose of the data. In the case of an
invalid WHICH, a NULL pointer is returned. */ invalid WHICH, a NULL pointer is returned. */
...@@ -119,6 +133,10 @@ extern HIST_ENTRY *current_history PARAMS((void)); ...@@ -119,6 +133,10 @@ extern HIST_ENTRY *current_history PARAMS((void));
array. OFFSET is relative to history_base. */ array. OFFSET is relative to history_base. */
extern HIST_ENTRY *history_get PARAMS((int)); extern HIST_ENTRY *history_get PARAMS((int));
/* Return the timestamp associated with the HIST_ENTRY * passed as an
argument */
extern time_t history_get_time PARAMS((HIST_ENTRY *));
/* Return the number of bytes that the primary history entries are using. /* Return the number of bytes that the primary history entries are using.
This just adds up the lengths of the_history->lines. */ This just adds up the lengths of the_history->lines. */
extern int history_total_bytes PARAMS((void)); extern int history_total_bytes PARAMS((void));
...@@ -225,12 +243,14 @@ extern int history_length; ...@@ -225,12 +243,14 @@ extern int history_length;
extern int history_max_entries; extern int history_max_entries;
extern char history_expansion_char; extern char history_expansion_char;
extern char history_subst_char; extern char history_subst_char;
extern const char *history_word_delimiters; extern char *history_word_delimiters;
extern char history_comment_char; extern char history_comment_char;
extern const char *history_no_expand_chars; extern char *history_no_expand_chars;
extern char *history_search_delimiter_chars; extern char *history_search_delimiter_chars;
extern int history_quotes_inhibit_expansion; extern int history_quotes_inhibit_expansion;
extern int history_write_timestamps;
/* Backwards compatibility */ /* Backwards compatibility */
extern int max_input_history; extern int max_input_history;
......
...@@ -75,11 +75,11 @@ history_search_internal (string, direction, anchored) ...@@ -75,11 +75,11 @@ history_search_internal (string, direction, anchored)
if (string == 0 || *string == '\0') if (string == 0 || *string == '\0')
return (-1); return (-1);
if (!history_length || ((i == history_length) && !reverse)) if (!history_length || ((i >= history_length) && !reverse))
return (-1); return (-1);
if (reverse && (i == history_length)) if (reverse && (i >= history_length))
i--; i = history_length - 1;
#define NEXT_LINE() do { if (reverse) i--; else i++; } while (0) #define NEXT_LINE() do { if (reverse) i--; else i++; } while (0)
......
...@@ -21,6 +21,10 @@ ...@@ -21,6 +21,10 @@
59 Temple Place, Suite 330, Boston, MA 02111 USA. */ 59 Temple Place, Suite 330, Boston, MA 02111 USA. */
#define READLINE_LIBRARY #define READLINE_LIBRARY
#if defined (__TANDEM)
# include <floss.h>
#endif
#include "config_readline.h" #include "config_readline.h"
#include <sys/types.h> #include <sys/types.h>
...@@ -152,6 +156,12 @@ _rl_unget_char (key) ...@@ -152,6 +156,12 @@ _rl_unget_char (key)
return (0); return (0);
} }
int
_rl_pushed_input_available ()
{
return (push_index != pop_index);
}
/* If a character is available to be read, then read it and stuff it into /* If a character is available to be read, then read it and stuff it into
IBUFFER. Otherwise, just return. Returns number of characters read IBUFFER. Otherwise, just return. Returns number of characters read
(0 if none available) and -1 on error (EIO). */ (0 if none available) and -1 on error (EIO). */
...@@ -160,7 +170,7 @@ rl_gather_tyi () ...@@ -160,7 +170,7 @@ rl_gather_tyi ()
{ {
int tty; int tty;
register int tem, result; register int tem, result;
int chars_avail; int chars_avail, k;
char input; char input;
#if defined(HAVE_SELECT) #if defined(HAVE_SELECT)
fd_set readfds, exceptfds; fd_set readfds, exceptfds;
...@@ -200,6 +210,11 @@ rl_gather_tyi () ...@@ -200,6 +210,11 @@ rl_gather_tyi ()
fcntl (tty, F_SETFL, tem); fcntl (tty, F_SETFL, tem);
if (chars_avail == -1 && errno == EAGAIN) if (chars_avail == -1 && errno == EAGAIN)
return 0; return 0;
if (chars_avail == 0) /* EOF */
{
rl_stuff_char (EOF);
return (0);
}
} }
#endif /* O_NDELAY */ #endif /* O_NDELAY */
...@@ -223,7 +238,12 @@ rl_gather_tyi () ...@@ -223,7 +238,12 @@ rl_gather_tyi ()
if (result != -1) if (result != -1)
{ {
while (chars_avail--) while (chars_avail--)
rl_stuff_char ((*rl_getc_function) (rl_instream)); {
k = (*rl_getc_function) (rl_instream);
rl_stuff_char (k);
if (k == NEWLINE || k == RETURN)
break;
}
} }
else else
{ {
...@@ -385,7 +405,7 @@ rl_read_key () ...@@ -385,7 +405,7 @@ rl_read_key ()
else else
{ {
/* If input is coming from a macro, then use that. */ /* If input is coming from a macro, then use that. */
if ((c = _rl_next_macro_key ())) if (c = _rl_next_macro_key ())
return (c); return (c);
/* If the user has an event function, then call it periodically. */ /* If the user has an event function, then call it periodically. */
......
...@@ -68,7 +68,7 @@ static char *prev_line_found; ...@@ -68,7 +68,7 @@ static char *prev_line_found;
static char *last_isearch_string; static char *last_isearch_string;
static int last_isearch_string_len; static int last_isearch_string_len;
static const char *default_isearch_terminators = "\033\012"; static char *default_isearch_terminators = "\033\012";
/* Search backwards through the history looking for a string which is typed /* Search backwards through the history looking for a string which is typed
interactively. Start with the current line. */ interactively. Start with the current line. */
...@@ -96,7 +96,7 @@ rl_forward_search_history (sign, key) ...@@ -96,7 +96,7 @@ rl_forward_search_history (sign, key)
static void static void
rl_display_search (search_string, reverse_p, where) rl_display_search (search_string, reverse_p, where)
char *search_string; char *search_string;
int reverse_p, where __attribute__((unused)); int reverse_p, where;
{ {
char *message; char *message;
int msglen, searchlen; int msglen, searchlen;
...@@ -144,7 +144,7 @@ rl_display_search (search_string, reverse_p, where) ...@@ -144,7 +144,7 @@ rl_display_search (search_string, reverse_p, where)
backwards. */ backwards. */
static int static int
rl_search_history (direction, invoking_key) rl_search_history (direction, invoking_key)
int direction, invoking_key __attribute__((unused)); int direction, invoking_key;
{ {
/* The string that the user types in to search for. */ /* The string that the user types in to search for. */
char *search_string; char *search_string;
...@@ -184,7 +184,7 @@ rl_search_history (direction, invoking_key) ...@@ -184,7 +184,7 @@ rl_search_history (direction, invoking_key)
/* The list of characters which terminate the search, but are not /* The list of characters which terminate the search, but are not
subsequently executed. If the variable isearch-terminators has subsequently executed. If the variable isearch-terminators has
been set, we use that value, otherwise we use ESC and C-J. */ been set, we use that value, otherwise we use ESC and C-J. */
const char *isearch_terminators; char *isearch_terminators;
RL_SETSTATE(RL_STATE_ISEARCH); RL_SETSTATE(RL_STATE_ISEARCH);
orig_point = rl_point; orig_point = rl_point;
......
...@@ -62,11 +62,13 @@ rl_make_bare_keymap () ...@@ -62,11 +62,13 @@ rl_make_bare_keymap ()
keymap[i].function = (rl_command_func_t *)NULL; keymap[i].function = (rl_command_func_t *)NULL;
} }
#if 0
for (i = 'A'; i < ('Z' + 1); i++) for (i = 'A'; i < ('Z' + 1); i++)
{ {
keymap[i].type = ISFUNC; keymap[i].type = ISFUNC;
keymap[i].function = rl_do_lowercase_version; keymap[i].function = rl_do_lowercase_version;
} }
#endif
return (keymap); return (keymap);
} }
...@@ -77,8 +79,9 @@ rl_copy_keymap (map) ...@@ -77,8 +79,9 @@ rl_copy_keymap (map)
Keymap map; Keymap map;
{ {
register int i; register int i;
Keymap temp = rl_make_bare_keymap (); Keymap temp;
temp = rl_make_bare_keymap ();
for (i = 0; i < KEYMAP_SIZE; i++) for (i = 0; i < KEYMAP_SIZE; i++)
{ {
temp[i].type = map[i].type; temp[i].type = map[i].type;
...@@ -107,12 +110,8 @@ rl_make_keymap () ...@@ -107,12 +110,8 @@ rl_make_keymap ()
newmap[CTRL('H')].function = rl_rubout; newmap[CTRL('H')].function = rl_rubout;
#if KEYMAP_SIZE > 128 #if KEYMAP_SIZE > 128
/* Printing characters in some 8-bit character sets. */ /* Printing characters in ISO Latin-1 and some 8-bit character sets. */
for (i = 128; i < 160; i++) for (i = 128; i < 256; i++)
newmap[i].function = rl_insert;
/* ISO Latin-1 printing characters should self-insert. */
for (i = 160; i < 256; i++)
newmap[i].function = rl_insert; newmap[i].function = rl_insert;
#endif /* KEYMAP_SIZE > 128 */ #endif /* KEYMAP_SIZE > 128 */
......
...@@ -77,7 +77,7 @@ static int rl_yank_nth_arg_internal PARAMS((int, int, int)); ...@@ -77,7 +77,7 @@ static int rl_yank_nth_arg_internal PARAMS((int, int, int));
of kill material. */ of kill material. */
int int
rl_set_retained_kills (num) rl_set_retained_kills (num)
int num __attribute__((unused)); int num;
{ {
return 0; return 0;
} }
...@@ -294,7 +294,7 @@ rl_backward_kill_line (direction, ignore) ...@@ -294,7 +294,7 @@ rl_backward_kill_line (direction, ignore)
/* Kill the whole line, no matter where point is. */ /* Kill the whole line, no matter where point is. */
int int
rl_kill_full_line (count, ignore) rl_kill_full_line (count, ignore)
int count __attribute__((unused)), ignore __attribute__((unused)); int count, ignore;
{ {
rl_begin_undo_group (); rl_begin_undo_group ();
rl_point = 0; rl_point = 0;
...@@ -312,7 +312,7 @@ rl_kill_full_line (count, ignore) ...@@ -312,7 +312,7 @@ rl_kill_full_line (count, ignore)
using behaviour that they expect. */ using behaviour that they expect. */
int int
rl_unix_word_rubout (count, key) rl_unix_word_rubout (count, key)
int count, key __attribute__((unused)); int count, key;
{ {
int orig_point; int orig_point;
...@@ -337,6 +337,47 @@ rl_unix_word_rubout (count, key) ...@@ -337,6 +337,47 @@ rl_unix_word_rubout (count, key)
if (rl_editing_mode == emacs_mode) if (rl_editing_mode == emacs_mode)
rl_mark = rl_point; rl_mark = rl_point;
} }
return 0;
}
/* This deletes one filename component in a Unix pathname. That is, it
deletes backward to directory separator (`/') or whitespace. */
int
rl_unix_filename_rubout (count, key)
int count, key;
{
int orig_point, c;
if (rl_point == 0)
rl_ding ();
else
{
orig_point = rl_point;
if (count <= 0)
count = 1;
while (count--)
{
c = rl_line_buffer[rl_point - 1];
while (rl_point && (whitespace (c) || c == '/'))
{
rl_point--;
c = rl_line_buffer[rl_point - 1];
}
while (rl_point && (whitespace (c) == 0) && c != '/')
{
rl_point--;
c = rl_line_buffer[rl_point - 1];
}
}
rl_kill_text (orig_point, rl_point);
if (rl_editing_mode == emacs_mode)
rl_mark = rl_point;
}
return 0; return 0;
} }
...@@ -348,7 +389,7 @@ rl_unix_word_rubout (count, key) ...@@ -348,7 +389,7 @@ rl_unix_word_rubout (count, key)
doing. */ doing. */
int int
rl_unix_line_discard (count, key) rl_unix_line_discard (count, key)
int count __attribute__((unused)), key __attribute__((unused)); int count, key;
{ {
if (rl_point == 0) if (rl_point == 0)
rl_ding (); rl_ding ();
...@@ -385,7 +426,7 @@ region_kill_internal (delete) ...@@ -385,7 +426,7 @@ region_kill_internal (delete)
/* Copy the text in the region to the kill ring. */ /* Copy the text in the region to the kill ring. */
int int
rl_copy_region_to_kill (count, ignore) rl_copy_region_to_kill (count, ignore)
int count __attribute__((unused)), ignore __attribute__((unused)); int count, ignore;
{ {
return (region_kill_internal (0)); return (region_kill_internal (0));
} }
...@@ -393,7 +434,7 @@ rl_copy_region_to_kill (count, ignore) ...@@ -393,7 +434,7 @@ rl_copy_region_to_kill (count, ignore)
/* Kill the text between the point and mark. */ /* Kill the text between the point and mark. */
int int
rl_kill_region (count, ignore) rl_kill_region (count, ignore)
int count __attribute__((unused)), ignore __attribute__((unused)); int count, ignore;
{ {
int r, npoint; int r, npoint;
...@@ -458,7 +499,7 @@ rl_copy_backward_word (count, key) ...@@ -458,7 +499,7 @@ rl_copy_backward_word (count, key)
/* Yank back the last killed text. This ignores arguments. */ /* Yank back the last killed text. This ignores arguments. */
int int
rl_yank (count, ignore) rl_yank (count, ignore)
int count __attribute__((unused)), ignore __attribute__((unused)); int count, ignore;
{ {
if (rl_kill_ring == 0) if (rl_kill_ring == 0)
{ {
...@@ -477,7 +518,7 @@ rl_yank (count, ignore) ...@@ -477,7 +518,7 @@ rl_yank (count, ignore)
yank back some other text. */ yank back some other text. */
int int
rl_yank_pop (count, key) rl_yank_pop (count, key)
int count __attribute__((unused)), key __attribute__((unused)); int count, key;
{ {
int l, n; int l, n;
......
...@@ -190,7 +190,7 @@ _rl_kill_kbd_macro () ...@@ -190,7 +190,7 @@ _rl_kill_kbd_macro ()
re-executing the existing macro. */ re-executing the existing macro. */
int int
rl_start_kbd_macro (ignore1, ignore2) rl_start_kbd_macro (ignore1, ignore2)
int ignore1 __attribute__((unused)), ignore2 __attribute__((unused)); int ignore1, ignore2;
{ {
if (RL_ISSTATE (RL_STATE_MACRODEF)) if (RL_ISSTATE (RL_STATE_MACRODEF))
{ {
...@@ -215,7 +215,7 @@ rl_start_kbd_macro (ignore1, ignore2) ...@@ -215,7 +215,7 @@ rl_start_kbd_macro (ignore1, ignore2)
that many times, counting the definition as the first time. */ that many times, counting the definition as the first time. */
int int
rl_end_kbd_macro (count, ignore) rl_end_kbd_macro (count, ignore)
int count, ignore __attribute__((unused)); int count, ignore;
{ {
if (RL_ISSTATE (RL_STATE_MACRODEF) == 0) if (RL_ISSTATE (RL_STATE_MACRODEF) == 0)
{ {
...@@ -235,7 +235,7 @@ rl_end_kbd_macro (count, ignore) ...@@ -235,7 +235,7 @@ rl_end_kbd_macro (count, ignore)
COUNT says how many times to execute it. */ COUNT says how many times to execute it. */
int int
rl_call_last_kbd_macro (count, ignore) rl_call_last_kbd_macro (count, ignore)
int count, ignore __attribute__((unused)); int count, ignore;
{ {
if (current_macro == 0) if (current_macro == 0)
_rl_abort_internal (); _rl_abort_internal ();
......
/* mbutil.c -- readline multibyte character utility functions */ /* mbutil.c -- readline multibyte character utility functions */
/* Copyright (C) 2001 Free Software Foundation, Inc. /* Copyright (C) 2001-2004 Free Software Foundation, Inc.
This file is part of the GNU Readline Library, a library for This file is part of the GNU Readline Library, a library for
reading lines of text with interactive input and history editing. reading lines of text with interactive input and history editing.
...@@ -90,12 +90,12 @@ _rl_find_next_mbchar_internal (string, seed, count, find_non_zero) ...@@ -90,12 +90,12 @@ _rl_find_next_mbchar_internal (string, seed, count, find_non_zero)
/* if this is true, means that seed was not pointed character /* if this is true, means that seed was not pointed character
started byte. So correct the point and consume count */ started byte. So correct the point and consume count */
if (seed < point) if (seed < point)
count --; count--;
while (count > 0) while (count > 0)
{ {
tmp = mbrtowc (&wc, string+point, strlen(string + point), &ps); tmp = mbrtowc (&wc, string+point, strlen(string + point), &ps);
if ((size_t)(tmp) == (size_t)-1 || (size_t)(tmp) == (size_t)-2) if (MB_INVALIDCH ((size_t)tmp))
{ {
/* invalid bytes. asume a byte represents a character */ /* invalid bytes. asume a byte represents a character */
point++; point++;
...@@ -103,9 +103,8 @@ _rl_find_next_mbchar_internal (string, seed, count, find_non_zero) ...@@ -103,9 +103,8 @@ _rl_find_next_mbchar_internal (string, seed, count, find_non_zero)
/* reset states. */ /* reset states. */
memset(&ps, 0, sizeof(mbstate_t)); memset(&ps, 0, sizeof(mbstate_t));
} }
else if (tmp == (size_t)0) else if (MB_NULLWCH (tmp))
/* found '\0' char */ break; /* found wide '\0' */
break;
else else
{ {
/* valid bytes */ /* valid bytes */
...@@ -158,7 +157,7 @@ _rl_find_prev_mbchar_internal (string, seed, find_non_zero) ...@@ -158,7 +157,7 @@ _rl_find_prev_mbchar_internal (string, seed, find_non_zero)
while (point < seed) while (point < seed)
{ {
tmp = mbrtowc (&wc, string + point, length - point, &ps); tmp = mbrtowc (&wc, string + point, length - point, &ps);
if ((size_t)(tmp) == (size_t)-1 || (size_t)(tmp) == (size_t)-2) if (MB_INVALIDCH ((size_t)tmp))
{ {
/* in this case, bytes are invalid or shorted to compose /* in this case, bytes are invalid or shorted to compose
multibyte char, so assume that the first byte represents multibyte char, so assume that the first byte represents
...@@ -167,8 +166,12 @@ _rl_find_prev_mbchar_internal (string, seed, find_non_zero) ...@@ -167,8 +166,12 @@ _rl_find_prev_mbchar_internal (string, seed, find_non_zero)
/* clear the state of the byte sequence, because /* clear the state of the byte sequence, because
in this case effect of mbstate is undefined */ in this case effect of mbstate is undefined */
memset(&ps, 0, sizeof (mbstate_t)); memset(&ps, 0, sizeof (mbstate_t));
/* Since we're assuming that this byte represents a single
non-zero-width character, don't forget about it. */
prev = point;
} }
else if (tmp == 0) else if (MB_NULLWCH (tmp))
break; /* Found '\0' char. Can this happen? */ break; /* Found '\0' char. Can this happen? */
else else
{ {
...@@ -194,7 +197,7 @@ _rl_find_prev_mbchar_internal (string, seed, find_non_zero) ...@@ -194,7 +197,7 @@ _rl_find_prev_mbchar_internal (string, seed, find_non_zero)
if it couldn't parse a complete multibyte character. */ if it couldn't parse a complete multibyte character. */
int int
_rl_get_char_len (src, ps) _rl_get_char_len (src, ps)
const char *src; char *src;
mbstate_t *ps; mbstate_t *ps;
{ {
size_t tmp; size_t tmp;
...@@ -203,14 +206,16 @@ _rl_get_char_len (src, ps) ...@@ -203,14 +206,16 @@ _rl_get_char_len (src, ps)
if (tmp == (size_t)(-2)) if (tmp == (size_t)(-2))
{ {
/* shorted to compose multibyte char */ /* shorted to compose multibyte char */
memset (ps, 0, sizeof(mbstate_t)); if (ps)
memset (ps, 0, sizeof(mbstate_t));
return -2; return -2;
} }
else if (tmp == (size_t)(-1)) else if (tmp == (size_t)(-1))
{ {
/* invalid to compose multibyte char */ /* invalid to compose multibyte char */
/* initialize the conversion state */ /* initialize the conversion state */
memset (ps, 0, sizeof(mbstate_t)); if (ps)
memset (ps, 0, sizeof(mbstate_t));
return -1; return -1;
} }
else if (tmp == (size_t)0) else if (tmp == (size_t)0)
...@@ -223,9 +228,12 @@ _rl_get_char_len (src, ps) ...@@ -223,9 +228,12 @@ _rl_get_char_len (src, ps)
return 1. Otherwise return 0. */ return 1. Otherwise return 0. */
int int
_rl_compare_chars (buf1, pos1, ps1, buf2, pos2, ps2) _rl_compare_chars (buf1, pos1, ps1, buf2, pos2, ps2)
char *buf1, *buf2; char *buf1;
mbstate_t *ps1, *ps2; int pos1;
int pos1, pos2; mbstate_t *ps1;
char *buf2;
int pos2;
mbstate_t *ps2;
{ {
int i, w1, w2; int i, w1, w2;
...@@ -249,7 +257,7 @@ _rl_compare_chars (buf1, pos1, ps1, buf2, pos2, ps2) ...@@ -249,7 +257,7 @@ _rl_compare_chars (buf1, pos1, ps1, buf2, pos2, ps2)
it returns -1 */ it returns -1 */
int int
_rl_adjust_point(string, point, ps) _rl_adjust_point(string, point, ps)
const char *string; char *string;
int point; int point;
mbstate_t *ps; mbstate_t *ps;
{ {
...@@ -266,7 +274,7 @@ _rl_adjust_point(string, point, ps) ...@@ -266,7 +274,7 @@ _rl_adjust_point(string, point, ps)
while (pos < point) while (pos < point)
{ {
tmp = mbrlen (string + pos, length - pos, ps); tmp = mbrlen (string + pos, length - pos, ps);
if((size_t)(tmp) == (size_t)-1 || (size_t)(tmp) == (size_t)-2) if (MB_INVALIDCH ((size_t)tmp))
{ {
/* in this case, bytes are invalid or shorted to compose /* in this case, bytes are invalid or shorted to compose
multibyte char, so assume that the first byte represents multibyte char, so assume that the first byte represents
...@@ -274,8 +282,11 @@ _rl_adjust_point(string, point, ps) ...@@ -274,8 +282,11 @@ _rl_adjust_point(string, point, ps)
pos++; pos++;
/* clear the state of the byte sequence, because /* clear the state of the byte sequence, because
in this case effect of mbstate is undefined */ in this case effect of mbstate is undefined */
memset (ps, 0, sizeof (mbstate_t)); if (ps)
memset (ps, 0, sizeof (mbstate_t));
} }
else if (MB_NULLWCH (tmp))
pos++;
else else
pos += tmp; pos += tmp;
} }
...@@ -308,8 +319,8 @@ _rl_is_mbchar_matched (string, seed, end, mbchar, length) ...@@ -308,8 +319,8 @@ _rl_is_mbchar_matched (string, seed, end, mbchar, length)
#undef _rl_find_next_mbchar #undef _rl_find_next_mbchar
int int
_rl_find_next_mbchar (string, seed, count, flags) _rl_find_next_mbchar (string, seed, count, flags)
char *string __attribute__((unused)); char *string;
int seed, count, flags __attribute__((unused)); int seed, count, flags;
{ {
#if defined (HANDLE_MULTIBYTE) #if defined (HANDLE_MULTIBYTE)
return _rl_find_next_mbchar_internal (string, seed, count, flags); return _rl_find_next_mbchar_internal (string, seed, count, flags);
...@@ -324,8 +335,8 @@ _rl_find_next_mbchar (string, seed, count, flags) ...@@ -324,8 +335,8 @@ _rl_find_next_mbchar (string, seed, count, flags)
#undef _rl_find_prev_mbchar #undef _rl_find_prev_mbchar
int int
_rl_find_prev_mbchar (string, seed, flags) _rl_find_prev_mbchar (string, seed, flags)
char *string __attribute__((unused)); char *string;
int seed, flags __attribute__((unused)); int seed, flags;
{ {
#if defined (HANDLE_MULTIBYTE) #if defined (HANDLE_MULTIBYTE)
return _rl_find_prev_mbchar_internal (string, seed, flags); return _rl_find_prev_mbchar_internal (string, seed, flags);
......
/* misc.c -- miscellaneous bindable readline functions. */ /* misc.c -- miscellaneous bindable readline functions. */
/* Copyright (C) 1987-2002 Free Software Foundation, Inc. /* Copyright (C) 1987-2004 Free Software Foundation, Inc.
This file is part of the GNU Readline Library, a library for This file is part of the GNU Readline Library, a library for
reading lines of text with interactive input and history editing. reading lines of text with interactive input and history editing.
...@@ -155,7 +155,7 @@ rl_digit_loop () ...@@ -155,7 +155,7 @@ rl_digit_loop ()
/* Add the current digit to the argument in progress. */ /* Add the current digit to the argument in progress. */
int int
rl_digit_argument (ignore, key) rl_digit_argument (ignore, key)
int ignore __attribute__((unused)), key; int ignore, key;
{ {
rl_execute_next (key); rl_execute_next (key);
return (rl_digit_loop ()); return (rl_digit_loop ());
...@@ -185,7 +185,7 @@ _rl_init_argument () ...@@ -185,7 +185,7 @@ _rl_init_argument ()
dispatch on it. If the key is the abort character then abort. */ dispatch on it. If the key is the abort character then abort. */
int int
rl_universal_argument (count, key) rl_universal_argument (count, key)
int count __attribute__((unused)), key __attribute__((unused)); int count, key;
{ {
rl_numeric_arg *= 4; rl_numeric_arg *= 4;
return (rl_digit_loop ()); return (rl_digit_loop ());
...@@ -251,6 +251,8 @@ rl_maybe_unsave_line () ...@@ -251,6 +251,8 @@ rl_maybe_unsave_line ()
{ {
if (_rl_saved_line_for_history) if (_rl_saved_line_for_history)
{ {
/* Can't call with `1' because rl_undo_list might point to an undo
list from a history entry, as in rl_replace_from_history() below. */
rl_replace_line (_rl_saved_line_for_history->line, 0); rl_replace_line (_rl_saved_line_for_history->line, 0);
rl_undo_list = (UNDO_LIST *)_rl_saved_line_for_history->data; rl_undo_list = (UNDO_LIST *)_rl_saved_line_for_history->data;
_rl_free_history_entry (_rl_saved_line_for_history); _rl_free_history_entry (_rl_saved_line_for_history);
...@@ -272,6 +274,13 @@ rl_maybe_save_line () ...@@ -272,6 +274,13 @@ rl_maybe_save_line ()
_rl_saved_line_for_history->line = savestring (rl_line_buffer); _rl_saved_line_for_history->line = savestring (rl_line_buffer);
_rl_saved_line_for_history->data = (char *)rl_undo_list; _rl_saved_line_for_history->data = (char *)rl_undo_list;
} }
else if (STREQ (rl_line_buffer, _rl_saved_line_for_history->line) == 0)
{
free (_rl_saved_line_for_history->line);
_rl_saved_line_for_history->line = savestring (rl_line_buffer);
_rl_saved_line_for_history->data = (char *)rl_undo_list; /* XXX possible memleak */
}
return 0; return 0;
} }
...@@ -296,7 +305,7 @@ _rl_history_set_point () ...@@ -296,7 +305,7 @@ _rl_history_set_point ()
rl_point = rl_end; rl_point = rl_end;
#if defined (VI_MODE) #if defined (VI_MODE)
if (rl_editing_mode == vi_mode) if (rl_editing_mode == vi_mode && _rl_keymap != vi_insertion_keymap)
rl_point = 0; rl_point = 0;
#endif /* VI_MODE */ #endif /* VI_MODE */
...@@ -307,8 +316,10 @@ _rl_history_set_point () ...@@ -307,8 +316,10 @@ _rl_history_set_point ()
void void
rl_replace_from_history (entry, flags) rl_replace_from_history (entry, flags)
HIST_ENTRY *entry; HIST_ENTRY *entry;
int flags __attribute__((unused)); /* currently unused */ int flags; /* currently unused */
{ {
/* Can't call with `1' because rl_undo_list might point to an undo list
from a history entry, just like we're setting up here. */
rl_replace_line (entry->line, 0); rl_replace_line (entry->line, 0);
rl_undo_list = (UNDO_LIST *)entry->data; rl_undo_list = (UNDO_LIST *)entry->data;
rl_point = rl_end; rl_point = rl_end;
...@@ -332,7 +343,7 @@ rl_replace_from_history (entry, flags) ...@@ -332,7 +343,7 @@ rl_replace_from_history (entry, flags)
/* Meta-< goes to the start of the history. */ /* Meta-< goes to the start of the history. */
int int
rl_beginning_of_history (count, key) rl_beginning_of_history (count, key)
int count __attribute__((unused)), key; int count, key;
{ {
return (rl_get_previous_history (1 + where_history (), key)); return (rl_get_previous_history (1 + where_history (), key));
} }
...@@ -340,7 +351,7 @@ rl_beginning_of_history (count, key) ...@@ -340,7 +351,7 @@ rl_beginning_of_history (count, key)
/* Meta-> goes to the end of the history. (The current line). */ /* Meta-> goes to the end of the history. (The current line). */
int int
rl_end_of_history (count, key) rl_end_of_history (count, key)
int count __attribute__((unused)), key __attribute__((unused)); int count, key;
{ {
rl_maybe_replace_line (); rl_maybe_replace_line ();
using_history (); using_history ();
...@@ -433,6 +444,7 @@ rl_get_previous_history (count, key) ...@@ -433,6 +444,7 @@ rl_get_previous_history (count, key)
rl_replace_from_history (temp, 0); rl_replace_from_history (temp, 0);
_rl_history_set_point (); _rl_history_set_point ();
} }
return 0; return 0;
} }
...@@ -444,7 +456,7 @@ rl_get_previous_history (count, key) ...@@ -444,7 +456,7 @@ rl_get_previous_history (count, key)
/* How to toggle back and forth between editing modes. */ /* How to toggle back and forth between editing modes. */
int int
rl_vi_editing_mode (count, key) rl_vi_editing_mode (count, key)
int count __attribute__((unused)), key; int count, key;
{ {
#if defined (VI_MODE) #if defined (VI_MODE)
_rl_set_insert_mode (RL_IM_INSERT, 1); /* vi mode ignores insert mode */ _rl_set_insert_mode (RL_IM_INSERT, 1); /* vi mode ignores insert mode */
...@@ -457,7 +469,7 @@ rl_vi_editing_mode (count, key) ...@@ -457,7 +469,7 @@ rl_vi_editing_mode (count, key)
int int
rl_emacs_editing_mode (count, key) rl_emacs_editing_mode (count, key)
int count __attribute__((unused)), key __attribute__((unused)); int count, key;
{ {
rl_editing_mode = emacs_mode; rl_editing_mode = emacs_mode;
_rl_set_insert_mode (RL_IM_INSERT, 1); /* emacs mode default is insert mode */ _rl_set_insert_mode (RL_IM_INSERT, 1); /* emacs mode default is insert mode */
...@@ -468,7 +480,7 @@ rl_emacs_editing_mode (count, key) ...@@ -468,7 +480,7 @@ rl_emacs_editing_mode (count, key)
/* Function for the rest of the library to use to set insert/overwrite mode. */ /* Function for the rest of the library to use to set insert/overwrite mode. */
void void
_rl_set_insert_mode (im, force) _rl_set_insert_mode (im, force)
int im, force __attribute__((unused)); int im, force;
{ {
#ifdef CURSOR_MODE #ifdef CURSOR_MODE
_rl_set_cursor (im, force); _rl_set_cursor (im, force);
...@@ -481,7 +493,7 @@ _rl_set_insert_mode (im, force) ...@@ -481,7 +493,7 @@ _rl_set_insert_mode (im, force)
mode. A negative or zero explicit argument selects insert mode. */ mode. A negative or zero explicit argument selects insert mode. */
int int
rl_overwrite_mode (count, key) rl_overwrite_mode (count, key)
int count, key __attribute__((unused)); int count, key;
{ {
if (rl_explicit_arg == 0) if (rl_explicit_arg == 0)
_rl_set_insert_mode (rl_insert_mode ^ 1, 0); _rl_set_insert_mode (rl_insert_mode ^ 1, 0);
......
...@@ -73,6 +73,23 @@ static char *normalize_codeset PARAMS((char *)); ...@@ -73,6 +73,23 @@ static char *normalize_codeset PARAMS((char *));
static char *find_codeset PARAMS((char *, size_t *)); static char *find_codeset PARAMS((char *, size_t *));
#endif /* !HAVE_SETLOCALE */ #endif /* !HAVE_SETLOCALE */
static char *_rl_get_locale_var PARAMS((const char *));
static char *
_rl_get_locale_var (v)
const char *v;
{
char *lspec;
lspec = sh_get_env_value ("LC_ALL");
if (lspec == 0 || *lspec == 0)
lspec = sh_get_env_value (v);
if (lspec == 0 || *lspec == 0)
lspec = sh_get_env_value ("LANG");
return lspec;
}
/* Check for LC_ALL, LC_CTYPE, and LANG and use the first with a value /* Check for LC_ALL, LC_CTYPE, and LANG and use the first with a value
to decide the defaults for 8-bit character input and output. Returns to decide the defaults for 8-bit character input and output. Returns
1 if we set eight-bit mode. */ 1 if we set eight-bit mode. */
...@@ -82,10 +99,21 @@ _rl_init_eightbit () ...@@ -82,10 +99,21 @@ _rl_init_eightbit ()
/* If we have setlocale(3), just check the current LC_CTYPE category /* If we have setlocale(3), just check the current LC_CTYPE category
value, and go into eight-bit mode if it's not C or POSIX. */ value, and go into eight-bit mode if it's not C or POSIX. */
#if defined (HAVE_SETLOCALE) #if defined (HAVE_SETLOCALE)
char *t; char *lspec, *t;
/* Set the LC_CTYPE locale category from environment variables. */ /* Set the LC_CTYPE locale category from environment variables. */
t = setlocale (LC_CTYPE, ""); lspec = _rl_get_locale_var ("LC_CTYPE");
/* Since _rl_get_locale_var queries the right environment variables,
we query the current locale settings with setlocale(), and, if
that doesn't return anything, we set lspec to the empty string to
force the subsequent call to setlocale() to define the `native'
environment. */
if (lspec == 0 || *lspec == 0)
lspec = setlocale (LC_CTYPE, (char *)NULL);
if (lspec == 0)
lspec = "";
t = setlocale (LC_CTYPE, lspec);
if (t && *t && (t[0] != 'C' || t[1]) && (STREQ (t, "POSIX") == 0)) if (t && *t && (t[0] != 'C' || t[1]) && (STREQ (t, "POSIX") == 0))
{ {
_rl_meta_flag = 1; _rl_meta_flag = 1;
...@@ -103,9 +131,8 @@ _rl_init_eightbit () ...@@ -103,9 +131,8 @@ _rl_init_eightbit ()
/* We don't have setlocale. Finesse it. Check the environment for the /* We don't have setlocale. Finesse it. Check the environment for the
appropriate variables and set eight-bit mode if they have the right appropriate variables and set eight-bit mode if they have the right
values. */ values. */
lspec = sh_get_env_value ("LC_ALL"); lspec = _rl_get_locale_var ("LC_CTYPE");
if (lspec == 0) lspec = sh_get_env_value ("LC_CTYPE");
if (lspec == 0) lspec = sh_get_env_value ("LANG");
if (lspec == 0 || (t = normalize_codeset (lspec)) == 0) if (lspec == 0 || (t = normalize_codeset (lspec)) == 0)
return (0); return (0);
for (i = 0; t && legal_lang_values[i]; i++) for (i = 0; t && legal_lang_values[i]; i++)
......
...@@ -21,6 +21,10 @@ ...@@ -21,6 +21,10 @@
59 Temple Place, Suite 330, Boston, MA 02111 USA. */ 59 Temple Place, Suite 330, Boston, MA 02111 USA. */
#define READLINE_LIBRARY #define READLINE_LIBRARY
#if defined (__TANDEM)
# include <floss.h>
#endif
#include "rlconf.h" #include "rlconf.h"
#include "config_readline.h" #include "config_readline.h"
......
...@@ -25,7 +25,11 @@ ...@@ -25,7 +25,11 @@
#if defined (HAVE_DIRENT_H) #if defined (HAVE_DIRENT_H)
# include <dirent.h> # include <dirent.h>
# define D_NAMLEN(d) (strlen ((d)->d_name)) # if defined (HAVE_STRUCT_DIRENT_D_NAMLEN)
# define D_NAMLEN(d) ((d)->d_namlen)
# else
# define D_NAMLEN(d) (strlen ((d)->d_name))
# endif /* !HAVE_STRUCT_DIRENT_D_NAMLEN */
#else #else
# if defined (HAVE_SYS_NDIR_H) # if defined (HAVE_SYS_NDIR_H)
# include <sys/ndir.h> # include <sys/ndir.h>
...@@ -42,11 +46,11 @@ ...@@ -42,11 +46,11 @@
# define D_NAMLEN(d) ((d)->d_namlen) # define D_NAMLEN(d) ((d)->d_namlen)
#endif /* !HAVE_DIRENT_H */ #endif /* !HAVE_DIRENT_H */
#if defined (STRUCT_DIRENT_HAS_D_INO) && !defined (STRUCT_DIRENT_HAS_D_FILENO) #if defined (HAVE_STRUCT_DIRENT_D_INO) && !defined (HAVE_STRUCT_DIRENT_D_FILENO)
# define d_fileno d_ino # define d_fileno d_ino
#endif #endif
#if defined (_POSIX_SOURCE) && (!defined (STRUCT_DIRENT_HAS_D_INO) || defined (BROKEN_DIRENT_D_INO)) #if defined (_POSIX_SOURCE) && (!defined (HAVE_STRUCT_DIRENT_D_INO) || defined (BROKEN_DIRENT_D_INO))
/* Posix does not require that the d_ino field be present, and some /* Posix does not require that the d_ino field be present, and some
systems do not provide it. */ systems do not provide it. */
# define REAL_DIR_ENTRY(dp) 1 # define REAL_DIR_ENTRY(dp) 1
......
...@@ -66,11 +66,11 @@ ...@@ -66,11 +66,11 @@
#include "xmalloc.h" #include "xmalloc.h"
#ifndef RL_LIBRARY_VERSION #ifndef RL_LIBRARY_VERSION
# define RL_LIBRARY_VERSION "4.3" # define RL_LIBRARY_VERSION "5.0"
#endif #endif
#ifndef RL_READLINE_VERSION #ifndef RL_READLINE_VERSION
# define RL_READLINE_VERSION 0x0403 # define RL_READLINE_VERSION 0x0500
#endif #endif
extern void _rl_free_history_entry PARAMS((HIST_ENTRY *)); extern void _rl_free_history_entry PARAMS((HIST_ENTRY *));
...@@ -83,6 +83,7 @@ static void bind_arrow_keys_internal PARAMS((Keymap)); ...@@ -83,6 +83,7 @@ static void bind_arrow_keys_internal PARAMS((Keymap));
static void bind_arrow_keys PARAMS((void)); static void bind_arrow_keys PARAMS((void));
static void readline_default_bindings PARAMS((void)); static void readline_default_bindings PARAMS((void));
static void reset_default_bindings PARAMS((void));
/* **************************************************************** */ /* **************************************************************** */
/* */ /* */
...@@ -345,7 +346,7 @@ readline_internal_setup () ...@@ -345,7 +346,7 @@ readline_internal_setup ()
#if defined (VI_MODE) #if defined (VI_MODE)
if (rl_editing_mode == vi_mode) if (rl_editing_mode == vi_mode)
rl_vi_insertion_mode (1, 0); rl_vi_insertion_mode (1, 'i');
#endif /* VI_MODE */ #endif /* VI_MODE */
if (rl_pre_input_hook) if (rl_pre_input_hook)
...@@ -648,7 +649,21 @@ _rl_dispatch_subseq (key, map, got_subseq) ...@@ -648,7 +649,21 @@ _rl_dispatch_subseq (key, map, got_subseq)
the function. The recursive call to _rl_dispatch_subseq has the function. The recursive call to _rl_dispatch_subseq has
already taken care of pushing any necessary input back onto already taken care of pushing any necessary input back onto
the input queue with _rl_unget_char. */ the input queue with _rl_unget_char. */
r = _rl_dispatch (ANYOTHERKEY, FUNCTION_TO_KEYMAP (map, key)); {
#if 0
r = _rl_dispatch (ANYOTHERKEY, FUNCTION_TO_KEYMAP (map, key));
#else
/* XXX - experimental code -- might never be executed. Save
for later. */
Keymap m = FUNCTION_TO_KEYMAP (map, key);
int type = m[ANYOTHERKEY].type;
func = m[ANYOTHERKEY].function;
if (type == ISFUNC && func == rl_do_lowercase_version)
r = _rl_dispatch (_rl_to_lower (key), map);
else
r = _rl_dispatch (ANYOTHERKEY, m);
#endif
}
else if (r && map[ANYOTHERKEY].function) else if (r && map[ANYOTHERKEY].function)
{ {
/* We didn't match (r is probably -1), so return something to /* We didn't match (r is probably -1), so return something to
...@@ -682,6 +697,7 @@ _rl_dispatch_subseq (key, map, got_subseq) ...@@ -682,6 +697,7 @@ _rl_dispatch_subseq (key, map, got_subseq)
} }
#if defined (VI_MODE) #if defined (VI_MODE)
if (rl_editing_mode == vi_mode && _rl_keymap == vi_movement_keymap && if (rl_editing_mode == vi_mode && _rl_keymap == vi_movement_keymap &&
key != ANYOTHERKEY &&
_rl_vi_textmod_command (key)) _rl_vi_textmod_command (key))
_rl_vi_set_last (key, rl_numeric_arg, rl_arg_sign); _rl_vi_set_last (key, rl_numeric_arg, rl_arg_sign);
#endif #endif
...@@ -836,7 +852,7 @@ readline_initialize_everything () ...@@ -836,7 +852,7 @@ readline_initialize_everything ()
/* If the completion parser's default word break characters haven't /* If the completion parser's default word break characters haven't
been set yet, then do so now. */ been set yet, then do so now. */
if (rl_completer_word_break_characters == (char *)NULL) if (rl_completer_word_break_characters == (char *)NULL)
rl_completer_word_break_characters = rl_basic_word_break_characters; rl_completer_word_break_characters = (char *)rl_basic_word_break_characters;
} }
/* If this system allows us to look at the values of the regular /* If this system allows us to look at the values of the regular
...@@ -848,6 +864,15 @@ readline_default_bindings () ...@@ -848,6 +864,15 @@ readline_default_bindings ()
rl_tty_set_default_bindings (_rl_keymap); rl_tty_set_default_bindings (_rl_keymap);
} }
/* Reset the default bindings for the terminal special characters we're
interested in back to rl_insert and read the new ones. */
static void
reset_default_bindings ()
{
rl_tty_unset_default_bindings (_rl_keymap);
rl_tty_set_default_bindings (_rl_keymap);
}
/* Bind some common arrow key sequences in MAP. */ /* Bind some common arrow key sequences in MAP. */
static void static void
bind_arrow_keys_internal (map) bind_arrow_keys_internal (map)
...@@ -859,25 +884,25 @@ bind_arrow_keys_internal (map) ...@@ -859,25 +884,25 @@ bind_arrow_keys_internal (map)
_rl_keymap = map; _rl_keymap = map;
#if defined (__MSDOS__) #if defined (__MSDOS__)
_rl_bind_if_unbound ("\033[0A", rl_get_previous_history); rl_bind_keyseq_if_unbound ("\033[0A", rl_get_previous_history);
_rl_bind_if_unbound ("\033[0B", rl_backward_char); rl_bind_keyseq_if_unbound ("\033[0B", rl_backward_char);
_rl_bind_if_unbound ("\033[0C", rl_forward_char); rl_bind_keyseq_if_unbound ("\033[0C", rl_forward_char);
_rl_bind_if_unbound ("\033[0D", rl_get_next_history); rl_bind_keyseq_if_unbound ("\033[0D", rl_get_next_history);
#endif #endif
_rl_bind_if_unbound ("\033[A", rl_get_previous_history); rl_bind_keyseq_if_unbound ("\033[A", rl_get_previous_history);
_rl_bind_if_unbound ("\033[B", rl_get_next_history); rl_bind_keyseq_if_unbound ("\033[B", rl_get_next_history);
_rl_bind_if_unbound ("\033[C", rl_forward_char); rl_bind_keyseq_if_unbound ("\033[C", rl_forward_char);
_rl_bind_if_unbound ("\033[D", rl_backward_char); rl_bind_keyseq_if_unbound ("\033[D", rl_backward_char);
_rl_bind_if_unbound ("\033[H", rl_beg_of_line); rl_bind_keyseq_if_unbound ("\033[H", rl_beg_of_line);
_rl_bind_if_unbound ("\033[F", rl_end_of_line); rl_bind_keyseq_if_unbound ("\033[F", rl_end_of_line);
_rl_bind_if_unbound ("\033OA", rl_get_previous_history); rl_bind_keyseq_if_unbound ("\033OA", rl_get_previous_history);
_rl_bind_if_unbound ("\033OB", rl_get_next_history); rl_bind_keyseq_if_unbound ("\033OB", rl_get_next_history);
_rl_bind_if_unbound ("\033OC", rl_forward_char); rl_bind_keyseq_if_unbound ("\033OC", rl_forward_char);
_rl_bind_if_unbound ("\033OD", rl_backward_char); rl_bind_keyseq_if_unbound ("\033OD", rl_backward_char);
_rl_bind_if_unbound ("\033OH", rl_beg_of_line); rl_bind_keyseq_if_unbound ("\033OH", rl_beg_of_line);
_rl_bind_if_unbound ("\033OF", rl_end_of_line); rl_bind_keyseq_if_unbound ("\033OF", rl_end_of_line);
_rl_keymap = xkeymap; _rl_keymap = xkeymap;
} }
......
/* Readline.h -- the names of functions callable from within readline. */ /* Readline.h -- the names of functions callable from within readline. */
/* Copyright (C) 1987, 1989, 1992 Free Software Foundation, Inc. /* Copyright (C) 1987-2004 Free Software Foundation, Inc.
This file is part of the GNU Readline Library, a library for This file is part of the GNU Readline Library, a library for
reading lines of text with interactive input and history editing. reading lines of text with interactive input and history editing.
...@@ -40,9 +40,9 @@ extern "C" { ...@@ -40,9 +40,9 @@ extern "C" {
#endif #endif
/* Hex-encoded Readline version number. */ /* Hex-encoded Readline version number. */
#define RL_READLINE_VERSION 0x0403 /* Readline 4.3 */ #define RL_READLINE_VERSION 0x0500 /* Readline 5.0 */
#define RL_VERSION_MAJOR 4 #define RL_VERSION_MAJOR 5
#define RL_VERSION_MINOR 3 #define RL_VERSION_MINOR 0
/* Readline data structures. */ /* Readline data structures. */
...@@ -160,6 +160,7 @@ extern int rl_kill_line PARAMS((int, int)); ...@@ -160,6 +160,7 @@ extern int rl_kill_line PARAMS((int, int));
extern int rl_backward_kill_line PARAMS((int, int)); extern int rl_backward_kill_line PARAMS((int, int));
extern int rl_kill_full_line PARAMS((int, int)); extern int rl_kill_full_line PARAMS((int, int));
extern int rl_unix_word_rubout PARAMS((int, int)); extern int rl_unix_word_rubout PARAMS((int, int));
extern int rl_unix_filename_rubout PARAMS((int, int));
extern int rl_unix_line_discard PARAMS((int, int)); extern int rl_unix_line_discard PARAMS((int, int));
extern int rl_copy_region_to_kill PARAMS((int, int)); extern int rl_copy_region_to_kill PARAMS((int, int));
extern int rl_kill_region PARAMS((int, int)); extern int rl_kill_region PARAMS((int, int));
...@@ -258,6 +259,8 @@ extern int rl_vi_check PARAMS((void)); ...@@ -258,6 +259,8 @@ extern int rl_vi_check PARAMS((void));
extern int rl_vi_domove PARAMS((int, int *)); extern int rl_vi_domove PARAMS((int, int *));
extern int rl_vi_bracktype PARAMS((int)); extern int rl_vi_bracktype PARAMS((int));
extern void rl_vi_start_inserting PARAMS((int, int, int));
/* VI-mode pseudo-bindable commands, used as utility functions. */ /* VI-mode pseudo-bindable commands, used as utility functions. */
extern int rl_vi_fWord PARAMS((int, int)); extern int rl_vi_fWord PARAMS((int, int));
extern int rl_vi_bWord PARAMS((int, int)); extern int rl_vi_bWord PARAMS((int, int));
...@@ -290,12 +293,20 @@ extern int rl_bind_key PARAMS((int, rl_command_func_t *)); ...@@ -290,12 +293,20 @@ extern int rl_bind_key PARAMS((int, rl_command_func_t *));
extern int rl_bind_key_in_map PARAMS((int, rl_command_func_t *, Keymap)); extern int rl_bind_key_in_map PARAMS((int, rl_command_func_t *, Keymap));
extern int rl_unbind_key PARAMS((int)); extern int rl_unbind_key PARAMS((int));
extern int rl_unbind_key_in_map PARAMS((int, Keymap)); extern int rl_unbind_key_in_map PARAMS((int, Keymap));
extern int rl_bind_key_if_unbound PARAMS((int, rl_command_func_t *));
extern int rl_bind_key_if_unbound_in_map PARAMS((int, rl_command_func_t *, Keymap));
extern int rl_unbind_function_in_map PARAMS((rl_command_func_t *, Keymap)); extern int rl_unbind_function_in_map PARAMS((rl_command_func_t *, Keymap));
extern int rl_unbind_command_in_map PARAMS((const char *, Keymap)); extern int rl_unbind_command_in_map PARAMS((const char *, Keymap));
extern int rl_set_key PARAMS((const char *, rl_command_func_t *, Keymap)); extern int rl_bind_keyseq PARAMS((const char *, rl_command_func_t *));
extern int rl_bind_keyseq_in_map PARAMS((const char *, rl_command_func_t *, Keymap));
extern int rl_bind_keyseq_if_unbound PARAMS((const char *, rl_command_func_t *));
extern int rl_bind_keyseq_if_unbound_in_map PARAMS((const char *, rl_command_func_t *, Keymap));
extern int rl_generic_bind PARAMS((int, const char *, char *, Keymap)); extern int rl_generic_bind PARAMS((int, const char *, char *, Keymap));
extern int rl_variable_bind PARAMS((const char *, const char *)); extern int rl_variable_bind PARAMS((const char *, const char *));
/* Backwards compatibility, use rl_bind_keyseq_in_map instead. */
extern int rl_set_key PARAMS((const char *, rl_command_func_t *, Keymap));
/* Backwards compatibility, use rl_generic_bind instead. */ /* Backwards compatibility, use rl_generic_bind instead. */
extern int rl_macro_bind PARAMS((const char *, const char *, Keymap)); extern int rl_macro_bind PARAMS((const char *, const char *, Keymap));
...@@ -329,7 +340,7 @@ extern void rl_set_keymap PARAMS((Keymap)); ...@@ -329,7 +340,7 @@ extern void rl_set_keymap PARAMS((Keymap));
extern Keymap rl_get_keymap PARAMS((void)); extern Keymap rl_get_keymap PARAMS((void));
/* Undocumented; used internally only. */ /* Undocumented; used internally only. */
extern void rl_set_keymap_from_edit_mode PARAMS((void)); extern void rl_set_keymap_from_edit_mode PARAMS((void));
extern const char *rl_get_keymap_name_from_edit_mode PARAMS((void)); extern char *rl_get_keymap_name_from_edit_mode PARAMS((void));
/* Functions for manipulating the funmap, which maps command names to functions. */ /* Functions for manipulating the funmap, which maps command names to functions. */
extern int rl_add_funmap_entry PARAMS((const char *, rl_command_func_t *)); extern int rl_add_funmap_entry PARAMS((const char *, rl_command_func_t *));
...@@ -358,7 +369,7 @@ extern int rl_clear_message PARAMS((void)); ...@@ -358,7 +369,7 @@ extern int rl_clear_message PARAMS((void));
extern int rl_reset_line_state PARAMS((void)); extern int rl_reset_line_state PARAMS((void));
extern int rl_crlf PARAMS((void)); extern int rl_crlf PARAMS((void));
#if (defined (__STDC__) || defined (__cplusplus)) && defined (USE_VARARGS) && defined (PREFER_STDARG) #if defined (USE_VARARGS) && defined (PREFER_STDARG)
extern int rl_message (const char *, ...) __attribute__((__format__ (printf, 1, 2))); extern int rl_message (const char *, ...) __attribute__((__format__ (printf, 1, 2)));
#else #else
extern int rl_message (); extern int rl_message ();
...@@ -384,13 +395,14 @@ extern char *rl_copy_text PARAMS((int, int)); ...@@ -384,13 +395,14 @@ extern char *rl_copy_text PARAMS((int, int));
extern void rl_prep_terminal PARAMS((int)); extern void rl_prep_terminal PARAMS((int));
extern void rl_deprep_terminal PARAMS((void)); extern void rl_deprep_terminal PARAMS((void));
extern void rl_tty_set_default_bindings PARAMS((Keymap)); extern void rl_tty_set_default_bindings PARAMS((Keymap));
extern void rl_tty_unset_default_bindings PARAMS((Keymap));
extern int rl_reset_terminal PARAMS((const char *)); extern int rl_reset_terminal PARAMS((const char *));
extern void rl_resize_terminal PARAMS((void)); extern void rl_resize_terminal PARAMS((void));
extern void rl_set_screen_size PARAMS((int, int)); extern void rl_set_screen_size PARAMS((int, int));
extern void rl_get_screen_size PARAMS((int *, int *)); extern void rl_get_screen_size PARAMS((int *, int *));
extern const char *rl_get_termcap PARAMS((const char *)); extern char *rl_get_termcap PARAMS((const char *));
/* Functions for character input. */ /* Functions for character input. */
extern int rl_stuff_char PARAMS((int)); extern int rl_stuff_char PARAMS((int));
...@@ -603,7 +615,12 @@ extern const char *rl_basic_word_break_characters; ...@@ -603,7 +615,12 @@ extern const char *rl_basic_word_break_characters;
/* The list of characters that signal a break between words for /* The list of characters that signal a break between words for
rl_complete_internal. The default list is the contents of rl_complete_internal. The default list is the contents of
rl_basic_word_break_characters. */ rl_basic_word_break_characters. */
extern const char *rl_completer_word_break_characters; extern /*const*/ char *rl_completer_word_break_characters;
/* Hook function to allow an application to set the completion word
break characters before readline breaks up the line. Allows
position-dependent word break characters. */
extern rl_cpvfunc_t *rl_completion_word_break_hook;
/* List of characters which can be used to quote a substring of the line. /* List of characters which can be used to quote a substring of the line.
Completion occurs on the entire substring, and within the substring Completion occurs on the entire substring, and within the substring
...@@ -687,6 +704,11 @@ extern int rl_attempted_completion_over; ...@@ -687,6 +704,11 @@ extern int rl_attempted_completion_over;
functions. */ functions. */
extern int rl_completion_type; extern int rl_completion_type;
/* Up to this many items will be displayed in response to a
possible-completions call. After that, we ask the user if she
is sure she wants to see them all. The default value is 100. */
extern int rl_completion_query_items;
/* Character appended to completed words when at the end of the line. The /* Character appended to completed words when at the end of the line. The
default is a space. Nothing is added if this is '\0'. */ default is a space. Nothing is added if this is '\0'. */
extern int rl_completion_append_character; extern int rl_completion_append_character;
...@@ -695,10 +717,18 @@ extern int rl_completion_append_character; ...@@ -695,10 +717,18 @@ extern int rl_completion_append_character;
rl_completion_append_character will not be appended. */ rl_completion_append_character will not be appended. */
extern int rl_completion_suppress_append; extern int rl_completion_suppress_append;
/* Up to this many items will be displayed in response to a /* Set to any quote character readline thinks it finds before any application
possible-completions call. After that, we ask the user if she completion function is called. */
is sure she wants to see them all. The default value is 100. */ extern int rl_completion_quote_character;
extern int rl_completion_query_items;
/* Set to a non-zero value if readline found quoting anywhere in the word to
be completed; set before any application completion function is called. */
extern int rl_completion_found_quote;
/* If non-zero, the completion functions don't append any closing quote.
This is set to 0 by rl_complete_internal and may be changed by an
application-specific completion function. */
extern int rl_completion_suppress_quote;
/* If non-zero, a slash will be appended to completed filenames that are /* If non-zero, a slash will be appended to completed filenames that are
symbolic links to directory names, subject to the value of the symbolic links to directory names, subject to the value of the
...@@ -749,6 +779,7 @@ extern int rl_inhibit_completion; ...@@ -749,6 +779,7 @@ extern int rl_inhibit_completion;
#define RL_STATE_SIGHANDLER 0x08000 /* in readline sighandler */ #define RL_STATE_SIGHANDLER 0x08000 /* in readline sighandler */
#define RL_STATE_UNDOING 0x10000 /* doing an undo */ #define RL_STATE_UNDOING 0x10000 /* doing an undo */
#define RL_STATE_INPUTPENDING 0x20000 /* rl_execute_next called */ #define RL_STATE_INPUTPENDING 0x20000 /* rl_execute_next called */
#define RL_STATE_TTYCSAVED 0x40000 /* tty special chars saved */
#define RL_STATE_DONE 0x80000 /* done; accepted line */ #define RL_STATE_DONE 0x80000 /* done; accepted line */
...@@ -785,6 +816,12 @@ struct readline_state { ...@@ -785,6 +816,12 @@ struct readline_state {
int catchsigs; int catchsigs;
int catchsigwinch; int catchsigwinch;
/* search state */
/* completion state */
/* options state */
/* reserved for future expansion, so the struct size doesn't change */ /* reserved for future expansion, so the struct size doesn't change */
char reserved[64]; char reserved[64];
}; };
......
...@@ -32,10 +32,6 @@ ...@@ -32,10 +32,6 @@
#include "rlstdc.h" #include "rlstdc.h"
#if !defined(__attribute__) && (defined(__cplusplus) || !defined(__GNUC__) || __GNUC__ == 2 && __GNUC_MINOR__ <8)
#define __attribute__(A)
#endif
#if defined (_POSIX_VERSION) && !defined (TERMIOS_MISSING) #if defined (_POSIX_VERSION) && !defined (TERMIOS_MISSING)
# define TERMIOS_TTY_DRIVER # define TERMIOS_TTY_DRIVER
#else #else
...@@ -81,7 +77,7 @@ extern int _rl_stricmp PARAMS((char *, char *)); ...@@ -81,7 +77,7 @@ extern int _rl_stricmp PARAMS((char *, char *));
extern int _rl_strnicmp PARAMS((char *, char *, int)); extern int _rl_strnicmp PARAMS((char *, char *, int));
#endif #endif
#if defined (HAVE_STRPBRK) #if defined (HAVE_STRPBRK) && !defined (HAVE_MULTIBYTE)
# define _rl_strpbrk(a,b) strpbrk((a),(b)) # define _rl_strpbrk(a,b) strpbrk((a),(b))
#else #else
extern char *_rl_strpbrk PARAMS((const char *, const char *)); extern char *_rl_strpbrk PARAMS((const char *, const char *));
......
...@@ -35,11 +35,18 @@ ...@@ -35,11 +35,18 @@
#if defined (HAVE_WCTYPE_H) && defined (HAVE_WCHAR_H) #if defined (HAVE_WCTYPE_H) && defined (HAVE_WCHAR_H)
# include <wchar.h> # include <wchar.h>
# include <wctype.h> # include <wctype.h>
# if defined (HAVE_MBSRTOWCS) /* system is supposed to support XPG5 */ # if defined (HAVE_MBSRTOWCS) && defined (HAVE_MBRTOWC) && defined (HAVE_MBRLEN) && defined (HAVE_WCWIDTH)
/* system is supposed to support XPG5 */
# define HANDLE_MULTIBYTE 1 # define HANDLE_MULTIBYTE 1
# endif # endif
#endif #endif
/* If we don't want multibyte chars even on a system that supports them, let
the configuring user turn multibyte support off. */
#if defined (NO_MULTIBYTE_SUPPORT)
# undef HANDLE_MULTIBYTE
#endif
/* Some systems, like BeOS, have multibyte encodings but lack mbstate_t. */ /* Some systems, like BeOS, have multibyte encodings but lack mbstate_t. */
#if HANDLE_MULTIBYTE && !defined (HAVE_MBSTATE_T) #if HANDLE_MULTIBYTE && !defined (HAVE_MBSTATE_T)
# define wcsrtombs(dest, src, len, ps) (wcsrtombs) (dest, src, len, 0) # define wcsrtombs(dest, src, len, ps) (wcsrtombs) (dest, src, len, 0)
...@@ -82,14 +89,17 @@ extern int _rl_find_next_mbchar PARAMS((char *, int, int, int)); ...@@ -82,14 +89,17 @@ extern int _rl_find_next_mbchar PARAMS((char *, int, int, int));
#ifdef HANDLE_MULTIBYTE #ifdef HANDLE_MULTIBYTE
extern int _rl_compare_chars PARAMS((char *, int, mbstate_t *, char *, int, mbstate_t *)); extern int _rl_compare_chars PARAMS((char *, int, mbstate_t *, char *, int, mbstate_t *));
extern int _rl_get_char_len PARAMS((const char *, mbstate_t *)); extern int _rl_get_char_len PARAMS((char *, mbstate_t *));
extern int _rl_adjust_point PARAMS((const char *, int, mbstate_t *)); extern int _rl_adjust_point PARAMS((char *, int, mbstate_t *));
extern int _rl_read_mbchar PARAMS((char *, int)); extern int _rl_read_mbchar PARAMS((char *, int));
extern int _rl_read_mbstring PARAMS((int, char *, int)); extern int _rl_read_mbstring PARAMS((int, char *, int));
extern int _rl_is_mbchar_matched PARAMS((char *, int, int, char *, int)); extern int _rl_is_mbchar_matched PARAMS((char *, int, int, char *, int));
#define MB_INVALIDCH(x) ((x) == (size_t)-1 || (x) == (size_t)-2)
#define MB_NULLWCH(x) ((x) == 0)
#else /* !HANDLE_MULTIBYTE */ #else /* !HANDLE_MULTIBYTE */
#undef MB_LEN_MAX #undef MB_LEN_MAX
...@@ -101,6 +111,9 @@ extern int _rl_is_mbchar_matched PARAMS((char *, int, int, char *, int)); ...@@ -101,6 +111,9 @@ extern int _rl_is_mbchar_matched PARAMS((char *, int, int, char *, int));
#define _rl_find_prev_mbchar(b, i, f) (((i) == 0) ? (i) : ((i) - 1)) #define _rl_find_prev_mbchar(b, i, f) (((i) == 0) ? (i) : ((i) - 1))
#define _rl_find_next_mbchar(b, i1, i2, f) ((i1) + (i2)) #define _rl_find_next_mbchar(b, i1, i2, f) ((i1) + (i2))
#define MB_INVALIDCH(x) (0)
#define MB_NULLWCH(x) (0)
#endif /* !HANDLE_MULTIBYTE */ #endif /* !HANDLE_MULTIBYTE */
extern int rl_byte_oriented; extern int rl_byte_oriented;
......
/* rlprivate.h -- functions and variables global to the readline library, /* rlprivate.h -- functions and variables global to the readline library,
but not intended for use by applications. */ but not intended for use by applications. */
/* Copyright (C) 1999 Free Software Foundation, Inc. /* Copyright (C) 1999-2004 Free Software Foundation, Inc.
This file is part of the GNU Readline Library, a library for This file is part of the GNU Readline Library, a library for
reading lines of text with interactive input and history editing. reading lines of text with interactive input and history editing.
...@@ -73,7 +73,7 @@ extern int rl_set_retained_kills PARAMS((int)); ...@@ -73,7 +73,7 @@ extern int rl_set_retained_kills PARAMS((int));
extern void _rl_set_screen_size PARAMS((int, int)); extern void _rl_set_screen_size PARAMS((int, int));
/* undo.c */ /* undo.c */
extern int _rl_fix_last_undo_of_type PARAMS((unsigned int, int, int)); extern int _rl_fix_last_undo_of_type PARAMS((int, int, int));
/* util.c */ /* util.c */
extern char *_rl_savestring PARAMS((const char *)); extern char *_rl_savestring PARAMS((const char *));
...@@ -103,7 +103,6 @@ extern int readline_internal_char PARAMS((void)); ...@@ -103,7 +103,6 @@ extern int readline_internal_char PARAMS((void));
#endif /* READLINE_CALLBACKS */ #endif /* READLINE_CALLBACKS */
/* bind.c */ /* bind.c */
extern void _rl_bind_if_unbound PARAMS((const char *, rl_command_func_t *));
/* complete.c */ /* complete.c */
extern char _rl_find_completion_word PARAMS((int *, int *)); extern char _rl_find_completion_word PARAMS((int *, int *));
...@@ -131,6 +130,7 @@ extern int _rl_input_available PARAMS((void)); ...@@ -131,6 +130,7 @@ extern int _rl_input_available PARAMS((void));
extern int _rl_input_queued PARAMS((int)); extern int _rl_input_queued PARAMS((int));
extern void _rl_insert_typein PARAMS((int)); extern void _rl_insert_typein PARAMS((int));
extern int _rl_unget_char PARAMS((int)); extern int _rl_unget_char PARAMS((int));
extern int _rl_pushed_input_available PARAMS((void));
/* macro.c */ /* macro.c */
extern void _rl_with_macro_input PARAMS((char *)); extern void _rl_with_macro_input PARAMS((char *));
...@@ -219,6 +219,7 @@ extern const char *_rl_possible_meta_prefixes[]; ...@@ -219,6 +219,7 @@ extern const char *_rl_possible_meta_prefixes[];
/* complete.c */ /* complete.c */
extern int _rl_complete_show_all; extern int _rl_complete_show_all;
extern int _rl_complete_show_unmodified;
extern int _rl_complete_mark_directories; extern int _rl_complete_mark_directories;
extern int _rl_complete_mark_symlink_dirs; extern int _rl_complete_mark_symlink_dirs;
extern int _rl_print_completions_horizontally; extern int _rl_print_completions_horizontally;
...@@ -230,7 +231,7 @@ extern int _rl_page_completions; ...@@ -230,7 +231,7 @@ extern int _rl_page_completions;
extern int _rl_vis_botlin; extern int _rl_vis_botlin;
extern int _rl_last_c_pos; extern int _rl_last_c_pos;
extern int _rl_suppress_redisplay; extern int _rl_suppress_redisplay;
extern const char *rl_display_prompt; extern char *rl_display_prompt;
/* isearch.c */ /* isearch.c */
extern char *_rl_isearch_terminators; extern char *_rl_isearch_terminators;
...@@ -261,16 +262,16 @@ extern procenv_t readline_top_level; ...@@ -261,16 +262,16 @@ extern procenv_t readline_top_level;
/* terminal.c */ /* terminal.c */
extern int _rl_enable_keypad; extern int _rl_enable_keypad;
extern int _rl_enable_meta; extern int _rl_enable_meta;
extern const char *_rl_term_clreol; extern char *_rl_term_clreol;
extern const char *_rl_term_clrpag; extern char *_rl_term_clrpag;
extern const char *_rl_term_im; extern char *_rl_term_im;
extern const char *_rl_term_ic; extern char *_rl_term_ic;
extern const char *_rl_term_ei; extern char *_rl_term_ei;
extern const char *_rl_term_DC; extern char *_rl_term_DC;
extern const char *_rl_term_up; extern char *_rl_term_up;
extern const char *_rl_term_dc; extern char *_rl_term_dc;
extern const char *_rl_term_cr; extern char *_rl_term_cr;
extern const char *_rl_term_IC; extern char *_rl_term_IC;
extern int _rl_screenheight; extern int _rl_screenheight;
extern int _rl_screenwidth; extern int _rl_screenwidth;
extern int _rl_screenchars; extern int _rl_screenchars;
...@@ -281,4 +282,7 @@ extern int _rl_term_autowrap; ...@@ -281,4 +282,7 @@ extern int _rl_term_autowrap;
extern int _rl_doing_an_undo; extern int _rl_doing_an_undo;
extern int _rl_undo_group_level; extern int _rl_undo_group_level;
/* vi_mode.c */
extern int _rl_vi_last_command;
#endif /* _RL_PRIVATE_H_ */ #endif /* _RL_PRIVATE_H_ */
...@@ -37,7 +37,7 @@ ...@@ -37,7 +37,7 @@
#endif #endif
#ifndef __attribute__ #ifndef __attribute__
# if __GNUC__ < 2 || (__GNUC__ == 2 && __GNUC_MINOR__ < 8) || __STRICT_ANSI__ # if __GNUC__ < 2 || (__GNUC__ == 2 && __GNUC_MINOR__ < 8)
# define __attribute__(x) # define __attribute__(x)
# endif # endif
#endif #endif
......
...@@ -184,6 +184,8 @@ static int set_tty_settings PARAMS((int, TIOTYPE *)); ...@@ -184,6 +184,8 @@ static int set_tty_settings PARAMS((int, TIOTYPE *));
static void prepare_terminal_settings PARAMS((int, TIOTYPE, TIOTYPE *)); static void prepare_terminal_settings PARAMS((int, TIOTYPE, TIOTYPE *));
static void set_special_char PARAMS((Keymap, TIOTYPE *, int, rl_command_func_t));
static void static void
save_tty_chars (tiop) save_tty_chars (tiop)
TIOTYPE *tiop; TIOTYPE *tiop;
...@@ -398,6 +400,9 @@ static int set_tty_settings PARAMS((int, TIOTYPE *)); ...@@ -398,6 +400,9 @@ static int set_tty_settings PARAMS((int, TIOTYPE *));
static void prepare_terminal_settings PARAMS((int, TIOTYPE, TIOTYPE *)); static void prepare_terminal_settings PARAMS((int, TIOTYPE, TIOTYPE *));
static void set_special_char PARAMS((Keymap, TIOTYPE *, int, rl_command_func_t));
static void _rl_bind_tty_special_chars PARAMS((Keymap, TIOTYPE));
#if defined (FLUSHO) #if defined (FLUSHO)
# define OUTPUT_BEING_FLUSHED(tp) (tp->c_lflag & FLUSHO) # define OUTPUT_BEING_FLUSHED(tp) (tp->c_lflag & FLUSHO)
#else #else
...@@ -650,7 +655,10 @@ rl_prep_terminal (meta_flag) ...@@ -650,7 +655,10 @@ rl_prep_terminal (meta_flag)
otio = tio; otio = tio;
rl_tty_unset_default_bindings (_rl_keymap);
save_tty_chars (&otio); save_tty_chars (&otio);
RL_SETSTATE(RL_STATE_TTYCSAVED);
_rl_bind_tty_special_chars (_rl_keymap, tio);
prepare_terminal_settings (meta_flag, otio, &tio); prepare_terminal_settings (meta_flag, otio, &tio);
...@@ -709,7 +717,7 @@ rl_deprep_terminal () ...@@ -709,7 +717,7 @@ rl_deprep_terminal ()
int int
rl_restart_output (count, key) rl_restart_output (count, key)
int count __attribute__((unused)), key __attribute__((unused)); int count, key;
{ {
int fildes = fileno (rl_outstream); int fildes = fileno (rl_outstream);
#if defined (TIOCSTART) #if defined (TIOCSTART)
...@@ -742,7 +750,7 @@ rl_restart_output (count, key) ...@@ -742,7 +750,7 @@ rl_restart_output (count, key)
int int
rl_stop_output (count, key) rl_stop_output (count, key)
int count __attribute__((unused)), key __attribute__((unused)); int count, key;
{ {
int fildes = fileno (rl_instream); int fildes = fileno (rl_instream);
...@@ -774,70 +782,97 @@ rl_stop_output (count, key) ...@@ -774,70 +782,97 @@ rl_stop_output (count, key)
/* */ /* */
/* **************************************************************** */ /* **************************************************************** */
/* Set the system's default editing characters to their readline equivalents #define SET_SPECIAL(sc, func) set_special_char(kmap, &ttybuff, sc, func)
in KMAP. Should be static, now that we have rl_tty_set_default_bindings. */
void
rltty_set_default_bindings (kmap)
Keymap kmap;
{
TIOTYPE ttybuff;
int tty = fileno (rl_instream);
#if defined (NEW_TTY_DRIVER) #if defined (NEW_TTY_DRIVER)
static void
set_special_char (kmap, tiop, sc, func)
Keymap kmap;
TIOTYPE *tiop;
int sc;
rl_command_func_t *func;
{
if (sc != -1 && kmap[(unsigned char)sc].type == ISFUNC)
kmap[(unsigned char)sc].function = func;
}
#define SET_SPECIAL(sc, func) \ #define RESET_SPECIAL(c) \
do \ if (c != -1 && kmap[(unsigned char)c].type == ISFUNC)
{ \ kmap[(unsigned char)c].function = rl_insert;
int ic; \
ic = sc; \
if (ic != -1 && kmap[(unsigned char)ic].type == ISFUNC) \
kmap[(unsigned char)ic].function = func; \
} \
while (0)
if (get_tty_settings (tty, &ttybuff) == 0) static void
_rl_bind_tty_special_chars (kmap, ttybuff)
Keymap kmap;
TIOTYPE ttybuff;
{
if (ttybuff.flags & SGTTY_SET)
{ {
if (ttybuff.flags & SGTTY_SET) SET_SPECIAL (ttybuff.sgttyb.sg_erase, rl_rubout);
{ SET_SPECIAL (ttybuff.sgttyb.sg_kill, rl_unix_line_discard);
SET_SPECIAL (ttybuff.sgttyb.sg_erase, rl_rubout); }
SET_SPECIAL (ttybuff.sgttyb.sg_kill, rl_unix_line_discard);
}
# if defined (TIOCGLTC) # if defined (TIOCGLTC)
if (ttybuff.flags & LTCHARS_SET) if (ttybuff.flags & LTCHARS_SET)
{ {
SET_SPECIAL (ttybuff.ltchars.t_werasc, rl_unix_word_rubout); SET_SPECIAL (ttybuff.ltchars.t_werasc, rl_unix_word_rubout);
SET_SPECIAL (ttybuff.ltchars.t_lnextc, rl_quoted_insert); SET_SPECIAL (ttybuff.ltchars.t_lnextc, rl_quoted_insert);
}
# endif /* TIOCGLTC */
} }
# endif /* TIOCGLTC */
}
#else /* !NEW_TTY_DRIVER */ #else /* !NEW_TTY_DRIVER */
static void
set_special_char (kmap, tiop, sc, func)
Keymap kmap;
TIOTYPE *tiop;
int sc;
rl_command_func_t *func;
{
unsigned char uc;
#define SET_SPECIAL(sc, func) \ uc = tiop->c_cc[sc];
do \ if (uc != (unsigned char)_POSIX_VDISABLE && kmap[uc].type == ISFUNC)
{ \ kmap[uc].function = func;
unsigned char uc; \ }
uc = ttybuff.c_cc[sc]; \
if (uc != (unsigned char)_POSIX_VDISABLE && kmap[uc].type == ISFUNC) \
kmap[uc].function = func; \
} \
while (0)
if (get_tty_settings (tty, &ttybuff) == 0) /* used later */
{ #define RESET_SPECIAL(uc) \
SET_SPECIAL (VERASE, rl_rubout); if (uc != (unsigned char)_POSIX_VDISABLE && kmap[uc].type == ISFUNC) \
SET_SPECIAL (VKILL, rl_unix_line_discard); kmap[uc].function = rl_insert;
static void
_rl_bind_tty_special_chars (kmap, ttybuff)
Keymap kmap;
TIOTYPE ttybuff;
{
SET_SPECIAL (VERASE, rl_rubout);
SET_SPECIAL (VKILL, rl_unix_line_discard);
# if defined (VLNEXT) && defined (TERMIOS_TTY_DRIVER) # if defined (VLNEXT) && defined (TERMIOS_TTY_DRIVER)
SET_SPECIAL (VLNEXT, rl_quoted_insert); SET_SPECIAL (VLNEXT, rl_quoted_insert);
# endif /* VLNEXT && TERMIOS_TTY_DRIVER */ # endif /* VLNEXT && TERMIOS_TTY_DRIVER */
# if defined (VWERASE) && defined (TERMIOS_TTY_DRIVER) # if defined (VWERASE) && defined (TERMIOS_TTY_DRIVER)
SET_SPECIAL (VWERASE, rl_unix_word_rubout); SET_SPECIAL (VWERASE, rl_unix_word_rubout);
# endif /* VWERASE && TERMIOS_TTY_DRIVER */ # endif /* VWERASE && TERMIOS_TTY_DRIVER */
} }
#endif /* !NEW_TTY_DRIVER */ #endif /* !NEW_TTY_DRIVER */
/* Set the system's default editing characters to their readline equivalents
in KMAP. Should be static, now that we have rl_tty_set_default_bindings. */
void
rltty_set_default_bindings (kmap)
Keymap kmap;
{
TIOTYPE ttybuff;
int tty;
static int called = 0;
tty = fileno (rl_instream);
if (get_tty_settings (tty, &ttybuff) == 0)
_rl_bind_tty_special_chars (kmap, ttybuff);
} }
/* New public way to set the system default editing chars to their readline /* New public way to set the system default editing chars to their readline
...@@ -849,6 +884,30 @@ rl_tty_set_default_bindings (kmap) ...@@ -849,6 +884,30 @@ rl_tty_set_default_bindings (kmap)
rltty_set_default_bindings (kmap); rltty_set_default_bindings (kmap);
} }
/* Rebind all of the tty special chars that readline worries about back
to self-insert. Call this before saving the current terminal special
chars with save_tty_chars(). This only works on POSIX termios or termio
systems. */
void
rl_tty_unset_default_bindings (kmap)
Keymap kmap;
{
/* Don't bother before we've saved the tty special chars at least once. */
if (RL_ISSTATE(RL_STATE_TTYCSAVED) == 0)
return;
RESET_SPECIAL (_rl_tty_chars.t_erase);
RESET_SPECIAL (_rl_tty_chars.t_kill);
# if defined (VLNEXT) && defined (TERMIOS_TTY_DRIVER)
RESET_SPECIAL (_rl_tty_chars.t_lnext);
# endif /* VLNEXT && TERMIOS_TTY_DRIVER */
# if defined (VWERASE) && defined (TERMIOS_TTY_DRIVER)
RESET_SPECIAL (_rl_tty_chars.t_werase);
# endif /* VWERASE && TERMIOS_TTY_DRIVER */
}
#if defined (HANDLE_SIGNALS) #if defined (HANDLE_SIGNALS)
#if defined (NEW_TTY_DRIVER) #if defined (NEW_TTY_DRIVER)
......
...@@ -61,22 +61,22 @@ ...@@ -61,22 +61,22 @@
#endif /* !NEW_TTY_DRIVER && !_POSIX_VDISABLE */ #endif /* !NEW_TTY_DRIVER && !_POSIX_VDISABLE */
typedef struct _rl_tty_chars { typedef struct _rl_tty_chars {
char t_eof; unsigned char t_eof;
char t_eol; unsigned char t_eol;
char t_eol2; unsigned char t_eol2;
char t_erase; unsigned char t_erase;
char t_werase; unsigned char t_werase;
char t_kill; unsigned char t_kill;
char t_reprint; unsigned char t_reprint;
char t_intr; unsigned char t_intr;
char t_quit; unsigned char t_quit;
char t_susp; unsigned char t_susp;
char t_dsusp; unsigned char t_dsusp;
char t_start; unsigned char t_start;
char t_stop; unsigned char t_stop;
char t_lnext; unsigned char t_lnext;
char t_flush; unsigned char t_flush;
char t_status; unsigned char t_status;
} _RL_TTY_CHARS; } _RL_TTY_CHARS;
#endif /* _RLTTY_H_ */ #endif /* _RLTTY_H_ */
/* rltypedefs.h -- Type declarations for readline functions. */ /* rltypedefs.h -- Type declarations for readline functions. */
/* Copyright (C) 2000 Free Software Foundation, Inc. /* Copyright (C) 2000-2004 Free Software Foundation, Inc.
This file is part of the GNU Readline Library, a library for This file is part of the GNU Readline Library, a library for
reading lines of text with interactive input and history editing. reading lines of text with interactive input and history editing.
...@@ -79,6 +79,12 @@ typedef void rl_voidfunc_t PARAMS((void)); ...@@ -79,6 +79,12 @@ typedef void rl_voidfunc_t PARAMS((void));
typedef void rl_vintfunc_t PARAMS((int)); typedef void rl_vintfunc_t PARAMS((int));
typedef void rl_vcpfunc_t PARAMS((char *)); typedef void rl_vcpfunc_t PARAMS((char *));
typedef void rl_vcppfunc_t PARAMS((char **)); typedef void rl_vcppfunc_t PARAMS((char **));
typedef char *rl_cpvfunc_t PARAMS((void));
typedef char *rl_cpifunc_t PARAMS((int));
typedef char *rl_cpcpfunc_t PARAMS((char *));
typedef char *rl_cpcppfunc_t PARAMS((char **));
#endif /* _RL_FUNCTION_TYPEDEF */ #endif /* _RL_FUNCTION_TYPEDEF */
#ifdef __cplusplus #ifdef __cplusplus
......
/* savestring.c */
/* Copyright (C) 1998,2003 Free Software Foundation, Inc.
This file is part of the GNU Readline Library, a library for
reading lines of text with interactive input and history editing.
The GNU Readline Library 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 2, or
(at your option) any later version.
The GNU Readline Library 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.
The GNU General Public License is often shipped with GNU software, and
is generally kept in a file called COPYING or LICENSE. If you do not
have a copy of the license, write to the Free Software Foundation,
59 Temple Place, Suite 330, Boston, MA 02111 USA. */
#define READLINE_LIBRARY
#include "config_readline.h"
#ifdef HAVE_STRING_H
# include <string.h>
#endif
#include "xmalloc.h"
/* Backwards compatibility, now that savestring has been removed from
all `public' readline header files. */
char *
savestring (s)
const char *s;
{
return ((char *)strcpy ((char *)xmalloc (1 + strlen (s)), (s)));
}
...@@ -80,8 +80,13 @@ static void ...@@ -80,8 +80,13 @@ static void
make_history_line_current (entry) make_history_line_current (entry)
HIST_ENTRY *entry; HIST_ENTRY *entry;
{ {
rl_replace_line (entry->line, 0); #if 0
rl_replace_line (entry->line, 1);
rl_undo_list = (UNDO_LIST *)entry->data; rl_undo_list = (UNDO_LIST *)entry->data;
#else
_rl_replace_text (entry->line, 0, rl_end);
_rl_fix_point (1);
#endif
if (_rl_saved_line_for_history) if (_rl_saved_line_for_history)
_rl_free_history_entry (_rl_saved_line_for_history); _rl_free_history_entry (_rl_saved_line_for_history);
...@@ -187,6 +192,11 @@ noninc_search (dir, pchar) ...@@ -187,6 +192,11 @@ noninc_search (dir, pchar)
saved_point = rl_point; saved_point = rl_point;
saved_mark = rl_mark; saved_mark = rl_mark;
/* Clear the undo list, since reading the search string should create its
own undo list, and the whole list will end up being freed when we
finish reading the search string. */
rl_undo_list = 0;
/* Use the line buffer to read the search string. */ /* Use the line buffer to read the search string. */
rl_line_buffer[0] = 0; rl_line_buffer[0] = 0;
rl_end = rl_point = 0; rl_end = rl_point = 0;
...@@ -294,7 +304,7 @@ noninc_search (dir, pchar) ...@@ -294,7 +304,7 @@ noninc_search (dir, pchar)
code calls this, KEY will be `?'. */ code calls this, KEY will be `?'. */
int int
rl_noninc_forward_search (count, key) rl_noninc_forward_search (count, key)
int count __attribute__((unused)), key __attribute__((unused)); int count, key;
{ {
noninc_search (1, (key == '?') ? '?' : 0); noninc_search (1, (key == '?') ? '?' : 0);
return 0; return 0;
...@@ -304,7 +314,7 @@ rl_noninc_forward_search (count, key) ...@@ -304,7 +314,7 @@ rl_noninc_forward_search (count, key)
calls this, KEY will be `/'. */ calls this, KEY will be `/'. */
int int
rl_noninc_reverse_search (count, key) rl_noninc_reverse_search (count, key)
int count __attribute__((unused)), key __attribute__((unused)); int count, key;
{ {
noninc_search (-1, (key == '/') ? '/' : 0); noninc_search (-1, (key == '/') ? '/' : 0);
return 0; return 0;
...@@ -314,7 +324,7 @@ rl_noninc_reverse_search (count, key) ...@@ -314,7 +324,7 @@ rl_noninc_reverse_search (count, key)
for. If there is no saved search string, abort. */ for. If there is no saved search string, abort. */
int int
rl_noninc_forward_search_again (count, key) rl_noninc_forward_search_again (count, key)
int count __attribute__((unused)), key __attribute__((unused)); int count, key;
{ {
if (!noninc_search_string) if (!noninc_search_string)
{ {
...@@ -329,7 +339,7 @@ rl_noninc_forward_search_again (count, key) ...@@ -329,7 +339,7 @@ rl_noninc_forward_search_again (count, key)
for. If there is no saved search string, abort. */ for. If there is no saved search string, abort. */
int int
rl_noninc_reverse_search_again (count, key) rl_noninc_reverse_search_again (count, key)
int count __attribute__((unused)), key __attribute__((unused)); int count, key;
{ {
if (!noninc_search_string) if (!noninc_search_string)
{ {
......
...@@ -124,6 +124,7 @@ sh_set_lines_and_columns (lines, cols) ...@@ -124,6 +124,7 @@ sh_set_lines_and_columns (lines, cols)
b = (char *)xmalloc (INT_STRLEN_BOUND (int) + sizeof ("LINES=") + 1); b = (char *)xmalloc (INT_STRLEN_BOUND (int) + sizeof ("LINES=") + 1);
sprintf (b, "LINES=%d", lines); sprintf (b, "LINES=%d", lines);
putenv (b); putenv (b);
b = (char *)xmalloc (INT_STRLEN_BOUND (int) + sizeof ("COLUMNS=") + 1); b = (char *)xmalloc (INT_STRLEN_BOUND (int) + sizeof ("COLUMNS=") + 1);
sprintf (b, "COLUMNS=%d", cols); sprintf (b, "COLUMNS=%d", cols);
putenv (b); putenv (b);
...@@ -132,9 +133,12 @@ sh_set_lines_and_columns (lines, cols) ...@@ -132,9 +133,12 @@ sh_set_lines_and_columns (lines, cols)
b = (char *)xmalloc (INT_STRLEN_BOUND (int) + 1); b = (char *)xmalloc (INT_STRLEN_BOUND (int) + 1);
sprintf (b, "%d", lines); sprintf (b, "%d", lines);
setenv ("LINES", b, 1); setenv ("LINES", b, 1);
free (b);
b = (char *)xmalloc (INT_STRLEN_BOUND (int) + 1); b = (char *)xmalloc (INT_STRLEN_BOUND (int) + 1);
sprintf (b, "%d", cols); sprintf (b, "%d", cols);
setenv ("COLUMNS", b, 1); setenv ("COLUMNS", b, 1);
free (b);
# endif /* HAVE_SETENV */ # endif /* HAVE_SETENV */
#endif /* !HAVE_PUTENV */ #endif /* !HAVE_PUTENV */
} }
......
...@@ -71,6 +71,10 @@ typedef struct { SigHandler *sa_handler; int sa_mask, sa_flags; } sighandler_cxt ...@@ -71,6 +71,10 @@ typedef struct { SigHandler *sa_handler; int sa_mask, sa_flags; } sighandler_cxt
# define sigemptyset(m) # define sigemptyset(m)
#endif /* !HAVE_POSIX_SIGNALS */ #endif /* !HAVE_POSIX_SIGNALS */
#ifndef SA_RESTART
# define SA_RESTART 0
#endif
static SigHandler *rl_set_sighandler PARAMS((int, SigHandler *, sighandler_cxt *)); static SigHandler *rl_set_sighandler PARAMS((int, SigHandler *, sighandler_cxt *));
static void rl_maybe_set_sighandler PARAMS((int, SigHandler *, sighandler_cxt *)); static void rl_maybe_set_sighandler PARAMS((int, SigHandler *, sighandler_cxt *));
...@@ -83,6 +87,8 @@ int rl_catch_signals = 1; ...@@ -83,6 +87,8 @@ int rl_catch_signals = 1;
/* If non-zero, readline will install a signal handler for SIGWINCH. */ /* If non-zero, readline will install a signal handler for SIGWINCH. */
#ifdef SIGWINCH #ifdef SIGWINCH
int rl_catch_sigwinch = 1; int rl_catch_sigwinch = 1;
#else
int rl_catch_sigwinch = 0; /* for the readline state struct in readline.c */
#endif #endif
static int signals_set_flag; static int signals_set_flag;
...@@ -231,7 +237,7 @@ rl_set_sighandler (sig, handler, ohandler) ...@@ -231,7 +237,7 @@ rl_set_sighandler (sig, handler, ohandler)
struct sigaction act; struct sigaction act;
act.sa_handler = handler; act.sa_handler = handler;
act.sa_flags = 0; /* XXX - should we set SA_RESTART for SIGWINCH? */ act.sa_flags = (sig == SIGWINCH) ? SA_RESTART : 0;
sigemptyset (&act.sa_mask); sigemptyset (&act.sa_mask);
sigemptyset (&ohandler->sa_mask); sigemptyset (&ohandler->sa_mask);
sigaction (sig, &act, &old_handler); sigaction (sig, &act, &old_handler);
......
...@@ -82,41 +82,40 @@ static int tcap_initialized; ...@@ -82,41 +82,40 @@ static int tcap_initialized;
# if defined (__EMX__) || defined (NEED_EXTERN_PC) # if defined (__EMX__) || defined (NEED_EXTERN_PC)
extern extern
# endif /* __EMX__ || NEED_EXTERN_PC */ # endif /* __EMX__ || NEED_EXTERN_PC */
char PC; char PC, *BC, *UP;
char *BC, *UP;
#endif /* __linux__ */ #endif /* __linux__ */
/* Some strings to control terminal actions. These are output by tputs (). */ /* Some strings to control terminal actions. These are output by tputs (). */
const char *_rl_term_clreol; char *_rl_term_clreol;
const char *_rl_term_clrpag; char *_rl_term_clrpag;
const char *_rl_term_cr; char *_rl_term_cr;
const char *_rl_term_backspace; char *_rl_term_backspace;
const char *_rl_term_goto; char *_rl_term_goto;
const char *_rl_term_pc; char *_rl_term_pc;
/* Non-zero if we determine that the terminal can do character insertion. */ /* Non-zero if we determine that the terminal can do character insertion. */
int _rl_terminal_can_insert = 0; int _rl_terminal_can_insert = 0;
/* How to insert characters. */ /* How to insert characters. */
const char *_rl_term_im; char *_rl_term_im;
const char *_rl_term_ei; char *_rl_term_ei;
const char *_rl_term_ic; char *_rl_term_ic;
const char *_rl_term_ip; char *_rl_term_ip;
const char *_rl_term_IC; char *_rl_term_IC;
/* How to delete characters. */ /* How to delete characters. */
const char *_rl_term_dc; char *_rl_term_dc;
const char *_rl_term_DC; char *_rl_term_DC;
#if defined (HACK_TERMCAP_MOTION) #if defined (HACK_TERMCAP_MOTION)
char *_rl_term_forward_char; char *_rl_term_forward_char;
#endif /* HACK_TERMCAP_MOTION */ #endif /* HACK_TERMCAP_MOTION */
/* How to go up a line. */ /* How to go up a line. */
const char *_rl_term_up; char *_rl_term_up;
/* A visible bell; char if the terminal can be made to flash the screen. */ /* A visible bell; char if the terminal can be made to flash the screen. */
static const char *_rl_visible_bell; static char *_rl_visible_bell;
/* Non-zero means the terminal can auto-wrap lines. */ /* Non-zero means the terminal can auto-wrap lines. */
int _rl_term_autowrap; int _rl_term_autowrap;
...@@ -126,30 +125,30 @@ static int term_has_meta; ...@@ -126,30 +125,30 @@ static int term_has_meta;
/* The sequences to write to turn on and off the meta key, if this /* The sequences to write to turn on and off the meta key, if this
terminal has one. */ terminal has one. */
static const char *_rl_term_mm; static char *_rl_term_mm;
static const char *_rl_term_mo; static char *_rl_term_mo;
/* The key sequences output by the arrow keys, if this terminal has any. */ /* The key sequences output by the arrow keys, if this terminal has any. */
static const char *_rl_term_ku; static char *_rl_term_ku;
static const char *_rl_term_kd; static char *_rl_term_kd;
static const char *_rl_term_kr; static char *_rl_term_kr;
static const char *_rl_term_kl; static char *_rl_term_kl;
/* How to initialize and reset the arrow keys, if this terminal has any. */ /* How to initialize and reset the arrow keys, if this terminal has any. */
static const char *_rl_term_ks; static char *_rl_term_ks;
static const char *_rl_term_ke; static char *_rl_term_ke;
/* The key sequences sent by the Home and End keys, if any. */ /* The key sequences sent by the Home and End keys, if any. */
static const char *_rl_term_kh; static char *_rl_term_kh;
static const char *_rl_term_kH; static char *_rl_term_kH;
static const char *_rl_term_at7; /* @7 */ static char *_rl_term_at7; /* @7 */
/* Insert key */ /* Insert key */
static const char *_rl_term_kI; static char *_rl_term_kI;
/* Cursor control */ /* Cursor control */
static const char *_rl_term_vs; /* very visible */ static char *_rl_term_vs; /* very visible */
static const char *_rl_term_ve; /* normal */ static char *_rl_term_ve; /* normal */
static void bind_termcap_arrow_keys PARAMS((Keymap)); static void bind_termcap_arrow_keys PARAMS((Keymap));
...@@ -295,7 +294,7 @@ rl_resize_terminal () ...@@ -295,7 +294,7 @@ rl_resize_terminal ()
struct _tc_string { struct _tc_string {
const char *tc_var; const char *tc_var;
const char **tc_value; char **tc_value;
}; };
/* This should be kept sorted, just in case we decide to change the /* This should be kept sorted, just in case we decide to change the
...@@ -343,14 +342,10 @@ get_term_capabilities (bp) ...@@ -343,14 +342,10 @@ get_term_capabilities (bp)
char **bp; char **bp;
{ {
#if !defined (__DJGPP__) /* XXX - doesn't DJGPP have a termcap library? */ #if !defined (__DJGPP__) /* XXX - doesn't DJGPP have a termcap library? */
register unsigned int i; register int i;
for (i = 0; i < NUM_TC_STRINGS; i++) for (i = 0; i < NUM_TC_STRINGS; i++)
# if defined(__LCC__) || defined(__MWERKS__)
*(tc_strings[i].tc_value) = tgetstr ((char *)tc_strings[i].tc_var, bp); *(tc_strings[i].tc_value) = tgetstr ((char *)tc_strings[i].tc_var, bp);
# else
*(tc_strings[i].tc_value) = tgetstr (tc_strings[i].tc_var, bp);
# endif
#endif #endif
tcap_initialized = 1; tcap_initialized = 1;
} }
...@@ -432,8 +427,8 @@ _rl_init_terminal_io (terminal_name) ...@@ -432,8 +427,8 @@ _rl_init_terminal_io (terminal_name)
tgoto if _rl_term_IC or _rl_term_DC is defined, but just in case we tgoto if _rl_term_IC or _rl_term_DC is defined, but just in case we
change that later... */ change that later... */
PC = '\0'; PC = '\0';
BC = (char*)(_rl_term_backspace = "\b"); BC = _rl_term_backspace = "\b";
UP = (char*)_rl_term_up; UP = _rl_term_up;
return 0; return 0;
} }
...@@ -443,8 +438,8 @@ _rl_init_terminal_io (terminal_name) ...@@ -443,8 +438,8 @@ _rl_init_terminal_io (terminal_name)
/* Set up the variables that the termcap library expects the application /* Set up the variables that the termcap library expects the application
to provide. */ to provide. */
PC = _rl_term_pc ? *_rl_term_pc : 0; PC = _rl_term_pc ? *_rl_term_pc : 0;
BC = (char*)_rl_term_backspace; BC = _rl_term_backspace;
UP = (char*)_rl_term_up; UP = _rl_term_up;
if (!_rl_term_cr) if (!_rl_term_cr)
_rl_term_cr = "\r"; _rl_term_cr = "\r";
...@@ -488,22 +483,22 @@ bind_termcap_arrow_keys (map) ...@@ -488,22 +483,22 @@ bind_termcap_arrow_keys (map)
xkeymap = _rl_keymap; xkeymap = _rl_keymap;
_rl_keymap = map; _rl_keymap = map;
_rl_bind_if_unbound (_rl_term_ku, rl_get_previous_history); rl_bind_keyseq_if_unbound (_rl_term_ku, rl_get_previous_history);
_rl_bind_if_unbound (_rl_term_kd, rl_get_next_history); rl_bind_keyseq_if_unbound (_rl_term_kd, rl_get_next_history);
_rl_bind_if_unbound (_rl_term_kr, rl_forward); rl_bind_keyseq_if_unbound (_rl_term_kr, rl_forward_char);
_rl_bind_if_unbound (_rl_term_kl, rl_backward); rl_bind_keyseq_if_unbound (_rl_term_kl, rl_backward_char);
_rl_bind_if_unbound (_rl_term_kh, rl_beg_of_line); /* Home */ rl_bind_keyseq_if_unbound (_rl_term_kh, rl_beg_of_line); /* Home */
_rl_bind_if_unbound (_rl_term_at7, rl_end_of_line); /* End */ rl_bind_keyseq_if_unbound (_rl_term_at7, rl_end_of_line); /* End */
_rl_keymap = xkeymap; _rl_keymap = xkeymap;
} }
const char * char *
rl_get_termcap (cap) rl_get_termcap (cap)
const char *cap; const char *cap;
{ {
register unsigned int i; register int i;
if (tcap_initialized == 0) if (tcap_initialized == 0)
return ((char *)NULL); return ((char *)NULL);
......
/* text.c -- text handling commands for readline. */ /* text.c -- text handling commands for readline. */
/* Copyright (C) 1987-2002 Free Software Foundation, Inc. /* Copyright (C) 1987-2004 Free Software Foundation, Inc.
This file is part of the GNU Readline Library, a library for This file is part of the GNU Readline Library, a library for
reading lines of text with interactive input and history editing. reading lines of text with interactive input and history editing.
...@@ -168,6 +168,9 @@ _rl_fix_point (fix_mark_too) ...@@ -168,6 +168,9 @@ _rl_fix_point (fix_mark_too)
} }
#undef _RL_FIX_POINT #undef _RL_FIX_POINT
/* Replace the contents of the line buffer between START and END with
TEXT. The operation is undoable. To replace the entire line in an
undoable mode, use _rl_replace_text(text, 0, rl_end); */
int int
_rl_replace_text (text, start, end) _rl_replace_text (text, start, end)
const char *text; const char *text;
...@@ -400,7 +403,7 @@ rl_backward (count, key) ...@@ -400,7 +403,7 @@ rl_backward (count, key)
/* Move to the beginning of the line. */ /* Move to the beginning of the line. */
int int
rl_beg_of_line (count, key) rl_beg_of_line (count, key)
int count __attribute__((unused)), key __attribute__((unused)); int count, key;
{ {
rl_point = 0; rl_point = 0;
return 0; return 0;
...@@ -409,7 +412,7 @@ rl_beg_of_line (count, key) ...@@ -409,7 +412,7 @@ rl_beg_of_line (count, key)
/* Move to the end of the line. */ /* Move to the end of the line. */
int int
rl_end_of_line (count, key) rl_end_of_line (count, key)
int count __attribute__((unused)), key __attribute__((unused)); int count, key;
{ {
rl_point = rl_end; rl_point = rl_end;
return 0; return 0;
...@@ -506,7 +509,7 @@ rl_backward_word (count, key) ...@@ -506,7 +509,7 @@ rl_backward_word (count, key)
/* Clear the current line. Numeric argument to C-l does this. */ /* Clear the current line. Numeric argument to C-l does this. */
int int
rl_refresh_line (ignore1, ignore2) rl_refresh_line (ignore1, ignore2)
int ignore1 __attribute__((unused)), ignore2 __attribute__((unused)); int ignore1, ignore2;
{ {
int curr_line; int curr_line;
...@@ -545,7 +548,7 @@ rl_clear_screen (count, key) ...@@ -545,7 +548,7 @@ rl_clear_screen (count, key)
int int
rl_arrow_keys (count, c) rl_arrow_keys (count, c)
int count, c __attribute__((unused)); int count, c;
{ {
int ch; int ch;
...@@ -799,13 +802,10 @@ _rl_overwrite_char (count, c) ...@@ -799,13 +802,10 @@ _rl_overwrite_char (count, c)
k = _rl_read_mbstring (c, mbkey, MB_LEN_MAX); k = _rl_read_mbstring (c, mbkey, MB_LEN_MAX);
#endif #endif
rl_begin_undo_group ();
for (i = 0; i < count; i++) for (i = 0; i < count; i++)
{ {
rl_begin_undo_group ();
if (rl_point < rl_end)
rl_delete (1, c);
#if defined (HANDLE_MULTIBYTE) #if defined (HANDLE_MULTIBYTE)
if (MB_CUR_MAX > 1 && rl_byte_oriented == 0) if (MB_CUR_MAX > 1 && rl_byte_oriented == 0)
rl_insert_text (mbkey); rl_insert_text (mbkey);
...@@ -813,9 +813,12 @@ _rl_overwrite_char (count, c) ...@@ -813,9 +813,12 @@ _rl_overwrite_char (count, c)
#endif #endif
_rl_insert_char (1, c); _rl_insert_char (1, c);
rl_end_undo_group (); if (rl_point < rl_end)
rl_delete (1, c);
} }
rl_end_undo_group ();
return 0; return 0;
} }
...@@ -830,7 +833,7 @@ rl_insert (count, c) ...@@ -830,7 +833,7 @@ rl_insert (count, c)
/* Insert the next typed character verbatim. */ /* Insert the next typed character verbatim. */
int int
rl_quoted_insert (count, key) rl_quoted_insert (count, key)
int count, key __attribute__((unused)); int count, key;
{ {
int c; int c;
...@@ -852,7 +855,7 @@ rl_quoted_insert (count, key) ...@@ -852,7 +855,7 @@ rl_quoted_insert (count, key)
/* Insert a tab character. */ /* Insert a tab character. */
int int
rl_tab_insert (count, key) rl_tab_insert (count, key)
int count, key __attribute__((unused)); int count, key;
{ {
return (_rl_insert_char (count, '\t')); return (_rl_insert_char (count, '\t'));
} }
...@@ -862,7 +865,7 @@ rl_tab_insert (count, key) ...@@ -862,7 +865,7 @@ rl_tab_insert (count, key)
meaning in the future. */ meaning in the future. */
int int
rl_newline (count, key) rl_newline (count, key)
int count __attribute__((unused)), key __attribute__((unused)); int count, key;
{ {
rl_done = 1; rl_done = 1;
...@@ -875,7 +878,8 @@ rl_newline (count, key) ...@@ -875,7 +878,8 @@ rl_newline (count, key)
if (rl_editing_mode == vi_mode) if (rl_editing_mode == vi_mode)
{ {
_rl_vi_done_inserting (); _rl_vi_done_inserting ();
_rl_vi_reset_last (); if (_rl_vi_textmod_command (_rl_vi_last_command) == 0) /* XXX */
_rl_vi_reset_last ();
} }
#endif /* VI_MODE */ #endif /* VI_MODE */
...@@ -895,7 +899,7 @@ rl_newline (count, key) ...@@ -895,7 +899,7 @@ rl_newline (count, key)
is special cased. */ is special cased. */
int int
rl_do_lowercase_version (ignore1, ignore2) rl_do_lowercase_version (ignore1, ignore2)
int ignore1 __attribute__((unused)), ignore2 __attribute__((unused)); int ignore1, ignore2;
{ {
return 0; return 0;
} }
...@@ -933,9 +937,12 @@ _rl_overwrite_rubout (count, key) ...@@ -933,9 +937,12 @@ _rl_overwrite_rubout (count, key)
rl_delete_text (opoint, rl_point); rl_delete_text (opoint, rl_point);
/* Emacs puts point at the beginning of the sequence of spaces. */ /* Emacs puts point at the beginning of the sequence of spaces. */
opoint = rl_point; if (rl_point < rl_end)
_rl_insert_char (l, ' '); {
rl_point = opoint; opoint = rl_point;
_rl_insert_char (l, ' ');
rl_point = opoint;
}
rl_end_undo_group (); rl_end_undo_group ();
...@@ -1087,7 +1094,7 @@ rl_rubout_or_delete (count, key) ...@@ -1087,7 +1094,7 @@ rl_rubout_or_delete (count, key)
/* Delete all spaces and tabs around point. */ /* Delete all spaces and tabs around point. */
int int
rl_delete_horizontal_space (count, ignore) rl_delete_horizontal_space (count, ignore)
int count __attribute__((unused)), ignore __attribute__((unused)); int count, ignore;
{ {
int start = rl_point; int start = rl_point;
...@@ -1128,9 +1135,9 @@ rl_delete_or_show_completions (count, key) ...@@ -1128,9 +1135,9 @@ rl_delete_or_show_completions (count, key)
A K*rn shell style function. */ A K*rn shell style function. */
int int
rl_insert_comment (count, key) rl_insert_comment (count, key)
int count __attribute__((unused)), key; int count, key;
{ {
const char *rl_comment_text; char *rl_comment_text;
int rl_comment_len; int rl_comment_len;
rl_beg_of_line (1, key); rl_beg_of_line (1, key);
...@@ -1167,7 +1174,7 @@ rl_insert_comment (count, key) ...@@ -1167,7 +1174,7 @@ rl_insert_comment (count, key)
/* Uppercase the word at point. */ /* Uppercase the word at point. */
int int
rl_upcase_word (count, key) rl_upcase_word (count, key)
int count, key __attribute__((unused)); int count, key;
{ {
return (rl_change_case (count, UpCase)); return (rl_change_case (count, UpCase));
} }
...@@ -1175,7 +1182,7 @@ rl_upcase_word (count, key) ...@@ -1175,7 +1182,7 @@ rl_upcase_word (count, key)
/* Lowercase the word at point. */ /* Lowercase the word at point. */
int int
rl_downcase_word (count, key) rl_downcase_word (count, key)
int count, key __attribute__((unused)); int count, key;
{ {
return (rl_change_case (count, DownCase)); return (rl_change_case (count, DownCase));
} }
...@@ -1183,7 +1190,7 @@ rl_downcase_word (count, key) ...@@ -1183,7 +1190,7 @@ rl_downcase_word (count, key)
/* Upcase the first letter, downcase the rest. */ /* Upcase the first letter, downcase the rest. */
int int
rl_capitalize_word (count, key) rl_capitalize_word (count, key)
int count, key __attribute__((unused)); int count, key;
{ {
return (rl_change_case (count, CapCase)); return (rl_change_case (count, CapCase));
} }
...@@ -1308,7 +1315,7 @@ rl_transpose_words (count, key) ...@@ -1308,7 +1315,7 @@ rl_transpose_words (count, key)
then transpose the characters before point. */ then transpose the characters before point. */
int int
rl_transpose_chars (count, key) rl_transpose_chars (count, key)
int count, key __attribute__((unused)); int count, key;
{ {
#if defined (HANDLE_MULTIBYTE) #if defined (HANDLE_MULTIBYTE)
char *dummy; char *dummy;
...@@ -1480,14 +1487,14 @@ _rl_char_search (count, fdir, bdir) ...@@ -1480,14 +1487,14 @@ _rl_char_search (count, fdir, bdir)
int int
rl_char_search (count, key) rl_char_search (count, key)
int count, key __attribute__((unused)); int count, key;
{ {
return (_rl_char_search (count, FFIND, BFIND)); return (_rl_char_search (count, FFIND, BFIND));
} }
int int
rl_backward_char_search (count, key) rl_backward_char_search (count, key)
int count, key __attribute__((unused)); int count, key;
{ {
return (_rl_char_search (count, BFIND, FFIND)); return (_rl_char_search (count, BFIND, FFIND));
} }
...@@ -1513,7 +1520,7 @@ _rl_set_mark_at_pos (position) ...@@ -1513,7 +1520,7 @@ _rl_set_mark_at_pos (position)
/* A bindable command to set the mark. */ /* A bindable command to set the mark. */
int int
rl_set_mark (count, key) rl_set_mark (count, key)
int count, key __attribute__((unused)); int count, key;
{ {
return (_rl_set_mark_at_pos (rl_explicit_arg ? count : rl_point)); return (_rl_set_mark_at_pos (rl_explicit_arg ? count : rl_point));
} }
...@@ -1521,7 +1528,7 @@ rl_set_mark (count, key) ...@@ -1521,7 +1528,7 @@ rl_set_mark (count, key)
/* Exchange the position of mark and point. */ /* Exchange the position of mark and point. */
int int
rl_exchange_point_and_mark (count, key) rl_exchange_point_and_mark (count, key)
int count __attribute__((unused)), key __attribute__((unused)); int count, key;
{ {
if (rl_mark > rl_end) if (rl_mark > rl_end)
rl_mark = -1; rl_mark = -1;
......
...@@ -19,6 +19,8 @@ ...@@ -19,6 +19,8 @@
along with Readline; see the file COPYING. If not, write to the Free along with Readline; see the file COPYING. If not, write to the Free
Software Foundation, 59 Temple Place, Suite 330, Boston, MA 02111 USA. */ Software Foundation, 59 Temple Place, Suite 330, Boston, MA 02111 USA. */
#define READLINE_LIBRARY
#include "config_readline.h" #include "config_readline.h"
#if defined (HAVE_UNISTD_H) #if defined (HAVE_UNISTD_H)
...@@ -188,7 +190,7 @@ tilde_expand (string) ...@@ -188,7 +190,7 @@ tilde_expand (string)
int result_size, result_index; int result_size, result_index;
result_index = result_size = 0; result_index = result_size = 0;
if ((result = strchr(string, '~'))) if (result = strchr (string, '~'))
result = (char *)xmalloc (result_size = (strlen (string) + 16)); result = (char *)xmalloc (result_size = (strlen (string) + 16));
else else
result = (char *)xmalloc (result_size = (strlen (string) + 1)); result = (char *)xmalloc (result_size = (strlen (string) + 1));
......
...@@ -169,8 +169,7 @@ rl_do_undo () ...@@ -169,8 +169,7 @@ rl_do_undo ()
int int
_rl_fix_last_undo_of_type (type, start, end) _rl_fix_last_undo_of_type (type, start, end)
unsigned int type; int type, start, end;
int start, end;
{ {
UNDO_LIST *rl; UNDO_LIST *rl;
...@@ -228,7 +227,7 @@ rl_modifying (start, end) ...@@ -228,7 +227,7 @@ rl_modifying (start, end)
/* Revert the current line to its previous state. */ /* Revert the current line to its previous state. */
int int
rl_revert_line (count, key) rl_revert_line (count, key)
int count __attribute__((unused)), key __attribute__((unused)); int count, key;
{ {
if (!rl_undo_list) if (!rl_undo_list)
rl_ding (); rl_ding ();
...@@ -243,7 +242,7 @@ rl_revert_line (count, key) ...@@ -243,7 +242,7 @@ rl_revert_line (count, key)
/* Do some undoing of things that were done. */ /* Do some undoing of things that were done. */
int int
rl_undo_command (count, key) rl_undo_command (count, key)
int count, key __attribute__((unused)); int count, key;
{ {
if (count < 0) if (count < 0)
return 0; /* Nothing to do. */ return 0; /* Nothing to do. */
......
...@@ -96,14 +96,14 @@ _rl_abort_internal () ...@@ -96,14 +96,14 @@ _rl_abort_internal ()
int int
rl_abort (count, key) rl_abort (count, key)
int count __attribute__((unused)), key __attribute__((unused)); int count, key;
{ {
return (_rl_abort_internal ()); return (_rl_abort_internal ());
} }
int int
rl_tty_status (count, key) rl_tty_status (count, key)
int count __attribute__((unused)), key __attribute__((unused)); int count, key;
{ {
#if defined (TIOCSTAT) #if defined (TIOCSTAT)
ioctl (1, TIOCSTAT, (char *)0); ioctl (1, TIOCSTAT, (char *)0);
...@@ -153,7 +153,7 @@ rl_extend_line_buffer (len) ...@@ -153,7 +153,7 @@ rl_extend_line_buffer (len)
/* A function for simple tilde expansion. */ /* A function for simple tilde expansion. */
int int
rl_tilde_expand (ignore, key) rl_tilde_expand (ignore, key)
int ignore __attribute__((unused)), key __attribute__((unused)); int ignore, key;
{ {
register int start, end; register int start, end;
char *homedir, *temp; char *homedir, *temp;
...@@ -248,7 +248,7 @@ _rl_strpbrk (string1, string2) ...@@ -248,7 +248,7 @@ _rl_strpbrk (string1, string2)
{ {
v = _rl_get_char_len (string1, &ps); v = _rl_get_char_len (string1, &ps);
if (v > 1) if (v > 1)
string += v - 1; /* -1 to account for auto-increment in loop */ string1 += v - 1; /* -1 to account for auto-increment in loop */
} }
#endif #endif
} }
......
This diff is collapsed.
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment