view src/terminfo.c @ 22062:029145c16497

(archive-tmpdir): Make the prefix of the temporary directory absolute. (file-name-invalid-regexp): New variable. (archive-zip-case-fiddle): Doc fix. (archive-remote): Make it permanent-local. (archive-member-coding-system): New variable. (archive-mode): Don't use write-contents-hooks for remote archives. Archives whose names are illegal for the current filesystem are marked read-only. (archive-summarize): Optional argument SHUT-UP makes it silent. All callers changed. (archive-unique-fname): New function. (archive-maybe-copy): Use it. (archive-maybe-copy, archive-write-file): Bind coding-system-for-write to no-conversion. (archive-maybe-update, archive-mode-revert): Bind coding-system-for-read to no-conversion. (archive-maybe-update): Remain at the same line in the archive listing, after updating the archive. Print the buffer name of the archive to be saved. (archive-extract): Mark archive members whose names are invalid as read-only. Don't set buffer-file-type. Remove the write-contents hook for remote archives. Warn about read-only archives inside other archives. (archive-write-file-member): Handle remote archives. Restore value of last-coding-system-used. (archive-*-write-file-member): Handle archives inside other archives. Save the value of last-coding-system-used. (archive-write-file): New optional variable FILE: where to write the archive; defaults to buffer-file-name, for remote archives. (archive-zip-summarize, archive-zip-chmod-entry): Support VFAT type of host filesystem. (archive-zip-summarize): Don't fiddle letter case of mixed-case file names.
author Eli Zaretskii <eliz@gnu.org>
date Thu, 14 May 1998 15:08:55 +0000
parents fa9ff387d260
children 49631c494c10
line wrap: on
line source

/* Interface from Emacs to terminfo.
   Copyright (C) 1985, 1986 Free Software Foundation, Inc.

This file is part of GNU Emacs.

GNU Emacs 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.

GNU Emacs 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.

You should have received a copy of the GNU General Public License
along with GNU Emacs; see the file COPYING.  If not, write to
the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
Boston, MA 02111-1307, USA.  */

#include <config.h>

/* Define these variables that serve as global parameters to termcap,
   so that we do not need to conditionalize the places in Emacs
   that set them.  */

char *UP, *BC, PC;

#if defined (HAVE_LIBNCURSES) && ! defined (NCURSES_OSPEED_T)
short ospeed;
#else
#if defined (HAVE_TERMIOS_H) && defined (LINUX)
#include <termios.h>
/* HJL's version of libc is said to need this on the Alpha.
   On the other hand, DEC OSF1 on the Alpha needs ospeed to be a short.  */
speed_t ospeed;
#else
short ospeed;
#endif
#endif

/* Interface to curses/terminfo library.
   Turns out that all of the terminfo-level routines look
   like their termcap counterparts except for tparm, which replaces
   tgoto.  Not only is the calling sequence different, but the string
   format is different too.
*/

char *
tparam (string, outstring, len, arg1, arg2, arg3, arg4, arg5, arg6, arg7, arg8, arg9)
     char *string;
     char *outstring;
     int arg1, arg2, arg3, arg4, arg5, arg6, arg7, arg8, arg9;
{
  char *temp;
  extern char *tparm();

  temp = tparm (string, arg1, arg2, arg3, arg4, arg5, arg6, arg7, arg8, arg9);
  if (outstring == 0)
    outstring = ((char *) (malloc ((strlen (temp)) + 1)));
  strcpy (outstring, temp);
  return outstring;
}