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