]> code.delx.au - gnu-emacs/blob - lispref/os.texi
*** empty log message ***
[gnu-emacs] / lispref / os.texi
1 @c -*-texinfo-*-
2 @c This is part of the GNU Emacs Lisp Reference Manual.
3 @c Copyright (C) 1990, 1991, 1992, 1993, 1994, 1995, 1998 Free Software Foundation, Inc.
4 @c See the file elisp.texi for copying conditions.
5 @setfilename ../info/os
6 @node System Interface, Tips, Calendar, Top
7 @chapter Operating System Interface
8
9 This chapter is about starting and getting out of Emacs, access to
10 values in the operating system environment, and terminal input, output,
11 and flow control.
12
13 @xref{Building Emacs}, for related information. See also
14 @ref{Display}, for additional operating system status information
15 pertaining to the terminal and the screen.
16
17 @menu
18 * Starting Up:: Customizing Emacs start-up processing.
19 * Getting Out:: How exiting works (permanent or temporary).
20 * System Environment:: Distinguish the name and kind of system.
21 * User Identification:: Finding the name and user id of the user.
22 * Time of Day:: Getting the current time.
23 * Time Conversion:: Converting a time from numeric form to a string, or
24 to calendrical data (or vice versa).
25 * Timers:: Setting a timer to call a function at a certain time.
26 * Terminal Input:: Recording terminal input for debugging.
27 * Terminal Output:: Recording terminal output for debugging.
28 * Special Keysyms:: Defining system-specific key symbols for X windows.
29 * Flow Control:: How to turn output flow control on or off.
30 * Batch Mode:: Running Emacs without terminal interaction.
31 @end menu
32
33 @node Starting Up
34 @section Starting Up Emacs
35
36 This section describes what Emacs does when it is started, and how you
37 can customize these actions.
38
39 @menu
40 * Start-up Summary:: Sequence of actions Emacs performs at start-up.
41 * Init File:: Details on reading the init file (@file{.emacs}).
42 * Terminal-Specific:: How the terminal-specific Lisp file is read.
43 * Command Line Arguments:: How command line arguments are processed,
44 and how you can customize them.
45 @end menu
46
47 @node Start-up Summary
48 @subsection Summary: Sequence of Actions at Start Up
49 @cindex initialization
50 @cindex start up of Emacs
51 @cindex @file{startup.el}
52
53 The order of operations performed (in @file{startup.el}) by Emacs when
54 it is started up is as follows:
55
56 @enumerate
57 @item
58 It adds subdirectories to @code{load-path}, by running the file
59 named @file{subdirs.el} in each directory that is listed.
60
61 @item
62 It sets the language environment and the terminal coding system,
63 if requested by environment variables such as @code{LANG}.
64
65 @item
66 It loads the initialization library for the window system, if you are
67 using a window system. This library's name is
68 @file{term/@var{windowsystem}-win.el}.
69
70 @item
71 It processes the initial options. (Some of them are handled
72 even earlier than this.)
73
74 @item
75 It initializes the window frame and faces, if appropriate.
76
77 @item
78 It runs the normal hook @code{before-init-hook}.
79
80 @item
81 It loads the library @file{site-start}, unless the option
82 @samp{-no-site-file} was specified. The library's file name is usually
83 @file{site-start.el}.
84 @cindex @file{site-start.el}
85
86 @item
87 It loads the file @file{~/.emacs}, unless @samp{-q} or @samp{-batch} was
88 specified on the command line. The @samp{-u} option can specify another
89 user name whose home directory should be used instead of @file{~}.
90
91 @item
92 It loads the library @file{default}, unless @code{inhibit-default-init}
93 is non-@code{nil}. (This is not done in @samp{-batch} mode or if
94 @samp{-q} was specified on the command line.) The library's file name
95 is usually @file{default.el}.
96 @cindex @file{default.el}
97
98 @item
99 It runs the normal hook @code{after-init-hook}.
100
101 @item
102 It sets the major mode according to @code{initial-major-mode}, provided
103 the buffer @samp{*scratch*} is still current and still in Fundamental
104 mode.
105
106 @item
107 It loads the terminal-specific Lisp file, if any, except when in batch
108 mode or using a window system.
109
110 @item
111 It displays the initial echo area message, unless you have suppressed
112 that with @code{inhibit-startup-echo-area-message}.
113
114 @item
115 It processes the action arguments from the command line.
116
117 @item
118 It runs @code{term-setup-hook}.
119
120 @item
121 It calls @code{frame-notice-user-settings}, which modifies the
122 parameters of the selected frame according to whatever the init files
123 specify.
124
125 @item
126 It runs @code{window-setup-hook}. @xref{Window Systems}.
127
128 @item
129 It displays copyleft, nonwarranty, and basic use information, provided
130 there were no remaining command line arguments (a few steps above),
131 the value of @code{inhibit-startup-message} is @code{nil}, and the
132 buffer is still empty.
133 @end enumerate
134
135 @defopt inhibit-startup-message
136 This variable inhibits the initial startup messages (the nonwarranty,
137 etc.). If it is non-@code{nil}, then the messages are not printed.
138
139 This variable exists so you can set it in your personal init file, once
140 you are familiar with the contents of the startup message. Do not set
141 this variable in the init file of a new user, or in a way that affects
142 more than one user, because that would prevent new users from receiving
143 the information they are supposed to see.
144 @end defopt
145
146 @defopt inhibit-startup-echo-area-message
147 This variable controls the display of the startup echo area message.
148 You can suppress the startup echo area message by adding text with this
149 form to your @file{.emacs} file:
150
151 @example
152 (setq inhibit-startup-echo-area-message
153 "@var{your-login-name}")
154 @end example
155
156 Emacs explicitly checks for an expression as shown above in your
157 @file{.emacs} file; your login name must appear in the expression as a
158 Lisp string constant. Other methods of setting
159 @code{inhibit-startup-echo-area-message} to the same value do not
160 inhibit the startup message.
161
162 This way, you can easily inhibit the message for yourself if you wish,
163 but thoughtless copying of your @file{.emacs} file will not inhibit the
164 message for someone else.
165 @end defopt
166
167 @node Init File
168 @subsection The Init File: @file{.emacs}
169 @cindex init file
170 @cindex @file{.emacs}
171
172 When you start Emacs, it normally attempts to load the file
173 @file{.emacs} from your home directory. This file, if it exists, must
174 contain Lisp code. It is called your @dfn{init file}. The command line
175 switches @samp{-q} and @samp{-u} affect the use of the init file;
176 @samp{-q} says not to load an init file, and @samp{-u} says to load a
177 specified user's init file instead of yours. @xref{Entering Emacs,,,
178 emacs, The GNU Emacs Manual}.
179
180 @cindex default init file
181 A site may have a @dfn{default init file}, which is the library named
182 @file{default.el}. Emacs finds the @file{default.el} file through the
183 standard search path for libraries (@pxref{How Programs Do Loading}).
184 The Emacs distribution does not come with this file; sites may provide
185 one for local customizations. If the default init file exists, it is
186 loaded whenever you start Emacs, except in batch mode or if @samp{-q} is
187 specified. But your own personal init file, if any, is loaded first; if
188 it sets @code{inhibit-default-init} to a non-@code{nil} value, then
189 Emacs does not subsequently load the @file{default.el} file.
190
191 Another file for site-customization is @file{site-start.el}. Emacs
192 loads this @emph{before} the user's init file. You can inhibit the
193 loading of this file with the option @samp{-no-site-file}.
194
195 @defvar site-run-file
196 This variable specifies the site-customization file to load before the
197 user's init file. Its normal value is @code{"site-start"}. The only
198 way you can change it with real effect is to do so before dumping
199 Emacs.
200 @end defvar
201
202 If there is a great deal of code in your @file{.emacs} file, you
203 should move it into another file named @file{@var{something}.el},
204 byte-compile it (@pxref{Byte Compilation}), and make your @file{.emacs}
205 file load the other file using @code{load} (@pxref{Loading}).
206
207 @xref{Init File Examples,,, emacs, The GNU Emacs Manual}, for
208 examples of how to make various commonly desired customizations in your
209 @file{.emacs} file.
210
211 @defopt inhibit-default-init
212 This variable prevents Emacs from loading the default initialization
213 library file for your session of Emacs. If its value is non-@code{nil},
214 then the default library is not loaded. The default value is
215 @code{nil}.
216 @end defopt
217
218 @defvar before-init-hook
219 This normal hook is run, once, just before loading all the init files
220 (the user's init file, @file{default.el}, and/or @file{site-start.el}).
221 (The only way to change it with real effect is before dumping Emacs.)
222 @end defvar
223
224 @defvar after-init-hook
225 This normal hook is run, once, just after loading all the init files
226 (the user's init file, @file{default.el}, and/or @file{site-start.el}),
227 before the terminal-specific initialization.
228 @end defvar
229
230 @node Terminal-Specific
231 @subsection Terminal-Specific Initialization
232 @cindex terminal-specific initialization
233
234 Each terminal type can have its own Lisp library that Emacs loads when
235 run on that type of terminal. The library's name is constructed by
236 concatenating the value of the variable @code{term-file-prefix} and the
237 terminal type. Normally, @code{term-file-prefix} has the value
238 @code{"term/"}; changing this is not recommended. Emacs finds the file
239 in the normal manner, by searching the @code{load-path} directories, and
240 trying the @samp{.elc} and @samp{.el} suffixes.
241
242 The usual function of a terminal-specific library is to enable special
243 keys to send sequences that Emacs can recognize. It may also need to
244 set or add to @code{function-key-map} if the Termcap entry does not
245 specify all the terminal's function keys. @xref{Terminal Input}.
246
247 @cindex Termcap
248 When the name of the terminal type contains a hyphen, only the part of
249 the name before the first hyphen is significant in choosing the library
250 name. Thus, terminal types @samp{aaa-48} and @samp{aaa-30-rv} both use
251 the @file{term/aaa} library. If necessary, the library can evaluate
252 @code{(getenv "TERM")} to find the full name of the terminal
253 type.@refill
254
255 Your @file{.emacs} file can prevent the loading of the
256 terminal-specific library by setting the variable
257 @code{term-file-prefix} to @code{nil}. This feature is useful when
258 experimenting with your own peculiar customizations.
259
260 You can also arrange to override some of the actions of the
261 terminal-specific library by setting the variable
262 @code{term-setup-hook}. This is a normal hook which Emacs runs using
263 @code{run-hooks} at the end of Emacs initialization, after loading both
264 your @file{.emacs} file and any terminal-specific libraries. You can
265 use this variable to define initializations for terminals that do not
266 have their own libraries. @xref{Hooks}.
267
268 @defvar term-file-prefix
269 @cindex @code{TERM} environment variable
270 If the @code{term-file-prefix} variable is non-@code{nil}, Emacs loads
271 a terminal-specific initialization file as follows:
272
273 @example
274 (load (concat term-file-prefix (getenv "TERM")))
275 @end example
276
277 @noindent
278 You may set the @code{term-file-prefix} variable to @code{nil} in your
279 @file{.emacs} file if you do not wish to load the
280 terminal-initialization file. To do this, put the following in
281 your @file{.emacs} file: @code{(setq term-file-prefix nil)}.
282 @end defvar
283
284 @defvar term-setup-hook
285 This variable is a normal hook that Emacs runs after loading your
286 @file{.emacs} file, the default initialization file (if any) and the
287 terminal-specific Lisp file.
288
289 You can use @code{term-setup-hook} to override the definitions made by a
290 terminal-specific file.
291 @end defvar
292
293 See @code{window-setup-hook} in @ref{Window Systems}, for a related
294 feature.
295
296 @node Command Line Arguments
297 @subsection Command Line Arguments
298 @cindex command line arguments
299
300 You can use command line arguments to request various actions when you
301 start Emacs. Since you do not need to start Emacs more than once per
302 day, and will often leave your Emacs session running longer than that,
303 command line arguments are hardly ever used. As a practical matter, it
304 is best to avoid making the habit of using them, since this habit would
305 encourage you to kill and restart Emacs unnecessarily often. These
306 options exist for two reasons: to be compatible with other editors (for
307 invocation by other programs) and to enable shell scripts to run
308 specific Lisp programs.
309
310 This section describes how Emacs processes command line arguments,
311 and how you can customize them.
312
313 @ignore
314 (Note that some other editors require you to start afresh each time
315 you want to edit a file. With this kind of editor, you will probably
316 specify the file as a command line argument. The recommended way to
317 use GNU Emacs is to start it only once, just after you log in, and do
318 all your editing in the same Emacs process. Each time you want to edit
319 a different file, you visit it with the existing Emacs, which eventually
320 comes to have many files in it ready for editing. Usually you do not
321 kill the Emacs until you are about to log out.)
322 @end ignore
323
324 @defun command-line
325 This function parses the command line that Emacs was called with,
326 processes it, loads the user's @file{.emacs} file and displays the
327 startup messages.
328 @end defun
329
330 @defvar command-line-processed
331 The value of this variable is @code{t} once the command line has been
332 processed.
333
334 If you redump Emacs by calling @code{dump-emacs}, you may wish to set
335 this variable to @code{nil} first in order to cause the new dumped Emacs
336 to process its new command line arguments.
337 @end defvar
338
339 @defvar command-switch-alist
340 @cindex switches on command line
341 @cindex options on command line
342 @cindex command line options
343 The value of this variable is an alist of user-defined command-line
344 options and associated handler functions. This variable exists so you
345 can add elements to it.
346
347 A @dfn{command line option} is an argument on the command line of the
348 form:
349
350 @example
351 -@var{option}
352 @end example
353
354 The elements of the @code{command-switch-alist} look like this:
355
356 @example
357 (@var{option} . @var{handler-function})
358 @end example
359
360 The @var{handler-function} is called to handle @var{option} and receives
361 the option name as its sole argument.
362
363 In some cases, the option is followed in the command line by an
364 argument. In these cases, the @var{handler-function} can find all the
365 remaining command-line arguments in the variable
366 @code{command-line-args-left}. (The entire list of command-line
367 arguments is in @code{command-line-args}.)
368
369 The command line arguments are parsed by the @code{command-line-1}
370 function in the @file{startup.el} file. See also @ref{Command
371 Switches, , Command Line Switches and Arguments, emacs, The GNU Emacs
372 Manual}.
373 @end defvar
374
375 @defvar command-line-args
376 The value of this variable is the list of command line arguments passed
377 to Emacs.
378 @end defvar
379
380 @defvar command-line-functions
381 This variable's value is a list of functions for handling an
382 unrecognized command-line argument. Each time the next argument to be
383 processed has no special meaning, the functions in this list are called,
384 in order of appearance, until one of them returns a non-@code{nil}
385 value.
386
387 These functions are called with no arguments. They can access the
388 command-line argument under consideration through the variable
389 @code{argi}, which is bound temporarily at this point. The remaining
390 arguments (not including the current one) are in the variable
391 @code{command-line-args-left}.
392
393 When a function recognizes and processes the argument in @code{argi}, it
394 should return a non-@code{nil} value to say it has dealt with that
395 argument. If it has also dealt with some of the following arguments, it
396 can indicate that by deleting them from @code{command-line-args-left}.
397
398 If all of these functions return @code{nil}, then the argument is used
399 as a file name to visit.
400 @end defvar
401
402 @node Getting Out
403 @section Getting Out of Emacs
404 @cindex exiting Emacs
405
406 There are two ways to get out of Emacs: you can kill the Emacs job,
407 which exits permanently, or you can suspend it, which permits you to
408 reenter the Emacs process later. As a practical matter, you seldom kill
409 Emacs---only when you are about to log out. Suspending is much more
410 common.
411
412 @menu
413 * Killing Emacs:: Exiting Emacs irreversibly.
414 * Suspending Emacs:: Exiting Emacs reversibly.
415 @end menu
416
417 @node Killing Emacs
418 @comment node-name, next, previous, up
419 @subsection Killing Emacs
420 @cindex killing Emacs
421
422 Killing Emacs means ending the execution of the Emacs process. The
423 parent process normally resumes control. The low-level primitive for
424 killing Emacs is @code{kill-emacs}.
425
426 @defun kill-emacs &optional exit-data
427 This function exits the Emacs process and kills it.
428
429 If @var{exit-data} is an integer, then it is used as the exit status
430 of the Emacs process. (This is useful primarily in batch operation; see
431 @ref{Batch Mode}.)
432
433 If @var{exit-data} is a string, its contents are stuffed into the
434 terminal input buffer so that the shell (or whatever program next reads
435 input) can read them.
436 @end defun
437
438 All the information in the Emacs process, aside from files that have
439 been saved, is lost when the Emacs is killed. Because killing Emacs
440 inadvertently can lose a lot of work, Emacs queries for confirmation
441 before actually terminating if you have buffers that need saving or
442 subprocesses that are running. This is done in the function
443 @code{save-buffers-kill-emacs}.
444
445 @defvar kill-emacs-query-functions
446 After asking the standard questions, @code{save-buffers-kill-emacs}
447 calls the functions in the list @code{kill-emacs-query-functions}, in
448 order of appearance, with no arguments. These functions can ask for
449 additional confirmation from the user. If any of them returns
450 @code{nil}, Emacs is not killed.
451 @end defvar
452
453 @defvar kill-emacs-hook
454 This variable is a normal hook; once @code{save-buffers-kill-emacs} is
455 finished with all file saving and confirmation, it runs the functions in
456 this hook.
457 @end defvar
458
459 @node Suspending Emacs
460 @subsection Suspending Emacs
461 @cindex suspending Emacs
462
463 @dfn{Suspending Emacs} means stopping Emacs temporarily and returning
464 control to its superior process, which is usually the shell. This
465 allows you to resume editing later in the same Emacs process, with the
466 same buffers, the same kill ring, the same undo history, and so on. To
467 resume Emacs, use the appropriate command in the parent shell---most
468 likely @code{fg}.
469
470 Some operating systems do not support suspension of jobs; on these
471 systems, ``suspension'' actually creates a new shell temporarily as a
472 subprocess of Emacs. Then you would exit the shell to return to Emacs.
473
474 Suspension is not useful with window systems, because the Emacs job
475 may not have a parent that can resume it again, and in any case you can
476 give input to some other job such as a shell merely by moving to a
477 different window. Therefore, suspending is not allowed when Emacs is using
478 a window system.
479
480 @defun suspend-emacs string
481 This function stops Emacs and returns control to the superior process.
482 If and when the superior process resumes Emacs, @code{suspend-emacs}
483 returns @code{nil} to its caller in Lisp.
484
485 If @var{string} is non-@code{nil}, its characters are sent to be read
486 as terminal input by Emacs's superior shell. The characters in
487 @var{string} are not echoed by the superior shell; only the results
488 appear.
489
490 Before suspending, @code{suspend-emacs} runs the normal hook
491 @code{suspend-hook}.
492
493 After the user resumes Emacs, @code{suspend-emacs} runs the normal hook
494 @code{suspend-resume-hook}. @xref{Hooks}.
495
496 The next redisplay after resumption will redraw the entire screen,
497 unless the variable @code{no-redraw-on-reenter} is non-@code{nil}
498 (@pxref{Refresh Screen}).
499
500 In the following example, note that @samp{pwd} is not echoed after
501 Emacs is suspended. But it is read and executed by the shell.
502
503 @smallexample
504 @group
505 (suspend-emacs)
506 @result{} nil
507 @end group
508
509 @group
510 (add-hook 'suspend-hook
511 (function (lambda ()
512 (or (y-or-n-p
513 "Really suspend? ")
514 (error "Suspend cancelled")))))
515 @result{} (lambda nil
516 (or (y-or-n-p "Really suspend? ")
517 (error "Suspend cancelled")))
518 @end group
519 @group
520 (add-hook 'suspend-resume-hook
521 (function (lambda () (message "Resumed!"))))
522 @result{} (lambda nil (message "Resumed!"))
523 @end group
524 @group
525 (suspend-emacs "pwd")
526 @result{} nil
527 @end group
528 @group
529 ---------- Buffer: Minibuffer ----------
530 Really suspend? @kbd{y}
531 ---------- Buffer: Minibuffer ----------
532 @end group
533
534 @group
535 ---------- Parent Shell ----------
536 lewis@@slug[23] % /user/lewis/manual
537 lewis@@slug[24] % fg
538 @end group
539
540 @group
541 ---------- Echo Area ----------
542 Resumed!
543 @end group
544 @end smallexample
545 @end defun
546
547 @defvar suspend-hook
548 This variable is a normal hook run before suspending.
549 @end defvar
550
551 @defvar suspend-resume-hook
552 This variable is a normal hook run after suspending.
553 @end defvar
554
555 @node System Environment
556 @section Operating System Environment
557 @cindex operating system environment
558
559 Emacs provides access to variables in the operating system environment
560 through various functions. These variables include the name of the
561 system, the user's @sc{uid}, and so on.
562
563 @defvar system-configuration
564 This variable holds the GNU configuration name for the hardware/software
565 configuration of your system, as a string. The convenient way to test
566 parts of this string is with @code{string-match}.
567 @end defvar
568
569 @defvar system-type
570 The value of this variable is a symbol indicating the type of operating
571 system Emacs is operating on. Here is a table of the possible values:
572
573 @table @code
574 @item alpha-vms
575 VMS on the Alpha.
576
577 @item aix-v3
578 AIX.
579
580 @item berkeley-unix
581 Berkeley BSD.
582
583 @item dgux
584 Data General DGUX operating system.
585
586 @item gnu
587 the GNU system (using the GNU kernel, which consists of the HURD and Mach).
588
589 @item gnu/linux
590 A GNU/Linux system---that is, a variant GNU system, using the Linux
591 kernel. (These systems are the ones people often call ``Linux,'' but
592 actually Linux is just the kernel, not the whole system.)
593
594 @item hpux
595 Hewlett-Packard HPUX operating system.
596
597 @item irix
598 Silicon Graphics Irix system.
599
600 @item ms-dos
601 Microsoft MS-DOS ``operating system.''
602
603 @item next-mach
604 NeXT Mach-based system.
605
606 @item rtu
607 Masscomp RTU, UCB universe.
608
609 @item unisoft-unix
610 UniSoft UniPlus.
611
612 @item usg-unix-v
613 AT&T System V.
614
615 @item vax-vms
616 VAX VMS.
617
618 @item windows-nt
619 Microsoft windows NT.
620
621 @item xenix
622 SCO Xenix 386.
623 @end table
624
625 We do not wish to add new symbols to make finer distinctions unless it
626 is absolutely necessary! In fact, we hope to eliminate some of these
627 alternatives in the future. We recommend using
628 @code{system-configuration} to distinguish between different operating
629 systems.
630 @end defvar
631
632 @defun system-name
633 This function returns the name of the machine you are running on.
634 @example
635 (system-name)
636 @result{} "www.gnu.org"
637 @end example
638 @end defun
639
640 The symbol @code{system-name} is a variable as well as a function. In
641 fact, the function returns whatever value the variable
642 @code{system-name} currently holds. Thus, you can set the variable
643 @code{system-name} in case Emacs is confused about the name of your
644 system. The variable is also useful for constructing frame titles
645 (@pxref{Frame Titles}).
646
647 @defvar mail-host-address
648 If this variable is non-@code{nil}, it is used instead of
649 @code{system-name} for purposes of generating email addresses. For
650 example, it is used when constructing the default value of
651 @code{user-mail-address}. @xref{User Identification}. (Since this is
652 done when Emacs starts up, the value actually used is the one saved when
653 Emacs was dumped. @xref{Building Emacs}.)
654 @end defvar
655
656 @defun getenv var
657 @cindex environment variable access
658 This function returns the value of the environment variable @var{var},
659 as a string. Within Emacs, the environment variable values are kept in
660 the Lisp variable @code{process-environment}.
661
662 @example
663 @group
664 (getenv "USER")
665 @result{} "lewis"
666 @end group
667
668 @group
669 lewis@@slug[10] % printenv
670 PATH=.:/user/lewis/bin:/usr/bin:/usr/local/bin
671 USER=lewis
672 @end group
673 @group
674 TERM=ibmapa16
675 SHELL=/bin/csh
676 HOME=/user/lewis
677 @end group
678 @end example
679 @end defun
680
681 @c Emacs 19 feature
682 @deffn Command setenv variable value
683 This command sets the value of the environment variable named
684 @var{variable} to @var{value}. Both arguments should be strings. This
685 function works by modifying @code{process-environment}; binding that
686 variable with @code{let} is also reasonable practice.
687 @end deffn
688
689 @defvar process-environment
690 This variable is a list of strings, each describing one environment
691 variable. The functions @code{getenv} and @code{setenv} work by means
692 of this variable.
693
694 @smallexample
695 @group
696 process-environment
697 @result{} ("l=/usr/stanford/lib/gnuemacs/lisp"
698 "PATH=.:/user/lewis/bin:/usr/class:/nfsusr/local/bin"
699 "USER=lewis"
700 @end group
701 @group
702 "TERM=ibmapa16"
703 "SHELL=/bin/csh"
704 "HOME=/user/lewis")
705 @end group
706 @end smallexample
707 @end defvar
708
709 @defvar path-separator
710 This variable holds a string which says which character separates
711 directories in a search path (as found in an environment variable). Its
712 value is @code{":"} for Unix and GNU systems, and @code{";"} for MS-DOS
713 and Windows NT.
714 @end defvar
715
716 @defvar invocation-name
717 This variable holds the program name under which Emacs was invoked. The
718 value is a string, and does not include a directory name.
719 @end defvar
720
721 @defvar invocation-directory
722 This variable holds the directory from which the Emacs executable was
723 invoked, or perhaps @code{nil} if that directory cannot be determined.
724 @end defvar
725
726 @defvar installation-directory
727 If non-@code{nil}, this is a directory within which to look for the
728 @file{lib-src} and @file{etc} subdirectories. This is non-@code{nil}
729 when Emacs can't find those directories in their standard installed
730 locations, but can find them in a directory related somehow to the one
731 containing the Emacs executable.
732 @end defvar
733
734 @defun load-average &optional use-float
735 This function returns the current 1-minute, 5-minute, and 15-minute load
736 averages, in a list.
737
738 By default, the values are integers that are 100 times the system load
739 averages, which indicate the average number of processes trying to run.
740 If @var{use-float} is non-@code{nil}, then they are returned
741 as floating point numbers and without multiplying by 100.
742
743 @example
744 @group
745 (load-average)
746 @result{} (169 48 36)
747 @end group
748 @group
749 (load-average t)
750 @result{} (1.69 0.48 0.36)
751 @end group
752
753 @group
754 lewis@@rocky[5] % uptime
755 11:55am up 1 day, 19:37, 3 users,
756 load average: 1.69, 0.48, 0.36
757 @end group
758 @end example
759 @end defun
760
761 @defun emacs-pid
762 This function returns the process @sc{id} of the Emacs process.
763 @end defun
764
765 @defvar tty-erase-char
766 @tindex tty-erase-char
767 This variable holds the erase character that was selected
768 in the system's terminal driver, before Emacs was started.
769 @end defvar
770
771 @defun setprv privilege-name &optional setp getprv
772 This function sets or resets a VMS privilege. (It does not exist on
773 Unix.) The first arg is the privilege name, as a string. The second
774 argument, @var{setp}, is @code{t} or @code{nil}, indicating whether the
775 privilege is to be turned on or off. Its default is @code{nil}. The
776 function returns @code{t} if successful, @code{nil} otherwise.
777
778 If the third argument, @var{getprv}, is non-@code{nil}, @code{setprv}
779 does not change the privilege, but returns @code{t} or @code{nil}
780 indicating whether the privilege is currently enabled.
781 @end defun
782
783 @node User Identification
784 @section User Identification
785
786 @defvar init-file-user
787 This variable says which user's init files should be used by Emacs---or
788 @code{nil} if none. The value reflects command line options such as
789 @samp{-q} or @samp{-u @var{user}}.
790
791 Lisp packages that load files of customizations, or any other sort of
792 user profile, should obey this variable in deciding where to find it.
793 They should load the profile of the user name found in this variable.
794 If @code{init-file-user} is @code{nil}, meaning that the @samp{-q}
795 option was used, then Lisp packages should not load any customization
796 files or user profile.
797 @end defvar
798
799 @defvar user-mail-address
800 This holds the nominal email address of the user who is using Emacs.
801 Emacs normally sets this variable to a default value after reading your
802 init files, but not if you have already set it. So you can set the
803 variable to some other value in your @file{~/.emacs} file if you do not
804 want to use the default value.
805 @end defvar
806
807 @defun user-login-name &optional uid
808 If you don't specify @var{uid}, this function returns the name under
809 which the user is logged in. If the environment variable @code{LOGNAME}
810 is set, that value is used. Otherwise, if the environment variable
811 @code{USER} is set, that value is used. Otherwise, the value is based
812 on the effective @sc{uid}, not the real @sc{uid}.
813
814 If you specify @var{uid}, the value is the user name that corresponds
815 to @var{uid} (which should be an integer).
816
817 @example
818 @group
819 (user-login-name)
820 @result{} "lewis"
821 @end group
822 @end example
823 @end defun
824
825 @defun user-real-login-name
826 This function returns the user name corresponding to Emacs's real
827 @sc{uid}. This ignores the effective @sc{uid} and ignores the
828 environment variables @code{LOGNAME} and @code{USER}.
829 @end defun
830
831 @defun user-full-name &optional uid
832 This function returns the full name of the logged-in user---or the value
833 of the environment variables @code{NAME}, if that is set.
834
835 @example
836 @group
837 (user-full-name)
838 @result{} "Bil Lewis"
839 @end group
840 @end example
841
842 If the Emacs job's user-id does not correspond to any known user (and
843 provided @code{NAME} is not set), the value is @code{"unknown"}.
844
845 If @var{uid} is non-@code{nil}, then it should be an integer (a user-id)
846 or a string (a login name). Then @code{user-full-name} returns the full
847 name corresponding to that user-id or login name. If you specify a
848 user-id or login name that isn't defined, it returns @code{nil}.
849 @end defun
850
851 @vindex user-full-name
852 @vindex user-real-login-name
853 @vindex user-login-name
854 The symbols @code{user-login-name}, @code{user-real-login-name} and
855 @code{user-full-name} are variables as well as functions. The functions
856 return the same values that the variables hold. These variables allow
857 you to ``fake out'' Emacs by telling the functions what to return. The
858 variables are also useful for constructing frame titles (@pxref{Frame
859 Titles}).
860
861 @defun user-real-uid
862 This function returns the real @sc{uid} of the user.
863
864 @example
865 @group
866 (user-real-uid)
867 @result{} 19
868 @end group
869 @end example
870 @end defun
871
872 @defun user-uid
873 This function returns the effective @sc{uid} of the user.
874 @end defun
875
876 @node Time of Day
877 @section Time of Day
878
879 This section explains how to determine the current time and the time
880 zone.
881
882 @defun current-time-string &optional time-value
883 This function returns the current time and date as a human-readable
884 string. The format of the string is unvarying; the number of characters
885 used for each part is always the same, so you can reliably use
886 @code{substring} to extract pieces of it. It is wise to count the
887 characters from the beginning of the string rather than from the end, as
888 additional information may some day be added at the end.
889
890 @c Emacs 19 feature
891 The argument @var{time-value}, if given, specifies a time to format
892 instead of the current time. The argument should be a list whose first
893 two elements are integers. Thus, you can use times obtained from
894 @code{current-time} (see below) and from @code{file-attributes}
895 (@pxref{File Attributes}).
896
897 @example
898 @group
899 (current-time-string)
900 @result{} "Wed Oct 14 22:21:05 1987"
901 @end group
902 @end example
903 @end defun
904
905 @c Emacs 19 feature
906 @defun current-time
907 This function returns the system's time value as a list of three
908 integers: @code{(@var{high} @var{low} @var{microsec})}. The integers
909 @var{high} and @var{low} combine to give the number of seconds since
910 0:00 January 1, 1970, which is
911 @ifinfo
912 @var{high} * 2**16 + @var{low}.
913 @end ifinfo
914 @tex
915 $high*2^{16}+low$.
916 @end tex
917
918 The third element, @var{microsec}, gives the microseconds since the
919 start of the current second (or 0 for systems that return time only on
920 the resolution of a second).
921
922 The first two elements can be compared with file time values such as you
923 get with the function @code{file-attributes}. @xref{File Attributes}.
924 @end defun
925
926 @c Emacs 19 feature
927 @defun current-time-zone &optional time-value
928 This function returns a list describing the time zone that the user is
929 in.
930
931 The value has the form @code{(@var{offset} @var{name})}. Here
932 @var{offset} is an integer giving the number of seconds ahead of UTC
933 (east of Greenwich). A negative value means west of Greenwich. The
934 second element, @var{name} is a string giving the name of the time
935 zone. Both elements change when daylight savings time begins or ends;
936 if the user has specified a time zone that does not use a seasonal time
937 adjustment, then the value is constant through time.
938
939 If the operating system doesn't supply all the information necessary to
940 compute the value, both elements of the list are @code{nil}.
941
942 The argument @var{time-value}, if given, specifies a time to analyze
943 instead of the current time. The argument should be a cons cell
944 containing two integers, or a list whose first two elements are
945 integers. Thus, you can use times obtained from @code{current-time}
946 (see above) and from @code{file-attributes} (@pxref{File Attributes}).
947 @end defun
948
949 @node Time Conversion
950 @section Time Conversion
951
952 These functions convert time values (lists of two or three integers)
953 to strings or to calendrical information. There is also a function to
954 convert calendrical information to a time value. You can get time
955 values from the functions @code{current-time} (@pxref{Time of Day}) and
956 @code{file-attributes} (@pxref{File Attributes}).
957
958 Many operating systems are limited to time values that contain 32 bits
959 of information; these systems typically handle only the times from
960 1901-12-13 20:45:52 UTC through 2038-01-19 03:14:07 UTC. However, some
961 operating systems have larger time values, and can represent times far
962 in the past or future.
963
964 Time conversion functions always use the Gregorian calendar, even for
965 dates before the Gregorian calendar was introduced. Year numbers count
966 the number of years since the year 1 B.C., and do not skip zero as
967 traditional Gregorian years do; for example, the year number @minus{}37
968 represents the Gregorian year 38 B.C@.
969
970 @defun format-time-string format-string time
971 This function converts @var{time} to a string according to
972 @var{format-string}. The argument @var{format-string} may contain
973 @samp{%}-sequences which say to substitute parts of the time. Here is a
974 table of what the @samp{%}-sequences mean:
975
976 @table @samp
977 @item %a
978 This stands for the abbreviated name of the day of week.
979 @item %A
980 This stands for the full name of the day of week.
981 @item %b
982 This stands for the abbreviated name of the month.
983 @item %B
984 This stands for the full name of the month.
985 @item %c
986 This is a synonym for @samp{%x %X}.
987 @item %C
988 This has a locale-specific meaning. In the default locale (named C), it
989 is equivalent to @samp{%A, %B %e, %Y}.
990 @item %d
991 This stands for the day of month, zero-padded.
992 @item %D
993 This is a synonym for @samp{%m/%d/%y}.
994 @item %e
995 This stands for the day of month, blank-padded.
996 @item %h
997 This is a synonym for @samp{%b}.
998 @item %H
999 This stands for the hour (00-23).
1000 @item %I
1001 This stands for the hour (00-12).
1002 @item %j
1003 This stands for the day of the year (001-366).
1004 @item %k
1005 This stands for the hour (0-23), blank padded.
1006 @item %l
1007 This stands for the hour (1-12), blank padded.
1008 @item %m
1009 This stands for the month (01-12).
1010 @item %M
1011 This stands for the minute (00-59).
1012 @item %n
1013 This stands for a newline.
1014 @item %p
1015 This stands for @samp{AM} or @samp{PM}, as appropriate.
1016 @item %r
1017 This is a synonym for @samp{%I:%M:%S %p}.
1018 @item %R
1019 This is a synonym for @samp{%H:%M}.
1020 @item %S
1021 This stands for the seconds (00-60).
1022 @item %t
1023 This stands for a tab character.
1024 @item %T
1025 This is a synonym for @samp{%H:%M:%S}.
1026 @item %U
1027 This stands for the week of the year (01-52), assuming that weeks
1028 start on Sunday.
1029 @item %w
1030 This stands for the numeric day of week (0-6). Sunday is day 0.
1031 @item %W
1032 This stands for the week of the year (01-52), assuming that weeks
1033 start on Monday.
1034 @item %x
1035 This has a locale-specific meaning. In the default locale (named
1036 @samp{C}), it is equivalent to @samp{%D}.
1037 @item %X
1038 This has a locale-specific meaning. In the default locale (named
1039 @samp{C}), it is equivalent to @samp{%T}.
1040 @item %y
1041 This stands for the year without century (00-99).
1042 @item %Y
1043 This stands for the year with century.
1044 @item %Z
1045 This stands for the time zone abbreviation.
1046 @end table
1047
1048 You can also specify the field width and type of padding for any of
1049 these @samp{%}-sequences. This works as in @code{printf}: you write
1050 the field width as digits in the middle of a @samp{%}-sequences. If you
1051 start the field width with @samp{0}, it means to pad with zeros. If you
1052 start the field width with @samp{_}, it means to pad with spaces.
1053
1054 For example, @samp{%S} specifies the number of seconds since the minute;
1055 @samp{%03S} means to pad this with zeros to 3 positions, @samp{%_3S} to
1056 pad with spaces to 3 positions. Plain @samp{%3S} pads with zeros,
1057 because that is how @samp{%S} normally pads to two positions.
1058 @end defun
1059
1060 @defun decode-time time
1061 This function converts a time value into calendrical information. The
1062 return value is a list of nine elements, as follows:
1063
1064 @example
1065 (@var{seconds} @var{minutes} @var{hour} @var{day} @var{month} @var{year} @var{dow} @var{dst} @var{zone})
1066 @end example
1067
1068 Here is what the elements mean:
1069
1070 @table @var
1071 @item sec
1072 The number of seconds past the minute, as an integer between 0 and 59.
1073 @item minute
1074 The number of minutes past the hour, as an integer between 0 and 59.
1075 @item hour
1076 The hour of the day, as an integer between 0 and 23.
1077 @item day
1078 The day of the month, as an integer between 1 and 31.
1079 @item month
1080 The month of the year, as an integer between 1 and 12.
1081 @item year
1082 The year, an integer typically greater than 1900.
1083 @item dow
1084 The day of week, as an integer between 0 and 6, where 0 stands for
1085 Sunday.
1086 @item dst
1087 @code{t} if daylight savings time is effect, otherwise @code{nil}.
1088 @item zone
1089 An integer indicating the time zone, as the number of seconds east of
1090 Greenwich.
1091 @end table
1092
1093 @strong{Common Lisp Note:} Common Lisp has different meanings for
1094 @var{dow} and @var{zone}.
1095 @end defun
1096
1097 @defun encode-time seconds minutes hour day month year &optional @dots{}zone
1098 This function is the inverse of @code{decode-time}. It converts seven
1099 items of calendrical data into a time value. For the meanings of the
1100 arguments, see the table above under @code{decode-time}.
1101
1102 Year numbers less than 100 are treated just like other year numbers. If
1103 you want them to stand for years above 1900, you must alter them yourself
1104 before you call @code{encode-time}.
1105
1106 The optional argument @var{zone} defaults to the current time zone and
1107 its daylight savings time rules. If specified, it can be either a list
1108 (as you would get from @code{current-time-zone}), a string as in the
1109 @code{TZ} environment variable, or an integer (as you would get from
1110 @code{decode-time}). The specified zone is used without any further
1111 alteration for daylight savings time.
1112
1113 If you pass more than seven arguments to @code{encode-time}, the first
1114 six are used as @var{seconds} through @var{year}, the last argument is
1115 used as @var{zone}, and the arguments in between are ignored. This
1116 feature makes it possible to use the elements of a list returned by
1117 @code{decode-time} as the arguments to @code{encode-time}, like this:
1118
1119 @example
1120 (apply 'encode-time (decode-time @dots{}))
1121 @end example
1122
1123 You can perform simple date arithmetic by using out-of-range values for
1124 the @var{sec}, @var{minute}, @var{hour}, @var{day}, and @var{month}
1125 arguments; for example, day 0 means the day preceding the given month.
1126
1127 The operating system puts limits on the range of possible time values;
1128 if you try to encode a time that is out of range, an error results.
1129 @end defun
1130
1131 @node Timers
1132 @section Timers for Delayed Execution
1133 @cindex timer
1134
1135 You can set up a @dfn{timer} to call a function at a specified future time or
1136 after a certain length of idleness.
1137
1138 Emacs cannot run timers at any arbitrary point in a Lisp program; it
1139 can run them only when Emacs could accept output from a subprocess:
1140 namely, while waiting or inside certain primitive functions such as
1141 @code{sit-for} or @code{read-event} which @emph{can} wait. Therefore, a
1142 timer's execution may be delayed if Emacs is busy. However, the time of
1143 execution is very precise if Emacs is idle.
1144
1145 @defun run-at-time time repeat function &rest args
1146 This function arranges to call @var{function} with arguments @var{args}
1147 at time @var{time}. The argument @var{function} is a function to call
1148 later, and @var{args} are the arguments to give it when it is called.
1149 The time @var{time} is specified as a string.
1150
1151 Absolute times may be specified in a wide variety of formats; this
1152 function tries to accept all the commonly used date formats. Valid
1153 formats include these two,
1154
1155 @example
1156 @var{year}-@var{month}-@var{day} @var{hour}:@var{min}:@var{sec} @var{timezone}
1157
1158 @var{hour}:@var{min}:@var{sec} @var{timezone} @var{month}/@var{day}/@var{year}
1159 @end example
1160
1161 @noindent
1162 where in both examples all fields are numbers; the format that
1163 @code{current-time-string} returns is also allowed, and many others
1164 as well.
1165
1166 To specify a relative time, use numbers followed by units.
1167 For example:
1168
1169 @table @samp
1170 @item 1 min
1171 denotes 1 minute from now.
1172 @item 1 min 5 sec
1173 denotes 65 seconds from now.
1174 @item 1 min 2 sec 3 hour 4 day 5 week 6 fortnight 7 month 8 year
1175 denotes exactly 103 months, 123 days, and 10862 seconds from now.
1176 @end table
1177
1178 If @var{time} is a number (integer or floating point), that specifies a
1179 relative time measured in seconds.
1180
1181 The argument @var{repeat} specifies how often to repeat the call. If
1182 @var{repeat} is @code{nil}, there are no repetitions; @var{function} is
1183 called just once, at @var{time}. If @var{repeat} is a number, it
1184 specifies a repetition period measured in seconds.
1185
1186 In most cases, @var{repeat} has no effect on when @emph{first} call
1187 takes place---@var{time} alone specifies that. There is one exception:
1188 if @var{time} is @code{t}, then the timer runs whenever the time is a
1189 multiple of @var{repeat} seconds after the epoch. This is useful for
1190 functions like @code{display-time}.
1191
1192 The function @code{run-at-time} returns a timer value that identifies
1193 the particular scheduled future action. You can use this value to call
1194 @code{cancel-timer} (see below).
1195 @end defun
1196
1197 @defmac with-timeout (seconds timeout-forms@dots{}) body@dots{}
1198 Execute @var{body}, but give up after @var{seconds} seconds. If
1199 @var{body} finishes before the time is up, @code{with-timeout} returns
1200 the value of the last form in @var{body}. If, however, the execution of
1201 @var{body} is cut short by the timeout, then @code{with-timeout}
1202 executes all the @var{timeout-forms} and returns the value of the last
1203 of them.
1204
1205 This macro works by setting a timer to run after @var{seconds} seconds. If
1206 @var{body} finishes before that time, it cancels the timer. If the
1207 timer actually runs, it terminates execution of @var{body}, then
1208 executes @var{timeout-forms}.
1209
1210 Since timers can run within a Lisp program only when the program calls a
1211 primitive that can wait, @code{with-timeout} cannot stop executing
1212 @var{body} while it is in the midst of a computation---only when it
1213 calls one of those primitives. So use @code{with-timeout} only with a
1214 @var{body} that waits for input, not one that does a long computation.
1215 @end defmac
1216
1217 The function @code{y-or-n-p-with-timeout} provides a simple way to use
1218 a timer to avoid waiting too long for an answer. @xref{Yes-or-No
1219 Queries}.
1220
1221 @defun run-with-idle-timer secs repeat function &rest args
1222 Set up a timer which runs when Emacs has been idle for @var{secs}
1223 seconds. The value of @var{secs} may be an integer or a floating point
1224 number.
1225
1226 If @var{repeat} is @code{nil}, the timer runs just once, the first time
1227 Emacs remains idle for a long enough time. More often @var{repeat} is
1228 non-@code{nil}, which means to run the timer @emph{each time} Emacs
1229 remains idle for @var{secs} seconds.
1230
1231 The function @code{run-with-idle-timer} returns a timer value which you
1232 can use in calling @code{cancel-timer} (see below).
1233 @end defun
1234
1235 @cindex idleness
1236 Emacs becomes ``idle'' when it starts waiting for user input, and it
1237 remains idle until the user provides some input. If a timer is set for
1238 five seconds of idleness, it runs approximately five seconds after Emacs
1239 first became idle. Even if its @var{repeat} is true, this timer will
1240 not run again as long as Emacs remains idle, because the duration of
1241 idleness will continue to increase and will not go down to five seconds
1242 again.
1243
1244 Emacs can do various things while idle: garbage collect, autosave or
1245 handle data from a subprocess. But these interludes during idleness do
1246 not interfere with idle timers, because they do not reset the clock of
1247 idleness to zero. An idle timer set for 600 seconds will run when ten
1248 minutes have elapsed since the last user command was finished, even if
1249 subprocess output has been accepted thousands of times within those ten
1250 minutes, even if there have been garbage collections and autosaves.
1251
1252 When the user supplies input, Emacs becomes non-idle while executing the
1253 input. Then it becomes idle again, and all the idle timers that are
1254 set up to repeat will subsequently run another time, one by one.
1255
1256 @defun cancel-timer timer
1257 Cancel the requested action for @var{timer}, which should be a value
1258 previously returned by @code{run-at-time} or @code{run-with-idle-timer}.
1259 This cancels the effect of that call to @code{run-at-time}; the arrival
1260 of the specified time will not cause anything special to happen.
1261 @end defun
1262
1263 @node Terminal Input
1264 @section Terminal Input
1265 @cindex terminal input
1266
1267 This section describes functions and variables for recording or
1268 manipulating terminal input. See @ref{Display}, for related
1269 functions.
1270
1271 @menu
1272 * Input Modes:: Options for how input is processed.
1273 * Translating Input:: Low level conversion of some characters or events
1274 into others.
1275 * Recording Input:: Saving histories of recent or all input events.
1276 @end menu
1277
1278 @node Input Modes
1279 @subsection Input Modes
1280 @cindex input modes
1281 @cindex terminal input modes
1282
1283 @defun set-input-mode interrupt flow meta quit-char
1284 This function sets the mode for reading keyboard input. If
1285 @var{interrupt} is non-null, then Emacs uses input interrupts. If it is
1286 @code{nil}, then it uses @sc{cbreak} mode. The default setting is
1287 system dependent. Some systems always use @sc{cbreak} mode regardless
1288 of what is specified.
1289
1290 When Emacs communicates directly with X, it ignores this argument and
1291 uses interrupts if that is the way it knows how to communicate.
1292
1293 If @var{flow} is non-@code{nil}, then Emacs uses @sc{xon/xoff}
1294 (@kbd{C-q}, @kbd{C-s}) flow control for output to the terminal. This
1295 has no effect except in @sc{cbreak} mode. @xref{Flow Control}.
1296
1297 @c Emacs 19 feature
1298 The argument @var{meta} controls support for input character codes
1299 above 127. If @var{meta} is @code{t}, Emacs converts characters with
1300 the 8th bit set into Meta characters. If @var{meta} is @code{nil},
1301 Emacs disregards the 8th bit; this is necessary when the terminal uses
1302 it as a parity bit. If @var{meta} is neither @code{t} nor @code{nil},
1303 Emacs uses all 8 bits of input unchanged. This is good for terminals
1304 that use 8-bit character sets.
1305
1306 @c Emacs 19 feature
1307 If @var{quit-char} is non-@code{nil}, it specifies the character to
1308 use for quitting. Normally this character is @kbd{C-g}.
1309 @xref{Quitting}.
1310 @end defun
1311
1312 The @code{current-input-mode} function returns the input mode settings
1313 Emacs is currently using.
1314
1315 @c Emacs 19 feature
1316 @defun current-input-mode
1317 This function returns current mode for reading keyboard input. It
1318 returns a list, corresponding to the arguments of @code{set-input-mode},
1319 of the form @code{(@var{interrupt} @var{flow} @var{meta} @var{quit})} in
1320 which:
1321 @table @var
1322 @item interrupt
1323 is non-@code{nil} when Emacs is using interrupt-driven input. If
1324 @code{nil}, Emacs is using @sc{cbreak} mode.
1325 @item flow
1326 is non-@code{nil} if Emacs uses @sc{xon/xoff} (@kbd{C-q}, @kbd{C-s})
1327 flow control for output to the terminal. This value is meaningful only
1328 when @var{interrupt} is @code{nil}.
1329 @item meta
1330 is @code{t} if Emacs treats the eighth bit of input characters as
1331 the meta bit; @code{nil} means Emacs clears the eighth bit of every
1332 input character; any other value means Emacs uses all eight bits as the
1333 basic character code.
1334 @item quit
1335 is the character Emacs currently uses for quitting, usually @kbd{C-g}.
1336 @end table
1337 @end defun
1338
1339 @node Translating Input
1340 @subsection Translating Input Events
1341 @cindex translating input events
1342
1343 This section describes features for translating input events into
1344 other input events before they become part of key sequences. These
1345 features apply to each event in the order they are described here: each
1346 event is first modified according to @code{extra-keyboard-modifiers},
1347 then translated through @code{keyboard-translate-table} (if applicable),
1348 and finally decoded with the specified keyboard coding system. If it is
1349 being read as part of a key sequence, it is then added to the sequence
1350 being read; then subsequences containing it are checked first with
1351 @code{function-key-map} and then with @code{key-translation-map}.
1352
1353 @c Emacs 19 feature
1354 @defvar extra-keyboard-modifiers
1355 This variable lets Lisp programs ``press'' the modifier keys on the
1356 keyboard. The value is a bit mask:
1357
1358 @table @asis
1359 @item 1
1360 The @key{SHIFT} key.
1361 @item 2
1362 The @key{LOCK} key.
1363 @item 4
1364 The @key{CTL} key.
1365 @item 8
1366 The @key{META} key.
1367 @end table
1368
1369 Each time the user types a keyboard key, it is altered as if the
1370 modifier keys specified in the bit mask were held down.
1371
1372 When using a window system, the program can ``press'' any of the
1373 modifier keys in this way. Otherwise, only the @key{CTL} and @key{META}
1374 keys can be virtually pressed.
1375 @end defvar
1376
1377 @defvar keyboard-translate-table
1378 This variable is the translate table for keyboard characters. It lets
1379 you reshuffle the keys on the keyboard without changing any command
1380 bindings. Its value is normally a char-table, or else @code{nil}.
1381
1382 If @code{keyboard-translate-table} is a char-table, then each character
1383 read from the keyboard is looked up in this character. If the value
1384 found there is non-@code{nil}, then it is used instead of the
1385 actual input character.
1386
1387 In the example below, we set @code{keyboard-translate-table} to a
1388 char-table. Then we fill it in to swap the characters @kbd{C-s} and
1389 @kbd{C-\} and the characters @kbd{C-q} and @kbd{C-^}. Subsequently,
1390 typing @kbd{C-\} has all the usual effects of typing @kbd{C-s}, and vice
1391 versa. (@xref{Flow Control} for more information on this subject.)
1392
1393 @cindex flow control example
1394 @example
1395 @group
1396 (defun evade-flow-control ()
1397 "Replace C-s with C-\ and C-q with C-^."
1398 (interactive)
1399 @end group
1400 @group
1401 (setq keyboard-translate-table
1402 (make-char-table 'keyboard-translate-table nil))
1403 @end group
1404 @group
1405 ;; @r{Swap @kbd{C-s} and @kbd{C-\}.}
1406 (aset keyboard-translate-table ?\034 ?\^s)
1407 (aset keyboard-translate-table ?\^s ?\034)
1408 @end group
1409 @group
1410 ;; @r{Swap @kbd{C-q} and @kbd{C-^}.}
1411 (aset keyboard-translate-table ?\036 ?\^q)
1412 (aset keyboard-translate-table ?\^q ?\036))
1413 @end group
1414 @end example
1415
1416 Note that this translation is the first thing that happens to a
1417 character after it is read from the terminal. Record-keeping features
1418 such as @code{recent-keys} and dribble files record the characters after
1419 translation.
1420 @end defvar
1421
1422 @defun keyboard-translate from to
1423 This function modifies @code{keyboard-translate-table} to translate
1424 character code @var{from} into character code @var{to}. It creates
1425 the keyboard translate table if necessary.
1426 @end defun
1427
1428 The remaining translation features translate subsequences of key
1429 sequences being read. They are implemented in @code{read-key-sequence}
1430 and have no effect on input read with @code{read-event}.
1431
1432 @defvar function-key-map
1433 This variable holds a keymap that describes the character sequences sent
1434 by function keys on an ordinary character terminal. This keymap has the
1435 same structure as other keymaps, but is used differently: it specifies
1436 translations to make while reading key sequences, rather than bindings
1437 for key sequences.
1438
1439 If @code{function-key-map} ``binds'' a key sequence @var{k} to a vector
1440 @var{v}, then when @var{k} appears as a subsequence @emph{anywhere} in a
1441 key sequence, it is replaced with the events in @var{v}.
1442
1443 For example, VT100 terminals send @kbd{@key{ESC} O P} when the
1444 keypad @key{PF1} key is pressed. Therefore, we want Emacs to translate
1445 that sequence of events into the single event @code{pf1}. We accomplish
1446 this by ``binding'' @kbd{@key{ESC} O P} to @code{[pf1]} in
1447 @code{function-key-map}, when using a VT100.
1448
1449 Thus, typing @kbd{C-c @key{PF1}} sends the character sequence @kbd{C-c
1450 @key{ESC} O P}; later the function @code{read-key-sequence} translates
1451 this back into @kbd{C-c @key{PF1}}, which it returns as the vector
1452 @code{[?\C-c pf1]}.
1453
1454 Entries in @code{function-key-map} are ignored if they conflict with
1455 bindings made in the minor mode, local, or global keymaps. The intent
1456 is that the character sequences that function keys send should not have
1457 command bindings in their own right---but if they do, the ordinary
1458 bindings take priority.
1459
1460 The value of @code{function-key-map} is usually set up automatically
1461 according to the terminal's Terminfo or Termcap entry, but sometimes
1462 those need help from terminal-specific Lisp files. Emacs comes with
1463 terminal-specific files for many common terminals; their main purpose is
1464 to make entries in @code{function-key-map} beyond those that can be
1465 deduced from Termcap and Terminfo. @xref{Terminal-Specific}.
1466 @end defvar
1467
1468 @defvar key-translation-map
1469 This variable is another keymap used just like @code{function-key-map}
1470 to translate input events into other events. It differs from
1471 @code{function-key-map} in two ways:
1472
1473 @itemize @bullet
1474 @item
1475 @code{key-translation-map} goes to work after @code{function-key-map} is
1476 finished; it receives the results of translation by
1477 @code{function-key-map}.
1478
1479 @item
1480 @code{key-translation-map} overrides actual key bindings. For example,
1481 if @kbd{C-x f} has a binding in @code{key-translation-map}, that
1482 translation takes effect even though @kbd{C-x f} also has a key binding
1483 in the global map.
1484 @end itemize
1485
1486 The intent of @code{key-translation-map} is for users to map one
1487 character set to another, including ordinary characters normally bound
1488 to @code{self-insert-command}.
1489 @end defvar
1490
1491 @cindex key translation function
1492 You can use @code{function-key-map} or @code{key-translation-map} for
1493 more than simple aliases, by using a function, instead of a key
1494 sequence, as the ``translation'' of a key. Then this function is called
1495 to compute the translation of that key.
1496
1497 The key translation function receives one argument, which is the prompt
1498 that was specified in @code{read-key-sequence}---or @code{nil} if the
1499 key sequence is being read by the editor command loop. In most cases
1500 you can ignore the prompt value.
1501
1502 If the function reads input itself, it can have the effect of altering
1503 the event that follows. For example, here's how to define @kbd{C-c h}
1504 to turn the character that follows into a Hyper character:
1505
1506 @example
1507 @group
1508 (defun hyperify (prompt)
1509 (let ((e (read-event)))
1510 (vector (if (numberp e)
1511 (logior (lsh 1 24) e)
1512 (if (memq 'hyper (event-modifiers e))
1513 e
1514 (add-event-modifier "H-" e))))))
1515
1516 (defun add-event-modifier (string e)
1517 (let ((symbol (if (symbolp e) e (car e))))
1518 (setq symbol (intern (concat string
1519 (symbol-name symbol))))
1520 @end group
1521 @group
1522 (if (symbolp e)
1523 symbol
1524 (cons symbol (cdr e)))))
1525
1526 (define-key function-key-map "\C-ch" 'hyperify)
1527 @end group
1528 @end example
1529
1530 Finally, if you have enabled keyboard character set decoding using
1531 @code{set-keyboard-coding-system}, decoding is done after the
1532 translations listed above. @xref{Specifying Coding Systems}. In future
1533 Emacs versions, character set decoding may be done before the other
1534 translations.
1535
1536 @node Recording Input
1537 @subsection Recording Input
1538
1539 @defun recent-keys
1540 This function returns a vector containing the last 100 input events from
1541 the keyboard or mouse. All input events are included, whether or not
1542 they were used as parts of key sequences. Thus, you always get the last
1543 100 input events, not counting events generated by keyboard macros.
1544 (These are excluded because they are less interesting for debugging; it
1545 should be enough to see the events that invoked the macros.)
1546 @end defun
1547
1548 @deffn Command open-dribble-file filename
1549 @cindex dribble file
1550 This function opens a @dfn{dribble file} named @var{filename}. When a
1551 dribble file is open, each input event from the keyboard or mouse (but
1552 not those from keyboard macros) is written in that file. A
1553 non-character event is expressed using its printed representation
1554 surrounded by @samp{<@dots{}>}.
1555
1556 You close the dribble file by calling this function with an argument
1557 of @code{nil}.
1558
1559 This function is normally used to record the input necessary to
1560 trigger an Emacs bug, for the sake of a bug report.
1561
1562 @example
1563 @group
1564 (open-dribble-file "~/dribble")
1565 @result{} nil
1566 @end group
1567 @end example
1568 @end deffn
1569
1570 See also the @code{open-termscript} function (@pxref{Terminal Output}).
1571
1572 @node Terminal Output
1573 @section Terminal Output
1574 @cindex terminal output
1575
1576 The terminal output functions send output to the terminal or keep
1577 track of output sent to the terminal. The variable @code{baud-rate}
1578 tells you what Emacs thinks is the output speed of the terminal.
1579
1580 @defvar baud-rate
1581 This variable's value is the output speed of the terminal, as far as
1582 Emacs knows. Setting this variable does not change the speed of actual
1583 data transmission, but the value is used for calculations such as
1584 padding. It also affects decisions about whether to scroll part of the
1585 screen or repaint---even when using a window system. (We designed it
1586 this way despite the fact that a window system has no true ``output
1587 speed'', to give you a way to tune these decisions.)
1588
1589 The value is measured in baud.
1590 @end defvar
1591
1592 If you are running across a network, and different parts of the
1593 network work at different baud rates, the value returned by Emacs may be
1594 different from the value used by your local terminal. Some network
1595 protocols communicate the local terminal speed to the remote machine, so
1596 that Emacs and other programs can get the proper value, but others do
1597 not. If Emacs has the wrong value, it makes decisions that are less
1598 than optimal. To fix the problem, set @code{baud-rate}.
1599
1600 @defun baud-rate
1601 This obsolete function returns the value of the variable
1602 @code{baud-rate}.
1603 @end defun
1604
1605 @defun send-string-to-terminal string
1606 This function sends @var{string} to the terminal without alteration.
1607 Control characters in @var{string} have terminal-dependent effects.
1608
1609 One use of this function is to define function keys on terminals that
1610 have downloadable function key definitions. For example, this is how on
1611 certain terminals to define function key 4 to move forward four
1612 characters (by transmitting the characters @kbd{C-u C-f} to the
1613 computer):
1614
1615 @example
1616 @group
1617 (send-string-to-terminal "\eF4\^U\^F")
1618 @result{} nil
1619 @end group
1620 @end example
1621 @end defun
1622
1623 @deffn Command open-termscript filename
1624 @cindex termscript file
1625 This function is used to open a @dfn{termscript file} that will record
1626 all the characters sent by Emacs to the terminal. It returns
1627 @code{nil}. Termscript files are useful for investigating problems
1628 where Emacs garbles the screen, problems that are due to incorrect
1629 Termcap entries or to undesirable settings of terminal options more
1630 often than to actual Emacs bugs. Once you are certain which characters
1631 were actually output, you can determine reliably whether they correspond
1632 to the Termcap specifications in use.
1633
1634 See also @code{open-dribble-file} in @ref{Terminal Input}.
1635
1636 @example
1637 @group
1638 (open-termscript "../junk/termscript")
1639 @result{} nil
1640 @end group
1641 @end example
1642 @end deffn
1643
1644 @node Special Keysyms
1645 @section System-Specific X11 Keysyms
1646
1647 To define system-specific X11 keysyms, set the variable
1648 @code{system-key-alist}.
1649
1650 @defvar system-key-alist
1651 This variable's value should be an alist with one element for each
1652 system-specific keysym. An element has this form: @code{(@var{code}
1653 . @var{symbol})}, where @var{code} is the numeric keysym code (not
1654 including the ``vendor specific'' bit,
1655 @ifinfo
1656 -2**28),
1657 @end ifinfo
1658 @tex
1659 $-2^{28}$),
1660 @end tex
1661 and @var{symbol} is the name for the function key.
1662
1663 For example @code{(168 . mute-acute)} defines a system-specific key used
1664 by HP X servers whose numeric code is
1665 @ifinfo
1666 -2**28
1667 @end ifinfo
1668 @tex
1669 $-2^{28}$
1670 @end tex
1671 + 168.
1672
1673 It is not crucial to exclude from the alist the keysyms of other X
1674 servers; those do no harm, as long as they don't conflict with the ones
1675 used by the X server actually in use.
1676
1677 The variable is always local to the current terminal, and cannot be
1678 buffer-local. @xref{Multiple Displays}.
1679 @end defvar
1680
1681 @node Flow Control
1682 @section Flow Control
1683 @cindex flow control characters
1684
1685 This section attempts to answer the question ``Why does Emacs use
1686 flow-control characters in its command character set?'' For a second
1687 view on this issue, read the comments on flow control in the
1688 @file{emacs/INSTALL} file from the distribution; for help with Termcap
1689 entries and DEC terminal concentrators, see @file{emacs/etc/TERMS}.
1690
1691 @cindex @kbd{C-s}
1692 @cindex @kbd{C-q}
1693 At one time, most terminals did not need flow control, and none used
1694 @code{C-s} and @kbd{C-q} for flow control. Therefore, the choice of
1695 @kbd{C-s} and @kbd{C-q} as command characters for searching and quoting
1696 was natural and uncontroversial. With so many commands needing key
1697 assignments, of course we assigned meanings to nearly all @sc{ASCII}
1698 control characters.
1699
1700 Later, some terminals were introduced which required these characters
1701 for flow control. They were not very good terminals for full-screen
1702 editing, so Emacs maintainers ignored them. In later years, flow
1703 control with @kbd{C-s} and @kbd{C-q} became widespread among terminals,
1704 but by this time it was usually an option. And the majority of Emacs
1705 users, who can turn flow control off, did not want to switch to less
1706 mnemonic key bindings for the sake of flow control.
1707
1708 So which usage is ``right''---Emacs's or that of some terminal and
1709 concentrator manufacturers? This question has no simple answer.
1710
1711 One reason why we are reluctant to cater to the problems caused by
1712 @kbd{C-s} and @kbd{C-q} is that they are gratuitous. There are other
1713 techniques (albeit less common in practice) for flow control that
1714 preserve transparency of the character stream. Note also that their use
1715 for flow control is not an official standard. Interestingly, on the
1716 model 33 teletype with a paper tape punch (around 1970), @kbd{C-s} and
1717 @kbd{C-q} were sent by the computer to turn the punch on and off!
1718
1719 As window systems and PC terminal emulators replace character-only
1720 terminals, the flow control problem is gradually disappearing. For the
1721 mean time, Emacs provides a convenient way of enabling flow control if
1722 you want it: call the function @code{enable-flow-control}.
1723
1724 @deffn Command enable-flow-control
1725 This function enables use of @kbd{C-s} and @kbd{C-q} for output flow
1726 control, and provides the characters @kbd{C-\} and @kbd{C-^} as aliases
1727 for them using @code{keyboard-translate-table} (@pxref{Translating Input}).
1728 @end deffn
1729
1730 You can use the function @code{enable-flow-control-on} in your
1731 @file{.emacs} file to enable flow control automatically on certain
1732 terminal types.
1733
1734 @defun enable-flow-control-on &rest termtypes
1735 This function enables flow control, and the aliases @kbd{C-\} and @kbd{C-^},
1736 if the terminal type is one of @var{termtypes}. For example:
1737
1738 @smallexample
1739 (enable-flow-control-on "vt200" "vt300" "vt101" "vt131")
1740 @end smallexample
1741 @end defun
1742
1743 Here is how @code{enable-flow-control} does its job:
1744
1745 @enumerate
1746 @item
1747 @cindex @sc{cbreak}
1748 It sets @sc{cbreak} mode for terminal input, and tells the operating
1749 system to handle flow control, with @code{(set-input-mode nil t)}.
1750
1751 @item
1752 It sets up @code{keyboard-translate-table} to translate @kbd{C-\} and
1753 @kbd{C-^} into @kbd{C-s} and @kbd{C-q}. Except at its very
1754 lowest level, Emacs never knows that the characters typed were anything
1755 but @kbd{C-s} and @kbd{C-q}, so you can in effect type them as @kbd{C-\}
1756 and @kbd{C-^} even when they are input for other commands.
1757 @xref{Translating Input}.
1758 @end enumerate
1759
1760 If the terminal is the source of the flow control characters, then once
1761 you enable kernel flow control handling, you probably can make do with
1762 less padding than normal for that terminal. You can reduce the amount
1763 of padding by customizing the Termcap entry. You can also reduce it by
1764 setting @code{baud-rate} to a smaller value so that Emacs uses a smaller
1765 speed when calculating the padding needed. @xref{Terminal Output}.
1766
1767 @node Batch Mode
1768 @section Batch Mode
1769 @cindex batch mode
1770 @cindex noninteractive use
1771
1772 The command line option @samp{-batch} causes Emacs to run
1773 noninteractively. In this mode, Emacs does not read commands from the
1774 terminal, it does not alter the terminal modes, and it does not expect
1775 to be outputting to an erasable screen. The idea is that you specify
1776 Lisp programs to run; when they are finished, Emacs should exit. The
1777 way to specify the programs to run is with @samp{-l @var{file}}, which
1778 loads the library named @var{file}, and @samp{-f @var{function}}, which
1779 calls @var{function} with no arguments.
1780
1781 Any Lisp program output that would normally go to the echo area,
1782 either using @code{message} or using @code{prin1}, etc., with @code{t}
1783 as the stream, goes instead to Emacs's standard error descriptor when
1784 in batch mode. Thus, Emacs behaves much like a noninteractive
1785 application program. (The echo area output that Emacs itself normally
1786 generates, such as command echoing, is suppressed entirely.)
1787
1788 @defvar noninteractive
1789 This variable is non-@code{nil} when Emacs is running in batch mode.
1790 @end defvar