]> code.delx.au - gnu-emacs/blob - doc/lispref/files.texi
Update copyright year to 2015
[gnu-emacs] / doc / lispref / files.texi
1 @c -*-texinfo-*-
2 @c This is part of the GNU Emacs Lisp Reference Manual.
3 @c Copyright (C) 1990-1995, 1998-1999, 2001-2015 Free Software
4 @c Foundation, Inc.
5 @c See the file elisp.texi for copying conditions.
6 @node Files
7 @chapter Files
8
9 This chapter describes the Emacs Lisp functions and variables to
10 find, create, view, save, and otherwise work with files and
11 directories. A few other file-related functions are described in
12 @ref{Buffers}, and those related to backups and auto-saving are
13 described in @ref{Backups and Auto-Saving}.
14
15 Many of the file functions take one or more arguments that are file
16 names. A file name is a string. Most of these functions expand file
17 name arguments using the function @code{expand-file-name}, so that
18 @file{~} is handled correctly, as are relative file names (including
19 @file{../}). @xref{File Name Expansion}.
20
21 In addition, certain @dfn{magic} file names are handled specially.
22 For example, when a remote file name is specified, Emacs accesses the
23 file over the network via an appropriate protocol. @xref{Remote
24 Files,, Remote Files, emacs, The GNU Emacs Manual}. This handling is
25 done at a very low level, so you may assume that all the functions
26 described in this chapter accept magic file names as file name
27 arguments, except where noted. @xref{Magic File Names}, for details.
28
29 When file I/O functions signal Lisp errors, they usually use the
30 condition @code{file-error} (@pxref{Handling Errors}). The error
31 message is in most cases obtained from the operating system, according
32 to locale @code{system-messages-locale}, and decoded using coding system
33 @code{locale-coding-system} (@pxref{Locales}).
34
35 @menu
36 * Visiting Files:: Reading files into Emacs buffers for editing.
37 * Saving Buffers:: Writing changed buffers back into files.
38 * Reading from Files:: Reading files into buffers without visiting.
39 * Writing to Files:: Writing new files from parts of buffers.
40 * File Locks:: Locking and unlocking files, to prevent
41 simultaneous editing by two people.
42 * Information about Files:: Testing existence, accessibility, size of files.
43 * Changing Files:: Renaming files, changing permissions, etc.
44 * File Names:: Decomposing and expanding file names.
45 * Contents of Directories:: Getting a list of the files in a directory.
46 * Create/Delete Dirs:: Creating and Deleting Directories.
47 * Magic File Names:: Special handling for certain file names.
48 * Format Conversion:: Conversion to and from various file formats.
49 @end menu
50
51 @node Visiting Files
52 @section Visiting Files
53 @cindex finding files
54 @cindex visiting files
55
56 Visiting a file means reading a file into a buffer. Once this is
57 done, we say that the buffer is @dfn{visiting} that file, and call the
58 file ``the visited file'' of the buffer.
59
60 A file and a buffer are two different things. A file is information
61 recorded permanently in the computer (unless you delete it). A
62 buffer, on the other hand, is information inside of Emacs that will
63 vanish at the end of the editing session (or when you kill the
64 buffer). When a buffer is visiting a file, it contains information
65 copied from the file. The copy in the buffer is what you modify with
66 editing commands. Changes to the buffer do not change the file; to
67 make the changes permanent, you must @dfn{save} the buffer, which
68 means copying the altered buffer contents back into the file.
69
70 Despite the distinction between files and buffers, people often
71 refer to a file when they mean a buffer and vice-versa. Indeed, we
72 say, ``I am editing a file'', rather than, ``I am editing a buffer
73 that I will soon save as a file of the same name''. Humans do not
74 usually need to make the distinction explicit. When dealing with a
75 computer program, however, it is good to keep the distinction in mind.
76
77 @menu
78 * Visiting Functions:: The usual interface functions for visiting.
79 * Subroutines of Visiting:: Lower-level subroutines that they use.
80 @end menu
81
82 @node Visiting Functions
83 @subsection Functions for Visiting Files
84 @cindex visiting files, functions for
85 @cindex how to visit files
86
87 This section describes the functions normally used to visit files.
88 For historical reasons, these functions have names starting with
89 @samp{find-} rather than @samp{visit-}. @xref{Buffer File Name}, for
90 functions and variables that access the visited file name of a buffer or
91 that find an existing buffer by its visited file name.
92
93 In a Lisp program, if you want to look at the contents of a file but
94 not alter it, the fastest way is to use @code{insert-file-contents} in a
95 temporary buffer. Visiting the file is not necessary and takes longer.
96 @xref{Reading from Files}.
97
98 @deffn Command find-file filename &optional wildcards
99 This command selects a buffer visiting the file @var{filename},
100 using an existing buffer if there is one, and otherwise creating a
101 new buffer and reading the file into it. It also returns that buffer.
102
103 Aside from some technical details, the body of the @code{find-file}
104 function is basically equivalent to:
105
106 @smallexample
107 (switch-to-buffer (find-file-noselect filename nil nil wildcards))
108 @end smallexample
109
110 @noindent
111 (See @code{switch-to-buffer} in @ref{Switching Buffers}.)
112
113 If @var{wildcards} is non-@code{nil}, which is always true in an
114 interactive call, then @code{find-file} expands wildcard characters in
115 @var{filename} and visits all the matching files.
116
117 When @code{find-file} is called interactively, it prompts for
118 @var{filename} in the minibuffer.
119 @end deffn
120
121 @deffn Command find-file-literally filename
122 This command visits @var{filename}, like @code{find-file} does, but it
123 does not perform any format conversions (@pxref{Format Conversion}),
124 character code conversions (@pxref{Coding Systems}), or end-of-line
125 conversions (@pxref{Coding System Basics, End of line conversion}).
126 The buffer visiting the file is made unibyte, and its major mode is
127 Fundamental mode, regardless of the file name. File local variable
128 specifications in the file (@pxref{File Local Variables}) are
129 ignored, and automatic decompression and adding a newline at the end
130 of the file due to @code{require-final-newline} (@pxref{Saving
131 Buffers, require-final-newline}) are also disabled.
132
133 Note that if Emacs already has a buffer visiting the same file
134 non-literally, it will not visit the same file literally, but instead
135 just switch to the existing buffer. If you want to be sure of
136 accessing a file's contents literally, you should create a temporary
137 buffer and then read the file contents into it using
138 @code{insert-file-contents-literally} (@pxref{Reading from Files}).
139 @end deffn
140
141 @defun find-file-noselect filename &optional nowarn rawfile wildcards
142 This function is the guts of all the file-visiting functions. It
143 returns a buffer visiting the file @var{filename}. You may make the
144 buffer current or display it in a window if you wish, but this
145 function does not do so.
146
147 The function returns an existing buffer if there is one; otherwise it
148 creates a new buffer and reads the file into it. When
149 @code{find-file-noselect} uses an existing buffer, it first verifies
150 that the file has not changed since it was last visited or saved in
151 that buffer. If the file has changed, this function asks the user
152 whether to reread the changed file. If the user says @samp{yes}, any
153 edits previously made in the buffer are lost.
154
155 Reading the file involves decoding the file's contents (@pxref{Coding
156 Systems}), including end-of-line conversion, and format conversion
157 (@pxref{Format Conversion}). If @var{wildcards} is non-@code{nil},
158 then @code{find-file-noselect} expands wildcard characters in
159 @var{filename} and visits all the matching files.
160
161 This function displays warning or advisory messages in various peculiar
162 cases, unless the optional argument @var{nowarn} is non-@code{nil}. For
163 example, if it needs to create a buffer, and there is no file named
164 @var{filename}, it displays the message @samp{(New file)} in the echo
165 area, and leaves the buffer empty.
166
167 The @code{find-file-noselect} function normally calls
168 @code{after-find-file} after reading the file (@pxref{Subroutines of
169 Visiting}). That function sets the buffer major mode, parses local
170 variables, warns the user if there exists an auto-save file more recent
171 than the file just visited, and finishes by running the functions in
172 @code{find-file-hook}.
173
174 If the optional argument @var{rawfile} is non-@code{nil}, then
175 @code{after-find-file} is not called, and the
176 @code{find-file-not-found-functions} are not run in case of failure.
177 What's more, a non-@code{nil} @var{rawfile} value suppresses coding
178 system conversion and format conversion.
179
180 The @code{find-file-noselect} function usually returns the buffer that
181 is visiting the file @var{filename}. But, if wildcards are actually
182 used and expanded, it returns a list of buffers that are visiting the
183 various files.
184
185 @example
186 @group
187 (find-file-noselect "/etc/fstab")
188 @result{} #<buffer fstab>
189 @end group
190 @end example
191 @end defun
192
193 @deffn Command find-file-other-window filename &optional wildcards
194 This command selects a buffer visiting the file @var{filename}, but
195 does so in a window other than the selected window. It may use
196 another existing window or split a window; see @ref{Switching
197 Buffers}.
198
199 When this command is called interactively, it prompts for
200 @var{filename}.
201 @end deffn
202
203 @deffn Command find-file-read-only filename &optional wildcards
204 This command selects a buffer visiting the file @var{filename}, like
205 @code{find-file}, but it marks the buffer as read-only. @xref{Read Only
206 Buffers}, for related functions and variables.
207
208 When this command is called interactively, it prompts for
209 @var{filename}.
210 @end deffn
211
212 @defopt find-file-wildcards
213 If this variable is non-@code{nil}, then the various @code{find-file}
214 commands check for wildcard characters and visit all the files that
215 match them (when invoked interactively or when their @var{wildcards}
216 argument is non-@code{nil}). If this option is @code{nil}, then
217 the @code{find-file} commands ignore their @var{wildcards} argument
218 and never treat wildcard characters specially.
219 @end defopt
220
221 @defopt find-file-hook
222 The value of this variable is a list of functions to be called after a
223 file is visited. The file's local-variables specification (if any) will
224 have been processed before the hooks are run. The buffer visiting the
225 file is current when the hook functions are run.
226
227 This variable is a normal hook. @xref{Hooks}.
228 @end defopt
229
230 @defvar find-file-not-found-functions
231 The value of this variable is a list of functions to be called when
232 @code{find-file} or @code{find-file-noselect} is passed a nonexistent
233 file name. @code{find-file-noselect} calls these functions as soon as
234 it detects a nonexistent file. It calls them in the order of the list,
235 until one of them returns non-@code{nil}. @code{buffer-file-name} is
236 already set up.
237
238 This is not a normal hook because the values of the functions are
239 used, and in many cases only some of the functions are called.
240 @end defvar
241
242 @defvar find-file-literally
243 This buffer-local variable, if set to a non-@code{nil} value, makes
244 @code{save-buffer} behave as if the buffer were visiting its file
245 literally, i.e., without conversions of any kind. The command
246 @code{find-file-literally} sets this variable's local value, but other
247 equivalent functions and commands can do that as well, e.g., to avoid
248 automatic addition of a newline at the end of the file. This variable
249 is permanent local, so it is unaffected by changes of major modes.
250 @end defvar
251
252 @node Subroutines of Visiting
253 @subsection Subroutines of Visiting
254
255 The @code{find-file-noselect} function uses two important subroutines
256 which are sometimes useful in user Lisp code: @code{create-file-buffer}
257 and @code{after-find-file}. This section explains how to use them.
258
259 @c FIXME This does not describe the default behavior, because
260 @c uniquify is enabled by default and advises this function.
261 @c This is confusing. uniquify should be folded into the function proper.
262 @defun create-file-buffer filename
263 This function creates a suitably named buffer for visiting
264 @var{filename}, and returns it. It uses @var{filename} (sans directory)
265 as the name if that name is free; otherwise, it appends a string such as
266 @samp{<2>} to get an unused name. See also @ref{Creating Buffers}.
267 Note that the @file{uniquify} library affects the result of this
268 function. @xref{Uniquify,,, emacs, The GNU Emacs Manual}.
269
270 @strong{Please note:} @code{create-file-buffer} does @emph{not}
271 associate the new buffer with a file and does not select the buffer.
272 It also does not use the default major mode.
273
274 @example
275 @group
276 (create-file-buffer "foo")
277 @result{} #<buffer foo>
278 @end group
279 @group
280 (create-file-buffer "foo")
281 @result{} #<buffer foo<2>>
282 @end group
283 @group
284 (create-file-buffer "foo")
285 @result{} #<buffer foo<3>>
286 @end group
287 @end example
288
289 This function is used by @code{find-file-noselect}.
290 It uses @code{generate-new-buffer} (@pxref{Creating Buffers}).
291 @end defun
292
293 @defun after-find-file &optional error warn noauto after-find-file-from-revert-buffer nomodes
294 This function sets the buffer major mode, and parses local variables
295 (@pxref{Auto Major Mode}). It is called by @code{find-file-noselect}
296 and by the default revert function (@pxref{Reverting}).
297
298 @cindex new file message
299 @cindex file open error
300 If reading the file got an error because the file does not exist, but
301 its directory does exist, the caller should pass a non-@code{nil} value
302 for @var{error}. In that case, @code{after-find-file} issues a warning:
303 @samp{(New file)}. For more serious errors, the caller should usually not
304 call @code{after-find-file}.
305
306 If @var{warn} is non-@code{nil}, then this function issues a warning
307 if an auto-save file exists and is more recent than the visited file.
308
309 If @var{noauto} is non-@code{nil}, that says not to enable or disable
310 Auto-Save mode. The mode remains enabled if it was enabled before.
311
312 If @var{after-find-file-from-revert-buffer} is non-@code{nil}, that
313 means this call was from @code{revert-buffer}. This has no direct
314 effect, but some mode functions and hook functions check the value
315 of this variable.
316
317 If @var{nomodes} is non-@code{nil}, that means don't alter the buffer's
318 major mode, don't process local variables specifications in the file,
319 and don't run @code{find-file-hook}. This feature is used by
320 @code{revert-buffer} in some cases.
321
322 The last thing @code{after-find-file} does is call all the functions
323 in the list @code{find-file-hook}.
324 @end defun
325
326 @node Saving Buffers
327 @section Saving Buffers
328 @cindex saving buffers
329
330 When you edit a file in Emacs, you are actually working on a buffer
331 that is visiting that file---that is, the contents of the file are
332 copied into the buffer and the copy is what you edit. Changes to the
333 buffer do not change the file until you @dfn{save} the buffer, which
334 means copying the contents of the buffer into the file.
335
336 @deffn Command save-buffer &optional backup-option
337 This function saves the contents of the current buffer in its visited
338 file if the buffer has been modified since it was last visited or saved.
339 Otherwise it does nothing.
340
341 @code{save-buffer} is responsible for making backup files. Normally,
342 @var{backup-option} is @code{nil}, and @code{save-buffer} makes a backup
343 file only if this is the first save since visiting the file. Other
344 values for @var{backup-option} request the making of backup files in
345 other circumstances:
346
347 @itemize @bullet
348 @item
349 With an argument of 4 or 64, reflecting 1 or 3 @kbd{C-u}'s, the
350 @code{save-buffer} function marks this version of the file to be
351 backed up when the buffer is next saved.
352
353 @item
354 With an argument of 16 or 64, reflecting 2 or 3 @kbd{C-u}'s, the
355 @code{save-buffer} function unconditionally backs up the previous
356 version of the file before saving it.
357
358 @item
359 With an argument of 0, unconditionally do @emph{not} make any backup file.
360 @end itemize
361 @end deffn
362
363 @deffn Command save-some-buffers &optional save-silently-p pred
364 @anchor{Definition of save-some-buffers}
365 This command saves some modified file-visiting buffers. Normally it
366 asks the user about each buffer. But if @var{save-silently-p} is
367 non-@code{nil}, it saves all the file-visiting buffers without querying
368 the user.
369
370 The optional @var{pred} argument controls which buffers to ask about
371 (or to save silently if @var{save-silently-p} is non-@code{nil}).
372 If it is @code{nil}, that means to ask only about file-visiting buffers.
373 If it is @code{t}, that means also offer to save certain other non-file
374 buffers---those that have a non-@code{nil} buffer-local value of
375 @code{buffer-offer-save} (@pxref{Killing Buffers}). A user who says
376 @samp{yes} to saving a non-file buffer is asked to specify the file
377 name to use. The @code{save-buffers-kill-emacs} function passes the
378 value @code{t} for @var{pred}.
379
380 If @var{pred} is neither @code{t} nor @code{nil}, then it should be
381 a function of no arguments. It will be called in each buffer to decide
382 whether to offer to save that buffer. If it returns a non-@code{nil}
383 value in a certain buffer, that means do offer to save that buffer.
384 @end deffn
385
386 @deffn Command write-file filename &optional confirm
387 @anchor{Definition of write-file}
388 This function writes the current buffer into file @var{filename}, makes
389 the buffer visit that file, and marks it not modified. Then it renames
390 the buffer based on @var{filename}, appending a string like @samp{<2>}
391 if necessary to make a unique buffer name. It does most of this work by
392 calling @code{set-visited-file-name} (@pxref{Buffer File Name}) and
393 @code{save-buffer}.
394
395 If @var{confirm} is non-@code{nil}, that means to ask for confirmation
396 before overwriting an existing file. Interactively, confirmation is
397 required, unless the user supplies a prefix argument.
398
399 If @var{filename} is an existing directory, or a symbolic link to one,
400 @code{write-file} uses the name of the visited file, in directory
401 @var{filename}. If the buffer is not visiting a file, it uses the
402 buffer name instead.
403 @end deffn
404
405 Saving a buffer runs several hooks. It also performs format
406 conversion (@pxref{Format Conversion}).
407
408 @defvar write-file-functions
409 The value of this variable is a list of functions to be called before
410 writing out a buffer to its visited file. If one of them returns
411 non-@code{nil}, the file is considered already written and the rest of
412 the functions are not called, nor is the usual code for writing the file
413 executed.
414
415 If a function in @code{write-file-functions} returns non-@code{nil}, it
416 is responsible for making a backup file (if that is appropriate).
417 To do so, execute the following code:
418
419 @example
420 (or buffer-backed-up (backup-buffer))
421 @end example
422
423 You might wish to save the file modes value returned by
424 @code{backup-buffer} and use that (if non-@code{nil}) to set the mode
425 bits of the file that you write. This is what @code{save-buffer}
426 normally does. @xref{Making Backups,, Making Backup Files}.
427
428 The hook functions in @code{write-file-functions} are also responsible
429 for encoding the data (if desired): they must choose a suitable coding
430 system and end-of-line conversion (@pxref{Lisp and Coding Systems}),
431 perform the encoding (@pxref{Explicit Encoding}), and set
432 @code{last-coding-system-used} to the coding system that was used
433 (@pxref{Encoding and I/O}).
434
435 If you set this hook locally in a buffer, it is assumed to be
436 associated with the file or the way the contents of the buffer were
437 obtained. Thus the variable is marked as a permanent local, so that
438 changing the major mode does not alter a buffer-local value. On the
439 other hand, calling @code{set-visited-file-name} will reset it.
440 If this is not what you want, you might like to use
441 @code{write-contents-functions} instead.
442
443 Even though this is not a normal hook, you can use @code{add-hook} and
444 @code{remove-hook} to manipulate the list. @xref{Hooks}.
445 @end defvar
446
447 @c Emacs 19 feature
448 @defvar write-contents-functions
449 This works just like @code{write-file-functions}, but it is intended
450 for hooks that pertain to the buffer's contents, not to the particular
451 visited file or its location. Such hooks are usually set up by major
452 modes, as buffer-local bindings for this variable. This variable
453 automatically becomes buffer-local whenever it is set; switching to a
454 new major mode always resets this variable, but calling
455 @code{set-visited-file-name} does not.
456
457 If any of the functions in this hook returns non-@code{nil}, the file
458 is considered already written and the rest are not called and neither
459 are the functions in @code{write-file-functions}.
460 @end defvar
461
462 @defopt before-save-hook
463 This normal hook runs before a buffer is saved in its visited file,
464 regardless of whether that is done normally or by one of the hooks
465 described above. For instance, the @file{copyright.el} program uses
466 this hook to make sure the file you are saving has the current year in
467 its copyright notice.
468 @end defopt
469
470 @c Emacs 19 feature
471 @defopt after-save-hook
472 This normal hook runs after a buffer has been saved in its visited file.
473 One use of this hook is in Fast Lock mode; it uses this hook to save the
474 highlighting information in a cache file.
475 @end defopt
476
477 @defopt file-precious-flag
478 If this variable is non-@code{nil}, then @code{save-buffer} protects
479 against I/O errors while saving by writing the new file to a temporary
480 name instead of the name it is supposed to have, and then renaming it to
481 the intended name after it is clear there are no errors. This procedure
482 prevents problems such as a lack of disk space from resulting in an
483 invalid file.
484
485 As a side effect, backups are necessarily made by copying. @xref{Rename
486 or Copy}. Yet, at the same time, saving a precious file always breaks
487 all hard links between the file you save and other file names.
488
489 Some modes give this variable a non-@code{nil} buffer-local value
490 in particular buffers.
491 @end defopt
492
493 @defopt require-final-newline
494 This variable determines whether files may be written out that do
495 @emph{not} end with a newline. If the value of the variable is
496 @code{t}, then @code{save-buffer} silently adds a newline at the end
497 of the buffer whenever it does not already end in one. If the value
498 is @code{visit}, Emacs adds a missing newline just after it visits the
499 file. If the value is @code{visit-save}, Emacs adds a missing newline
500 both on visiting and on saving. For any other non-@code{nil} value,
501 @code{save-buffer} asks the user whether to add a newline each time
502 the case arises.
503
504 If the value of the variable is @code{nil}, then @code{save-buffer}
505 doesn't add newlines at all. @code{nil} is the default value, but a few
506 major modes set it to @code{t} in particular buffers.
507 @end defopt
508
509 See also the function @code{set-visited-file-name} (@pxref{Buffer File
510 Name}).
511
512 @node Reading from Files
513 @section Reading from Files
514 @cindex reading from files
515
516 To copy the contents of a file into a buffer, use the function
517 @code{insert-file-contents}. (Don't use the command
518 @code{insert-file} in a Lisp program, as that sets the mark.)
519
520 @defun insert-file-contents filename &optional visit beg end replace
521 This function inserts the contents of file @var{filename} into the
522 current buffer after point. It returns a list of the absolute file name
523 and the length of the data inserted. An error is signaled if
524 @var{filename} is not the name of a file that can be read.
525
526 This function checks the file contents against the defined file
527 formats, and converts the file contents if appropriate and also calls
528 the functions in the list @code{after-insert-file-functions}.
529 @xref{Format Conversion}. Normally, one of the functions in the
530 @code{after-insert-file-functions} list determines the coding system
531 (@pxref{Coding Systems}) used for decoding the file's contents,
532 including end-of-line conversion. However, if the file contains null
533 bytes, it is by default visited without any code conversions.
534 @xref{Lisp and Coding Systems, inhibit-null-byte-detection}.
535
536 If @var{visit} is non-@code{nil}, this function additionally marks the
537 buffer as unmodified and sets up various fields in the buffer so that it
538 is visiting the file @var{filename}: these include the buffer's visited
539 file name and its last save file modtime. This feature is used by
540 @code{find-file-noselect} and you probably should not use it yourself.
541
542 If @var{beg} and @var{end} are non-@code{nil}, they should be numbers
543 that are byte offsets specifying the portion of the file to insert.
544 In this case, @var{visit} must be @code{nil}. For example,
545
546 @example
547 (insert-file-contents filename nil 0 500)
548 @end example
549
550 @noindent
551 inserts the first 500 characters of a file.
552
553 If the argument @var{replace} is non-@code{nil}, it means to replace the
554 contents of the buffer (actually, just the accessible portion) with the
555 contents of the file. This is better than simply deleting the buffer
556 contents and inserting the whole file, because (1) it preserves some
557 marker positions and (2) it puts less data in the undo list.
558
559 It is possible to read a special file (such as a FIFO or an I/O device)
560 with @code{insert-file-contents}, as long as @var{replace} and
561 @var{visit} are @code{nil}.
562 @end defun
563
564 @defun insert-file-contents-literally filename &optional visit beg end replace
565 This function works like @code{insert-file-contents} except that it
566 does not run @code{find-file-hook}, and does not do format decoding,
567 character code conversion, automatic uncompression, and so on.
568 @end defun
569
570 If you want to pass a file name to another process so that another
571 program can read the file, use the function @code{file-local-copy}; see
572 @ref{Magic File Names}.
573
574 @node Writing to Files
575 @section Writing to Files
576 @cindex writing to files
577
578 You can write the contents of a buffer, or part of a buffer, directly
579 to a file on disk using the @code{append-to-file} and
580 @code{write-region} functions. Don't use these functions to write to
581 files that are being visited; that could cause confusion in the
582 mechanisms for visiting.
583
584 @deffn Command append-to-file start end filename
585 This function appends the contents of the region delimited by
586 @var{start} and @var{end} in the current buffer to the end of file
587 @var{filename}. If that file does not exist, it is created. This
588 function returns @code{nil}.
589
590 An error is signaled if @var{filename} specifies a nonwritable file,
591 or a nonexistent file in a directory where files cannot be created.
592
593 When called from Lisp, this function is completely equivalent to:
594
595 @example
596 (write-region start end filename t)
597 @end example
598 @end deffn
599
600 @deffn Command write-region start end filename &optional append visit lockname mustbenew
601 This function writes the region delimited by @var{start} and @var{end}
602 in the current buffer into the file specified by @var{filename}.
603
604 If @var{start} is @code{nil}, then the command writes the entire buffer
605 contents (@emph{not} just the accessible portion) to the file and
606 ignores @var{end}.
607
608 @c Emacs 19 feature
609 If @var{start} is a string, then @code{write-region} writes or appends
610 that string, rather than text from the buffer. @var{end} is ignored in
611 this case.
612
613 If @var{append} is non-@code{nil}, then the specified text is appended
614 to the existing file contents (if any). If @var{append} is a
615 number, @code{write-region} seeks to that byte offset from the start
616 of the file and writes the data from there.
617
618 If @var{mustbenew} is non-@code{nil}, then @code{write-region} asks
619 for confirmation if @var{filename} names an existing file. If
620 @var{mustbenew} is the symbol @code{excl}, then @code{write-region}
621 does not ask for confirmation, but instead it signals an error
622 @code{file-already-exists} if the file already exists.
623
624 The test for an existing file, when @var{mustbenew} is @code{excl}, uses
625 a special system feature. At least for files on a local disk, there is
626 no chance that some other program could create a file of the same name
627 before Emacs does, without Emacs's noticing.
628
629 If @var{visit} is @code{t}, then Emacs establishes an association
630 between the buffer and the file: the buffer is then visiting that file.
631 It also sets the last file modification time for the current buffer to
632 @var{filename}'s modtime, and marks the buffer as not modified. This
633 feature is used by @code{save-buffer}, but you probably should not use
634 it yourself.
635
636 @c Emacs 19 feature
637 If @var{visit} is a string, it specifies the file name to visit. This
638 way, you can write the data to one file (@var{filename}) while recording
639 the buffer as visiting another file (@var{visit}). The argument
640 @var{visit} is used in the echo area message and also for file locking;
641 @var{visit} is stored in @code{buffer-file-name}. This feature is used
642 to implement @code{file-precious-flag}; don't use it yourself unless you
643 really know what you're doing.
644
645 The optional argument @var{lockname}, if non-@code{nil}, specifies the
646 file name to use for purposes of locking and unlocking, overriding
647 @var{filename} and @var{visit} for that purpose.
648
649 The function @code{write-region} converts the data which it writes to
650 the appropriate file formats specified by @code{buffer-file-format}
651 and also calls the functions in the list
652 @code{write-region-annotate-functions}.
653 @xref{Format Conversion}.
654
655 Normally, @code{write-region} displays the message @samp{Wrote
656 @var{filename}} in the echo area. If @var{visit} is neither @code{t}
657 nor @code{nil} nor a string, then this message is inhibited. This
658 feature is useful for programs that use files for internal purposes,
659 files that the user does not need to know about.
660 @end deffn
661
662 @defmac with-temp-file file body@dots{}
663 @anchor{Definition of with-temp-file}
664 The @code{with-temp-file} macro evaluates the @var{body} forms with a
665 temporary buffer as the current buffer; then, at the end, it writes the
666 buffer contents into file @var{file}. It kills the temporary buffer
667 when finished, restoring the buffer that was current before the
668 @code{with-temp-file} form. Then it returns the value of the last form
669 in @var{body}.
670
671 The current buffer is restored even in case of an abnormal exit via
672 @code{throw} or error (@pxref{Nonlocal Exits}).
673
674 See also @code{with-temp-buffer} in @ref{Definition of
675 with-temp-buffer,, The Current Buffer}.
676 @end defmac
677
678 @node File Locks
679 @section File Locks
680 @cindex file locks
681 @cindex lock file
682
683 When two users edit the same file at the same time, they are likely
684 to interfere with each other. Emacs tries to prevent this situation
685 from arising by recording a @dfn{file lock} when a file is being
686 modified.
687 Emacs can then detect the first attempt to modify a buffer visiting a
688 file that is locked by another Emacs job, and ask the user what to do.
689 The file lock is really a file, a symbolic link with a special name,
690 stored in the same directory as the file you are editing. (On file
691 systems that do not support symbolic links, a regular file is used.)
692
693 When you access files using NFS, there may be a small probability that
694 you and another user will both lock the same file ``simultaneously''.
695 If this happens, it is possible for the two users to make changes
696 simultaneously, but Emacs will still warn the user who saves second.
697 Also, the detection of modification of a buffer visiting a file changed
698 on disk catches some cases of simultaneous editing; see
699 @ref{Modification Time}.
700
701 @defun file-locked-p filename
702 This function returns @code{nil} if the file @var{filename} is not
703 locked. It returns @code{t} if it is locked by this Emacs process, and
704 it returns the name of the user who has locked it if it is locked by
705 some other job.
706
707 @example
708 @group
709 (file-locked-p "foo")
710 @result{} nil
711 @end group
712 @end example
713 @end defun
714
715 @defun lock-buffer &optional filename
716 This function locks the file @var{filename}, if the current buffer is
717 modified. The argument @var{filename} defaults to the current buffer's
718 visited file. Nothing is done if the current buffer is not visiting a
719 file, or is not modified, or if the system does not support locking.
720 @end defun
721
722 @defun unlock-buffer
723 This function unlocks the file being visited in the current buffer,
724 if the buffer is modified. If the buffer is not modified, then
725 the file should not be locked, so this function does nothing. It also
726 does nothing if the current buffer is not visiting a file, or if the
727 system does not support locking.
728 @end defun
729
730 @defopt create-lockfiles
731 If this variable is @code{nil}, Emacs does not lock files.
732 @end defopt
733
734 @defun ask-user-about-lock file other-user
735 This function is called when the user tries to modify @var{file}, but it
736 is locked by another user named @var{other-user}. The default
737 definition of this function asks the user to say what to do. The value
738 this function returns determines what Emacs does next:
739
740 @itemize @bullet
741 @item
742 A value of @code{t} says to grab the lock on the file. Then
743 this user may edit the file and @var{other-user} loses the lock.
744
745 @item
746 A value of @code{nil} says to ignore the lock and let this
747 user edit the file anyway.
748
749 @item
750 @kindex file-locked
751 This function may instead signal a @code{file-locked} error, in which
752 case the change that the user was about to make does not take place.
753
754 The error message for this error looks like this:
755
756 @example
757 @error{} File is locked: @var{file} @var{other-user}
758 @end example
759
760 @noindent
761 where @code{file} is the name of the file and @var{other-user} is the
762 name of the user who has locked the file.
763 @end itemize
764
765 If you wish, you can replace the @code{ask-user-about-lock} function
766 with your own version that makes the decision in another way.
767 @end defun
768
769 @node Information about Files
770 @section Information about Files
771 @cindex file, information about
772
773 This section describes the functions for retrieving various types of
774 information about files (or directories or symbolic links), such as
775 whether a file is readable or writable, and its size. These functions
776 all take arguments which are file names. Except where noted, these
777 arguments need to specify existing files, or an error is signaled.
778
779 @cindex file names, trailing whitespace
780 @cindex trailing blanks in file names
781 Be careful with file names that end in spaces. On some filesystems
782 (notably, MS-Windows), trailing whitespace characters in file names
783 are silently and automatically ignored.
784
785 @menu
786 * Testing Accessibility:: Is a given file readable? Writable?
787 * Kinds of Files:: Is it a directory? A symbolic link?
788 * Truenames:: Eliminating symbolic links from a file name.
789 * File Attributes:: File sizes, modification times, etc.
790 * Extended Attributes:: Extended file attributes for access control.
791 * Locating Files:: How to find a file in standard places.
792 @end menu
793
794 @node Testing Accessibility
795 @subsection Testing Accessibility
796 @cindex accessibility of a file
797 @cindex file accessibility
798
799 These functions test for permission to access a file for reading,
800 writing, or execution. Unless explicitly stated otherwise, they
801 recursively follow symbolic links for their file name arguments, at
802 all levels (at the level of the file itself and at all levels of
803 parent directories).
804
805 On some operating systems, more complex sets of access permissions
806 can be specified, via mechanisms such as Access Control Lists (ACLs).
807 @xref{Extended Attributes}, for how to query and set those
808 permissions.
809
810 @defun file-exists-p filename
811 This function returns @code{t} if a file named @var{filename} appears
812 to exist. This does not mean you can necessarily read the file, only
813 that you can find out its attributes. (On Unix and GNU/Linux, this is
814 true if the file exists and you have execute permission on the
815 containing directories, regardless of the permissions of the file
816 itself.)
817
818 If the file does not exist, or if access control policies prevent you
819 from finding its attributes, this function returns @code{nil}.
820
821 Directories are files, so @code{file-exists-p} returns @code{t} when
822 given a directory name. However, symbolic links are treated
823 specially; @code{file-exists-p} returns @code{t} for a symbolic link
824 name only if the target file exists.
825 @end defun
826
827 @defun file-readable-p filename
828 This function returns @code{t} if a file named @var{filename} exists
829 and you can read it. It returns @code{nil} otherwise.
830 @end defun
831
832 @defun file-executable-p filename
833 This function returns @code{t} if a file named @var{filename} exists and
834 you can execute it. It returns @code{nil} otherwise. On Unix and
835 GNU/Linux, if the file is a directory, execute permission means you can
836 check the existence and attributes of files inside the directory, and
837 open those files if their modes permit.
838 @end defun
839
840 @defun file-writable-p filename
841 This function returns @code{t} if the file @var{filename} can be written
842 or created by you, and @code{nil} otherwise. A file is writable if the
843 file exists and you can write it. It is creatable if it does not exist,
844 but the specified directory does exist and you can write in that
845 directory.
846
847 In the example below, @file{foo} is not writable because the parent
848 directory does not exist, even though the user could create such a
849 directory.
850
851 @example
852 @group
853 (file-writable-p "~/no-such-dir/foo")
854 @result{} nil
855 @end group
856 @end example
857 @end defun
858
859 @defun file-accessible-directory-p dirname
860 This function returns @code{t} if you have permission to open existing
861 files in the directory whose name as a file is @var{dirname};
862 otherwise (or if there is no such directory), it returns @code{nil}.
863 The value of @var{dirname} may be either a directory name (such as
864 @file{/foo/}) or the file name of a file which is a directory
865 (such as @file{/foo}, without the final slash).
866
867 For example, from the following we deduce that any attempt to read a
868 file in @file{/foo/} will give an error:
869
870 @example
871 (file-accessible-directory-p "/foo")
872 @result{} nil
873 @end example
874 @end defun
875
876 @defun access-file filename string
877 This function opens file @var{filename} for reading, then closes it and
878 returns @code{nil}. However, if the open fails, it signals an error
879 using @var{string} as the error message text.
880 @end defun
881
882 @defun file-ownership-preserved-p filename &optional group
883 This function returns @code{t} if deleting the file @var{filename} and
884 then creating it anew would keep the file's owner unchanged. It also
885 returns @code{t} for nonexistent files.
886
887 If the optional argument @var{group} is non-@code{nil}, this function
888 also checks that the file's group would be unchanged.
889
890 If @var{filename} is a symbolic link, then, unlike the other functions
891 discussed here, @code{file-ownership-preserved-p} does @emph{not}
892 replace @var{filename} with its target. However, it does recursively
893 follow symbolic links at all levels of parent directories.
894 @end defun
895
896 @defun file-modes filename
897 @cindex mode bits
898 @cindex file permissions
899 @cindex permissions, file
900 @cindex file modes
901 This function returns the @dfn{mode bits} of @var{filename}---an
902 integer summarizing its read, write, and execution permissions.
903 Symbolic links in @var{filename} are recursively followed at all
904 levels. If the file does not exist, the return value is @code{nil}.
905
906 @xref{File permissions,,, coreutils, The @sc{gnu} @code{Coreutils}
907 Manual}, for a description of mode bits. For example, if the
908 low-order bit is 1, the file is executable by all users; if the
909 second-lowest-order bit is 1, the file is writable by all users; etc.
910 The highest possible value is 4095 (7777 octal), meaning that everyone
911 has read, write, and execute permission, the @acronym{SUID} bit is set
912 for both others and group, and the sticky bit is set.
913
914 @xref{Changing Files}, for the @code{set-file-modes} function, which
915 can be used to set these permissions.
916
917 @example
918 @group
919 (file-modes "~/junk/diffs")
920 @result{} 492 ; @r{Decimal integer.}
921 @end group
922 @group
923 (format "%o" 492)
924 @result{} "754" ; @r{Convert to octal.}
925 @end group
926
927 @group
928 (set-file-modes "~/junk/diffs" #o666)
929 @result{} nil
930 @end group
931
932 @group
933 $ ls -l diffs
934 -rw-rw-rw- 1 lewis lewis 3063 Oct 30 16:00 diffs
935 @end group
936 @end example
937
938 @cindex MS-DOS and file modes
939 @cindex file modes and MS-DOS
940 @strong{MS-DOS note:} On MS-DOS, there is no such thing as an
941 ``executable'' file mode bit. So @code{file-modes} considers a file
942 executable if its name ends in one of the standard executable
943 extensions, such as @file{.com}, @file{.bat}, @file{.exe}, and some
944 others. Files that begin with the Unix-standard @samp{#!} signature,
945 such as shell and Perl scripts, are also considered executable.
946 Directories are also reported as executable, for compatibility with
947 Unix. These conventions are also followed by @code{file-attributes}
948 (@pxref{File Attributes}).
949 @end defun
950
951 @node Kinds of Files
952 @subsection Distinguishing Kinds of Files
953 @cindex file classification
954 @cindex classification of file types
955
956 This section describes how to distinguish various kinds of files, such
957 as directories, symbolic links, and ordinary files.
958
959 @defun file-symlink-p filename
960 @cindex file symbolic links
961 If the file @var{filename} is a symbolic link, the
962 @code{file-symlink-p} function returns its (non-recursive) link target
963 as a string. (The link target string is not necessarily the full
964 absolute file name of the target; determining the full file name that
965 the link points to is nontrivial, see below.) If the leading
966 directories of @var{filename} include symbolic links, this function
967 recursively follows them.
968
969 If the file @var{filename} is not a symbolic link, or does not exist,
970 @code{file-symlink-p} returns @code{nil}.
971
972 Here are a few examples of using this function:
973
974 @example
975 @group
976 (file-symlink-p "not-a-symlink")
977 @result{} nil
978 @end group
979 @group
980 (file-symlink-p "sym-link")
981 @result{} "not-a-symlink"
982 @end group
983 @group
984 (file-symlink-p "sym-link2")
985 @result{} "sym-link"
986 @end group
987 @group
988 (file-symlink-p "/bin")
989 @result{} "/pub/bin"
990 @end group
991 @end example
992
993 Note that in the third example, the function returned @file{sym-link},
994 but did not proceed to resolve it, although that file is itself a
995 symbolic link. This is what we meant by ``non-recursive'' above---the
996 process of following the symbolic links does not recurse if the link
997 target is itself a link.
998
999 The string that this function returns is what is recorded in the
1000 symbolic link; it may or may not include any leading directories.
1001 This function does @emph{not} expand the link target to produce a
1002 fully-qualified file name, and in particular does not use the leading
1003 directories, if any, of the @var{filename} argument if the link target
1004 is not an absolute file name. Here's an example:
1005
1006 @example
1007 @group
1008 (file-symlink-p "/foo/bar/baz")
1009 @result{} "some-file"
1010 @end group
1011 @end example
1012
1013 @noindent
1014 Here, although @file{/foo/bar/baz} was given as a fully-qualified file
1015 name, the result is not, and in fact does not have any leading
1016 directories at all. And since @file{some-file} might itself be a
1017 symbolic link, you cannot simply prepend leading directories to it,
1018 nor even naively use @code{expand-file-name} (@pxref{File Name
1019 Expansion}) to produce its absolute file name.
1020
1021 For this reason, this function is seldom useful if you need to
1022 determine more than just the fact that a file is or isn't a symbolic
1023 link. If you actually need the file name of the link target, use
1024 @code{file-chase-links} or @code{file-truename}, described in
1025 @ref{Truenames}.
1026 @end defun
1027
1028 The next two functions recursively follow symbolic links at
1029 all levels for @var{filename}.
1030
1031 @defun file-directory-p filename
1032 This function returns @code{t} if @var{filename} is the name of an
1033 existing directory, @code{nil} otherwise.
1034
1035 @example
1036 @group
1037 (file-directory-p "~rms")
1038 @result{} t
1039 @end group
1040 @group
1041 (file-directory-p "~rms/lewis/files.texi")
1042 @result{} nil
1043 @end group
1044 @group
1045 (file-directory-p "~rms/lewis/no-such-file")
1046 @result{} nil
1047 @end group
1048 @group
1049 (file-directory-p "$HOME")
1050 @result{} nil
1051 @end group
1052 @group
1053 (file-directory-p
1054 (substitute-in-file-name "$HOME"))
1055 @result{} t
1056 @end group
1057 @end example
1058 @end defun
1059
1060 @defun file-regular-p filename
1061 This function returns @code{t} if the file @var{filename} exists and is
1062 a regular file (not a directory, named pipe, terminal, or
1063 other I/O device).
1064 @end defun
1065
1066 @node Truenames
1067 @subsection Truenames
1068 @cindex truename (of file)
1069
1070 The @dfn{truename} of a file is the name that you get by following
1071 symbolic links at all levels until none remain, then simplifying away
1072 @samp{.}@: and @samp{..}@: appearing as name components. This results
1073 in a sort of canonical name for the file. A file does not always have a
1074 unique truename; the number of distinct truenames a file has is equal to
1075 the number of hard links to the file. However, truenames are useful
1076 because they eliminate symbolic links as a cause of name variation.
1077
1078 @defun file-truename filename
1079 This function returns the truename of the file @var{filename}. If the
1080 argument is not an absolute file name, this function first expands it
1081 against @code{default-directory}.
1082
1083 This function does not expand environment variables. Only
1084 @code{substitute-in-file-name} does that. @xref{Definition of
1085 substitute-in-file-name}.
1086
1087 If you may need to follow symbolic links preceding @samp{..}@:
1088 appearing as a name component, call @code{file-truename} without prior
1089 direct or indirect calls to @code{expand-file-name}. Otherwise, the
1090 file name component immediately preceding @samp{..} will be
1091 ``simplified away'' before @code{file-truename} is called. To
1092 eliminate the need for a call to @code{expand-file-name},
1093 @code{file-truename} handles @samp{~} in the same way that
1094 @code{expand-file-name} does. @xref{File Name Expansion,, Functions
1095 that Expand Filenames}.
1096 @end defun
1097
1098 @defun file-chase-links filename &optional limit
1099 This function follows symbolic links, starting with @var{filename},
1100 until it finds a file name which is not the name of a symbolic link.
1101 Then it returns that file name. This function does @emph{not} follow
1102 symbolic links at the level of parent directories.
1103
1104 If you specify a number for @var{limit}, then after chasing through
1105 that many links, the function just returns what it has even if that is
1106 still a symbolic link.
1107 @end defun
1108
1109 To illustrate the difference between @code{file-chase-links} and
1110 @code{file-truename}, suppose that @file{/usr/foo} is a symbolic link to
1111 the directory @file{/home/foo}, and @file{/home/foo/hello} is an
1112 ordinary file (or at least, not a symbolic link) or nonexistent. Then
1113 we would have:
1114
1115 @example
1116 (file-chase-links "/usr/foo/hello")
1117 ;; @r{This does not follow the links in the parent directories.}
1118 @result{} "/usr/foo/hello"
1119 (file-truename "/usr/foo/hello")
1120 ;; @r{Assuming that @file{/home} is not a symbolic link.}
1121 @result{} "/home/foo/hello"
1122 @end example
1123
1124 @defun file-equal-p file1 file2
1125 This function returns @code{t} if the files @var{file1} and
1126 @var{file2} name the same file. This is similar to comparing their
1127 truenames, except that remote file names are also handled in an
1128 appropriate manner. If @var{file1} or @var{file2} does not exist, the
1129 return value is unspecified.
1130 @end defun
1131
1132 @defun file-in-directory-p file dir
1133 This function returns @code{t} if @var{file} is a file in directory
1134 @var{dir}, or in a subdirectory of @var{dir}. It also returns
1135 @code{t} if @var{file} and @var{dir} are the same directory. It
1136 compares the truenames of the two directories. If @var{dir} does not
1137 name an existing directory, the return value is @code{nil}.
1138 @end defun
1139
1140 @node File Attributes
1141 @subsection File Attributes
1142 @cindex file attributes
1143
1144 This section describes the functions for getting detailed
1145 information about a file, including the owner and group numbers, the
1146 number of names, the inode number, the size, and the times of access
1147 and modification.
1148
1149 @defun file-newer-than-file-p filename1 filename2
1150 @cindex file age
1151 @cindex file modification time
1152 This function returns @code{t} if the file @var{filename1} is
1153 newer than file @var{filename2}. If @var{filename1} does not
1154 exist, it returns @code{nil}. If @var{filename1} does exist, but
1155 @var{filename2} does not, it returns @code{t}.
1156
1157 In the following example, assume that the file @file{aug-19} was written
1158 on the 19th, @file{aug-20} was written on the 20th, and the file
1159 @file{no-file} doesn't exist at all.
1160
1161 @example
1162 @group
1163 (file-newer-than-file-p "aug-19" "aug-20")
1164 @result{} nil
1165 @end group
1166 @group
1167 (file-newer-than-file-p "aug-20" "aug-19")
1168 @result{} t
1169 @end group
1170 @group
1171 (file-newer-than-file-p "aug-19" "no-file")
1172 @result{} t
1173 @end group
1174 @group
1175 (file-newer-than-file-p "no-file" "aug-19")
1176 @result{} nil
1177 @end group
1178 @end example
1179 @end defun
1180
1181 If the @var{filename} argument to the next two functions is a
1182 symbolic link, then these function do @emph{not} replace it with its
1183 target. However, they both recursively follow symbolic links at all
1184 levels of parent directories.
1185
1186 @defun file-attributes filename &optional id-format
1187 @anchor{Definition of file-attributes}
1188 This function returns a list of attributes of file @var{filename}. If
1189 the specified file cannot be opened, it returns @code{nil}.
1190 The optional parameter @var{id-format} specifies the preferred format
1191 of attributes @acronym{UID} and @acronym{GID} (see below)---the
1192 valid values are @code{'string} and @code{'integer}. The latter is
1193 the default, but we plan to change that, so you should specify a
1194 non-@code{nil} value for @var{id-format} if you use the returned
1195 @acronym{UID} or @acronym{GID}.
1196
1197 The elements of the list, in order, are:
1198
1199 @enumerate 0
1200 @item
1201 @code{t} for a directory, a string for a symbolic link (the name
1202 linked to), or @code{nil} for a text file.
1203
1204 @c Wordy so as to prevent an overfull hbox. --rjc 15mar92
1205 @item
1206 The number of names the file has. Alternate names, also known as hard
1207 links, can be created by using the @code{add-name-to-file} function
1208 (@pxref{Changing Files}).
1209
1210 @item
1211 The file's @acronym{UID}, normally as a string. However, if it does
1212 not correspond to a named user, the value is a number.
1213
1214 @item
1215 The file's @acronym{GID}, likewise.
1216
1217 @item
1218 The time of last access, as a list of four integers @code{(@var{sec-high}
1219 @var{sec-low} @var{microsec} @var{picosec})}. (This is similar to the
1220 value of @code{current-time}; see @ref{Time of Day}.) Note that on
1221 some FAT-based filesystems, only the date of last access is recorded,
1222 so this time will always hold the midnight of the day of last access.
1223
1224 @cindex modification time of file
1225 @item
1226 The time of last modification as a list of four integers (as above).
1227 This is the last time when the file's contents were modified.
1228
1229 @item
1230 The time of last status change as a list of four integers (as above).
1231 This is the time of the last change to the file's access mode bits,
1232 its owner and group, and other information recorded in the filesystem
1233 for the file, beyond the file's contents.
1234
1235 @item
1236 The size of the file in bytes. This is floating point if the size is
1237 too large to fit in a Lisp integer.
1238
1239 @item
1240 The file's modes, as a string of ten letters or dashes,
1241 as in @samp{ls -l}.
1242
1243 @item
1244 An unspecified value, present for backward compatibility.
1245
1246 @item
1247 The file's inode number. If possible, this is an integer. If the
1248 inode number is too large to be represented as an integer in Emacs
1249 Lisp but dividing it by @math{2^{16}} yields a representable integer,
1250 then the value has the
1251 form @code{(@var{high} . @var{low})}, where @var{low} holds the low 16
1252 bits. If the inode number is too wide for even that, the value is of the form
1253 @code{(@var{high} @var{middle} . @var{low})}, where @code{high} holds
1254 the high bits, @var{middle} the middle 24 bits, and @var{low} the low
1255 16 bits.
1256
1257 @item
1258 The filesystem number of the device that the file is on. Depending on
1259 the magnitude of the value, this can be either an integer or a cons
1260 cell, in the same manner as the inode number. This element and the
1261 file's inode number together give enough information to distinguish
1262 any two files on the system---no two files can have the same values
1263 for both of these numbers.
1264 @end enumerate
1265
1266 For example, here are the file attributes for @file{files.texi}:
1267
1268 @example
1269 @group
1270 (file-attributes "files.texi" 'string)
1271 @result{} (nil 1 "lh" "users"
1272 (20614 64019 50040 152000)
1273 (20000 23 0 0)
1274 (20614 64555 902289 872000)
1275 122295 "-rw-rw-rw-"
1276 t (5888 2 . 43978)
1277 (15479 . 46724))
1278 @end group
1279 @end example
1280
1281 @noindent
1282 and here is how the result is interpreted:
1283
1284 @table @code
1285 @item nil
1286 is neither a directory nor a symbolic link.
1287
1288 @item 1
1289 has only one name (the name @file{files.texi} in the current default
1290 directory).
1291
1292 @item "lh"
1293 is owned by the user with name "lh".
1294
1295 @item "users"
1296 is in the group with name "users".
1297
1298 @item (20614 64019 50040 152000)
1299 was last accessed on October 23, 2012, at 20:12:03.050040152 UTC.
1300
1301 @item (20000 23 0 0)
1302 was last modified on July 15, 2001, at 08:53:43 UTC.
1303
1304 @item (20614 64555 902289 872000)
1305 last had its status changed on October 23, 2012, at 20:20:59.902289872 UTC.
1306
1307 @item 122295
1308 is 122295 bytes long. (It may not contain 122295 characters, though,
1309 if some of the bytes belong to multibyte sequences, and also if the
1310 end-of-line format is CR-LF.)
1311
1312 @item "-rw-rw-rw-"
1313 has a mode of read and write access for the owner, group, and world.
1314
1315 @item t
1316 is merely a placeholder; it carries no information.
1317
1318 @item (5888 2 . 43978)
1319 has an inode number of 6473924464520138.
1320
1321 @item (15479 . 46724)
1322 is on the file-system device whose number is 1014478468.
1323 @end table
1324 @end defun
1325
1326 @defun file-nlinks filename
1327 This function returns the number of names (i.e., hard links) that
1328 file @var{filename} has. If the file does not exist, this function
1329 returns @code{nil}. Note that symbolic links have no effect on this
1330 function, because they are not considered to be names of the files
1331 they link to.
1332
1333 @example
1334 @group
1335 $ ls -l foo*
1336 -rw-rw-rw- 2 rms rms 4 Aug 19 01:27 foo
1337 -rw-rw-rw- 2 rms rms 4 Aug 19 01:27 foo1
1338 @end group
1339
1340 @group
1341 (file-nlinks "foo")
1342 @result{} 2
1343 @end group
1344 @group
1345 (file-nlinks "doesnt-exist")
1346 @result{} nil
1347 @end group
1348 @end example
1349 @end defun
1350
1351 @node Extended Attributes
1352 @subsection Extended File Attributes
1353 @cindex extended file attributes
1354
1355 On some operating systems, each file can be associated with arbitrary
1356 @dfn{extended file attributes}. At present, Emacs supports querying
1357 and setting two specific sets of extended file attributes: Access
1358 Control Lists (ACLs) and SELinux contexts. These extended file
1359 attributes are used, on some systems, to impose more sophisticated
1360 file access controls than the basic ``Unix-style'' permissions
1361 discussed in the previous sections.
1362
1363 @cindex access control list
1364 @cindex ACL entries
1365 @cindex SELinux context
1366 A detailed explanation of ACLs and SELinux is beyond the scope of
1367 this manual. For our purposes, each file can be associated with an
1368 @dfn{ACL}, which specifies its properties under an ACL-based file
1369 control system, and/or an @dfn{SELinux context}, which specifies its
1370 properties under the SELinux system.
1371
1372 @defun file-acl filename
1373 This function returns the ACL for the file @var{filename}. The exact
1374 Lisp representation of the ACL is unspecified (and may change in
1375 future Emacs versions), but it is the same as what @code{set-file-acl}
1376 takes for its @var{acl} argument (@pxref{Changing Files}).
1377
1378 The underlying ACL implementation is platform-specific; on GNU/Linux
1379 and BSD, Emacs uses the POSIX ACL interface, while on MS-Windows Emacs
1380 emulates the POSIX ACL interface with native file security APIs.
1381
1382 If Emacs was not compiled with ACL support, or the file does not exist
1383 or is inaccessible, or Emacs was unable to determine the ACL entries
1384 for any other reason, then the return value is @code{nil}.
1385 @end defun
1386
1387 @defun file-selinux-context filename
1388 This function returns the SELinux context of the file @var{filename},
1389 as a list of the form @code{(@var{user} @var{role} @var{type}
1390 @var{range})}. The list elements are the context's user, role, type,
1391 and range respectively, as Lisp strings; see the SELinux documentation
1392 for details about what these actually mean. The return value has the
1393 same form as what @code{set-file-selinux-context} takes for its
1394 @var{context} argument (@pxref{Changing Files}).
1395
1396 If Emacs was not compiled with SELinux support, or the file does not
1397 exist or is inaccessible, or if the system does not support SELinux,
1398 then the return value is @code{(nil nil nil nil)}.
1399 @end defun
1400
1401 @defun file-extended-attributes filename
1402 This function returns an alist of the Emacs-recognized extended
1403 attributes of file @var{filename}. Currently, it serves as a
1404 convenient way to retrieve both the ACL and SELinux context; you can
1405 then call the function @code{set-file-extended-attributes}, with the
1406 returned alist as its second argument, to apply the same file access
1407 attributes to another file (@pxref{Changing Files}).
1408
1409 One of the elements is @code{(acl . @var{acl})}, where @var{acl} has
1410 the same form returned by @code{file-acl}.
1411
1412 Another element is @code{(selinux-context . @var{context})}, where
1413 @var{context} is the SELinux context, in the same form returned by
1414 @code{file-selinux-context}.
1415 @end defun
1416
1417 @node Locating Files
1418 @subsection Locating Files in Standard Places
1419 @cindex locate file in path
1420 @cindex find file in path
1421
1422 This section explains how to search for a file in a list of
1423 directories (a @dfn{path}), or for an executable file in the standard
1424 list of executable file directories.
1425
1426 To search for a user-specific configuration file, @xref{Standard
1427 File Names}, for the @code{locate-user-emacs-file} function.
1428
1429 @defun locate-file filename path &optional suffixes predicate
1430 This function searches for a file whose name is @var{filename} in a
1431 list of directories given by @var{path}, trying the suffixes in
1432 @var{suffixes}. If it finds such a file, it returns the file's
1433 absolute file name (@pxref{Relative File Names}); otherwise it returns
1434 @code{nil}.
1435
1436 The optional argument @var{suffixes} gives the list of file-name
1437 suffixes to append to @var{filename} when searching.
1438 @code{locate-file} tries each possible directory with each of these
1439 suffixes. If @var{suffixes} is @code{nil}, or @code{("")}, then there
1440 are no suffixes, and @var{filename} is used only as-is. Typical
1441 values of @var{suffixes} are @code{exec-suffixes} (@pxref{Subprocess
1442 Creation}), @code{load-suffixes}, @code{load-file-rep-suffixes} and
1443 the return value of the function @code{get-load-suffixes} (@pxref{Load
1444 Suffixes}).
1445
1446 Typical values for @var{path} are @code{exec-path} (@pxref{Subprocess
1447 Creation}) when looking for executable programs, or @code{load-path}
1448 (@pxref{Library Search}) when looking for Lisp files. If
1449 @var{filename} is absolute, @var{path} has no effect, but the suffixes
1450 in @var{suffixes} are still tried.
1451
1452 The optional argument @var{predicate}, if non-@code{nil}, specifies a
1453 predicate function for testing whether a candidate file is suitable.
1454 The predicate is passed the candidate file name as its single
1455 argument. If @var{predicate} is @code{nil} or omitted,
1456 @code{locate-file} uses @code{file-readable-p} as the predicate.
1457 @xref{Kinds of Files}, for other useful predicates, e.g.,
1458 @code{file-executable-p} and @code{file-directory-p}.
1459
1460 For compatibility, @var{predicate} can also be one of the symbols
1461 @code{executable}, @code{readable}, @code{writable}, @code{exists}, or
1462 a list of one or more of these symbols.
1463 @end defun
1464
1465 @defun executable-find program
1466 This function searches for the executable file of the named
1467 @var{program} and returns the absolute file name of the executable,
1468 including its file-name extensions, if any. It returns @code{nil} if
1469 the file is not found. The functions searches in all the directories
1470 in @code{exec-path}, and tries all the file-name extensions in
1471 @code{exec-suffixes} (@pxref{Subprocess Creation}).
1472 @end defun
1473
1474 @node Changing Files
1475 @section Changing File Names and Attributes
1476 @c @cindex renaming files Duplicates rename-file
1477 @cindex copying files
1478 @cindex deleting files
1479 @cindex linking files
1480 @cindex setting modes of files
1481
1482 The functions in this section rename, copy, delete, link, and set
1483 the modes (permissions) of files.
1484
1485 In the functions that have an argument @var{newname}, if a file by the
1486 name of @var{newname} already exists, the actions taken depend on the
1487 value of the argument @var{ok-if-already-exists}:
1488
1489 @itemize @bullet
1490 @item
1491 Signal a @code{file-already-exists} error if
1492 @var{ok-if-already-exists} is @code{nil}.
1493
1494 @item
1495 Request confirmation if @var{ok-if-already-exists} is a number.
1496
1497 @item
1498 Replace the old file without confirmation if @var{ok-if-already-exists}
1499 is any other value.
1500 @end itemize
1501
1502 The next four commands all recursively follow symbolic links at all
1503 levels of parent directories for their first argument, but, if that
1504 argument is itself a symbolic link, then only @code{copy-file}
1505 replaces it with its (recursive) target.
1506
1507 @deffn Command add-name-to-file oldname newname &optional ok-if-already-exists
1508 @cindex file with multiple names
1509 @cindex file hard link
1510 This function gives the file named @var{oldname} the additional name
1511 @var{newname}. This means that @var{newname} becomes a new ``hard
1512 link'' to @var{oldname}.
1513
1514 In the first part of the following example, we list two files,
1515 @file{foo} and @file{foo3}.
1516
1517 @example
1518 @group
1519 $ ls -li fo*
1520 81908 -rw-rw-rw- 1 rms rms 29 Aug 18 20:32 foo
1521 84302 -rw-rw-rw- 1 rms rms 24 Aug 18 20:31 foo3
1522 @end group
1523 @end example
1524
1525 Now we create a hard link, by calling @code{add-name-to-file}, then list
1526 the files again. This shows two names for one file, @file{foo} and
1527 @file{foo2}.
1528
1529 @example
1530 @group
1531 (add-name-to-file "foo" "foo2")
1532 @result{} nil
1533 @end group
1534
1535 @group
1536 $ ls -li fo*
1537 81908 -rw-rw-rw- 2 rms rms 29 Aug 18 20:32 foo
1538 81908 -rw-rw-rw- 2 rms rms 29 Aug 18 20:32 foo2
1539 84302 -rw-rw-rw- 1 rms rms 24 Aug 18 20:31 foo3
1540 @end group
1541 @end example
1542
1543 Finally, we evaluate the following:
1544
1545 @example
1546 (add-name-to-file "foo" "foo3" t)
1547 @end example
1548
1549 @noindent
1550 and list the files again. Now there are three names
1551 for one file: @file{foo}, @file{foo2}, and @file{foo3}. The old
1552 contents of @file{foo3} are lost.
1553
1554 @example
1555 @group
1556 (add-name-to-file "foo1" "foo3")
1557 @result{} nil
1558 @end group
1559
1560 @group
1561 $ ls -li fo*
1562 81908 -rw-rw-rw- 3 rms rms 29 Aug 18 20:32 foo
1563 81908 -rw-rw-rw- 3 rms rms 29 Aug 18 20:32 foo2
1564 81908 -rw-rw-rw- 3 rms rms 29 Aug 18 20:32 foo3
1565 @end group
1566 @end example
1567
1568 This function is meaningless on operating systems where multiple names
1569 for one file are not allowed. Some systems implement multiple names
1570 by copying the file instead.
1571
1572 See also @code{file-nlinks} in @ref{File Attributes}.
1573 @end deffn
1574
1575 @deffn Command rename-file filename newname &optional ok-if-already-exists
1576 This command renames the file @var{filename} as @var{newname}.
1577
1578 If @var{filename} has additional names aside from @var{filename}, it
1579 continues to have those names. In fact, adding the name @var{newname}
1580 with @code{add-name-to-file} and then deleting @var{filename} has the
1581 same effect as renaming, aside from momentary intermediate states.
1582 @end deffn
1583
1584 @deffn Command copy-file oldname newname &optional ok-if-exists time preserve-uid-gid preserve-extended-attributes
1585 This command copies the file @var{oldname} to @var{newname}. An
1586 error is signaled if @var{oldname} does not exist. If @var{newname}
1587 names a directory, it copies @var{oldname} into that directory,
1588 preserving its final name component.
1589
1590 If @var{time} is non-@code{nil}, then this function gives the new file
1591 the same last-modified time that the old one has. (This works on only
1592 some operating systems.) If setting the time gets an error,
1593 @code{copy-file} signals a @code{file-date-error} error. In an
1594 interactive call, a prefix argument specifies a non-@code{nil} value
1595 for @var{time}.
1596
1597 If argument @var{preserve-uid-gid} is @code{nil}, we let the operating
1598 system decide the user and group ownership of the new file (this is
1599 usually set to the user running Emacs). If @var{preserve-uid-gid} is
1600 non-@code{nil}, we attempt to copy the user and group ownership of the
1601 file. This works only on some operating systems, and only if you have
1602 the correct permissions to do so.
1603
1604 If the optional argument @var{preserve-permissions} is non-@code{nil},
1605 this function copies the file modes (or ``permissions'') of
1606 @var{oldname} to @var{newname}, as well as the Access Control List and
1607 SELinux context (if any). @xref{Information about Files}.
1608
1609 Otherwise, the file modes of @var{newname} are left unchanged if it is
1610 an existing file, and set to those of @var{oldname}, masked by the
1611 default file permissions (see @code{set-default-file-modes} below), if
1612 @var{newname} is to be newly created. The Access Control List or
1613 SELinux context are not copied over in either case.
1614 @end deffn
1615
1616 @deffn Command make-symbolic-link filename newname &optional ok-if-exists
1617 @pindex ln
1618 @kindex file-already-exists
1619 This command makes a symbolic link to @var{filename}, named
1620 @var{newname}. This is like the shell command @samp{ln -s
1621 @var{filename} @var{newname}}.
1622
1623 This function is not available on systems that don't support symbolic
1624 links.
1625 @end deffn
1626
1627 @cindex trash
1628 @vindex delete-by-moving-to-trash
1629 @deffn Command delete-file filename &optional trash
1630 @pindex rm
1631 This command deletes the file @var{filename}. If the file has
1632 multiple names, it continues to exist under the other names. If
1633 @var{filename} is a symbolic link, @code{delete-file} deletes only the
1634 symbolic link and not its target (though it does follow symbolic links
1635 at all levels of parent directories).
1636
1637 A suitable kind of @code{file-error} error is signaled if the file
1638 does not exist, or is not deletable. (On Unix and GNU/Linux, a file
1639 is deletable if its directory is writable.)
1640
1641 If the optional argument @var{trash} is non-@code{nil} and the
1642 variable @code{delete-by-moving-to-trash} is non-@code{nil}, this
1643 command moves the file into the system Trash instead of deleting it.
1644 @xref{Misc File Ops,,Miscellaneous File Operations, emacs, The GNU
1645 Emacs Manual}. When called interactively, @var{trash} is @code{t} if
1646 no prefix argument is given, and @code{nil} otherwise.
1647
1648 See also @code{delete-directory} in @ref{Create/Delete Dirs}.
1649 @end deffn
1650
1651 @cindex file permissions, setting
1652 @cindex permissions, file
1653 @cindex file modes, setting
1654 @deffn Command set-file-modes filename mode
1655 This function sets the @dfn{file mode} (or @dfn{permissions}) of
1656 @var{filename} to @var{mode}. It recursively follows symbolic links
1657 at all levels for @var{filename}.
1658
1659 If called non-interactively, @var{mode} must be an integer. Only the
1660 lowest 12 bits of the integer are used; on most systems, only the
1661 lowest 9 bits are meaningful. You can use the Lisp construct for
1662 octal numbers to enter @var{mode}. For example,
1663
1664 @example
1665 (set-file-modes #o644)
1666 @end example
1667
1668 @noindent
1669 specifies that the file should be readable and writable for its owner,
1670 readable for group members, and readable for all other users.
1671 @xref{File permissions,,, coreutils, The @sc{gnu} @code{Coreutils}
1672 Manual}, for a description of mode bit specifications.
1673
1674 Interactively, @var{mode} is read from the minibuffer using
1675 @code{read-file-modes} (see below), which lets the user type in either
1676 an integer or a string representing the permissions symbolically.
1677
1678 @xref{File Attributes}, for the function @code{file-modes}, which
1679 returns the permissions of a file.
1680 @end deffn
1681
1682 @defun set-default-file-modes mode
1683 @cindex umask
1684 This function sets the default permissions for new files created by
1685 Emacs and its subprocesses. Every file created with Emacs initially
1686 has these permissions, or a subset of them (@code{write-region} will
1687 not grant execute permissions even if the default file permissions
1688 allow execution). On Unix and GNU/Linux, the default permissions are
1689 given by the bitwise complement of the ``umask'' value.
1690
1691 The argument @var{mode} should be an integer which specifies the
1692 permissions, similar to @code{set-file-modes} above. Only the lowest
1693 9 bits are meaningful.
1694
1695 The default file permissions have no effect when you save a modified
1696 version of an existing file; saving a file preserves its existing
1697 permissions.
1698 @end defun
1699
1700 @defun default-file-modes
1701 This function returns the default file permissions, as an integer.
1702 @end defun
1703
1704 @defun read-file-modes &optional prompt base-file
1705 This function reads a set of file mode bits from the minibuffer. The
1706 first optional argument @var{prompt} specifies a non-default prompt.
1707 Second second optional argument @var{base-file} is the name of a file
1708 on whose permissions to base the mode bits that this function returns,
1709 if what the user types specifies mode bits relative to permissions of
1710 an existing file.
1711
1712 If user input represents an octal number, this function returns that
1713 number. If it is a complete symbolic specification of mode bits, as
1714 in @code{"u=rwx"}, the function converts it to the equivalent numeric
1715 value using @code{file-modes-symbolic-to-number} and returns the
1716 result. If the specification is relative, as in @code{"o+g"}, then
1717 the permissions on which the specification is based are taken from the
1718 mode bits of @var{base-file}. If @var{base-file} is omitted or
1719 @code{nil}, the function uses @code{0} as the base mode bits. The
1720 complete and relative specifications can be combined, as in
1721 @code{"u+r,g+rx,o+r,g-w"}. @xref{File permissions,,, coreutils, The
1722 @sc{gnu} @code{Coreutils} Manual}, for a description of file mode
1723 specifications.
1724 @end defun
1725
1726 @defun file-modes-symbolic-to-number modes &optional base-modes
1727 This function converts a symbolic file mode specification in
1728 @var{modes} into the equivalent integer. If the symbolic
1729 specification is based on an existing file, that file's mode bits are
1730 taken from the optional argument @var{base-modes}; if that argument is
1731 omitted or @code{nil}, it defaults to 0, i.e., no access rights at
1732 all.
1733 @end defun
1734
1735 @defun set-file-times filename &optional time
1736 This function sets the access and modification times of @var{filename}
1737 to @var{time}. The return value is @code{t} if the times are successfully
1738 set, otherwise it is @code{nil}. @var{time} defaults to the current
1739 time and must be in the format returned by @code{current-time}
1740 (@pxref{Time of Day}).
1741 @end defun
1742
1743 @defun set-file-extended-attributes filename attribute-alist
1744 This function sets the Emacs-recognized extended file attributes for
1745 @code{filename}. The second argument @var{attribute-alist} should be
1746 an alist of the same form returned by @code{file-extended-attributes}.
1747 @xref{Extended Attributes}.
1748 @end defun
1749
1750 @defun set-file-selinux-context filename context
1751 This function sets the SELinux security context for @var{filename} to
1752 @var{context}. The @var{context} argument should be a list
1753 @code{(@var{user} @var{role} @var{type} @var{range})}, where each
1754 element is a string. @xref{Extended Attributes}.
1755
1756 The function returns @code{t} if it succeeds in setting the SELinux
1757 context of @var{filename}. It returns @code{nil} if the context was
1758 not set (e.g., if SELinux is disabled, or if Emacs was compiled
1759 without SELinux support).
1760 @end defun
1761
1762 @defun set-file-acl filename acl
1763 This function sets the Access Control List for @var{filename} to
1764 @var{acl}. The @var{acl} argument should have the same form returned
1765 by the function @code{file-acl}. @xref{Extended Attributes}.
1766
1767 The function returns @code{t} if it successfully sets the ACL of
1768 @var{filename}, @code{nil} otherwise.
1769 @end defun
1770
1771 @node File Names
1772 @section File Names
1773 @cindex file names
1774
1775 Files are generally referred to by their names, in Emacs as elsewhere.
1776 File names in Emacs are represented as strings. The functions that
1777 operate on a file all expect a file name argument.
1778
1779 In addition to operating on files themselves, Emacs Lisp programs
1780 often need to operate on file names; i.e., to take them apart and to use
1781 part of a name to construct related file names. This section describes
1782 how to manipulate file names.
1783
1784 The functions in this section do not actually access files, so they
1785 can operate on file names that do not refer to an existing file or
1786 directory.
1787
1788 @findex cygwin-convert-file-name-from-windows
1789 @findex cygwin-convert-file-name-to-windows
1790 @cindex MS-Windows file-name syntax
1791 @cindex converting file names from/to MS-Windows syntax
1792 On MS-DOS and MS-Windows, these functions (like the function that
1793 actually operate on files) accept MS-DOS or MS-Windows file-name syntax,
1794 where backslashes separate the components, as well as Unix syntax; but
1795 they always return Unix syntax. This enables Lisp programs to specify
1796 file names in Unix syntax and work properly on all systems without
1797 change.@footnote{In MS-Windows versions of Emacs compiled for the Cygwin
1798 environment, you can use the functions
1799 @code{cygwin-convert-file-name-to-windows} and
1800 @code{cygwin-convert-file-name-from-windows} to convert between the
1801 two file-name syntaxes.}
1802
1803 @menu
1804 * File Name Components:: The directory part of a file name, and the rest.
1805 * Relative File Names:: Some file names are relative to a current directory.
1806 * Directory Names:: A directory's name as a directory
1807 is different from its name as a file.
1808 * File Name Expansion:: Converting relative file names to absolute ones.
1809 * Unique File Names:: Generating names for temporary files.
1810 * File Name Completion:: Finding the completions for a given file name.
1811 * Standard File Names:: If your package uses a fixed file name,
1812 how to handle various operating systems simply.
1813 @end menu
1814
1815 @node File Name Components
1816 @subsection File Name Components
1817 @cindex directory part (of file name)
1818 @cindex nondirectory part (of file name)
1819 @cindex version number (in file name)
1820
1821 The operating system groups files into directories. To specify a
1822 file, you must specify the directory and the file's name within that
1823 directory. Therefore, Emacs considers a file name as having two main
1824 parts: the @dfn{directory name} part, and the @dfn{nondirectory} part
1825 (or @dfn{file name within the directory}). Either part may be empty.
1826 Concatenating these two parts reproduces the original file name.
1827
1828 On most systems, the directory part is everything up to and including
1829 the last slash (backslash is also allowed in input on MS-DOS or
1830 MS-Windows); the nondirectory part is the rest.
1831
1832 For some purposes, the nondirectory part is further subdivided into
1833 the name proper and the @dfn{version number}. On most systems, only
1834 backup files have version numbers in their names.
1835
1836 @defun file-name-directory filename
1837 This function returns the directory part of @var{filename}, as a
1838 directory name (@pxref{Directory Names}), or @code{nil} if
1839 @var{filename} does not include a directory part.
1840
1841 On GNU and Unix systems, a string returned by this function always
1842 ends in a slash. On MS-DOS it can also end in a colon.
1843
1844 @example
1845 @group
1846 (file-name-directory "lewis/foo") ; @r{Unix example}
1847 @result{} "lewis/"
1848 @end group
1849 @group
1850 (file-name-directory "foo") ; @r{Unix example}
1851 @result{} nil
1852 @end group
1853 @end example
1854 @end defun
1855
1856 @defun file-name-nondirectory filename
1857 This function returns the nondirectory part of @var{filename}.
1858
1859 @example
1860 @group
1861 (file-name-nondirectory "lewis/foo")
1862 @result{} "foo"
1863 @end group
1864 @group
1865 (file-name-nondirectory "foo")
1866 @result{} "foo"
1867 @end group
1868 @group
1869 (file-name-nondirectory "lewis/")
1870 @result{} ""
1871 @end group
1872 @end example
1873 @end defun
1874
1875 @defun file-name-sans-versions filename &optional keep-backup-version
1876 This function returns @var{filename} with any file version numbers,
1877 backup version numbers, or trailing tildes discarded.
1878
1879 If @var{keep-backup-version} is non-@code{nil}, then true file version
1880 numbers understood as such by the file system are discarded from the
1881 return value, but backup version numbers are kept.
1882
1883 @example
1884 @group
1885 (file-name-sans-versions "~rms/foo.~1~")
1886 @result{} "~rms/foo"
1887 @end group
1888 @group
1889 (file-name-sans-versions "~rms/foo~")
1890 @result{} "~rms/foo"
1891 @end group
1892 @group
1893 (file-name-sans-versions "~rms/foo")
1894 @result{} "~rms/foo"
1895 @end group
1896 @end example
1897 @end defun
1898
1899 @defun file-name-extension filename &optional period
1900 This function returns @var{filename}'s final ``extension'', if any,
1901 after applying @code{file-name-sans-versions} to remove any
1902 version/backup part. The extension, in a file name, is the part that
1903 follows the last @samp{.} in the last name component (minus any
1904 version/backup part).
1905
1906 This function returns @code{nil} for extensionless file names such as
1907 @file{foo}. It returns @code{""} for null extensions, as in
1908 @file{foo.}. If the last component of a file name begins with a
1909 @samp{.}, that @samp{.} doesn't count as the beginning of an
1910 extension. Thus, @file{.emacs}'s ``extension'' is @code{nil}, not
1911 @samp{.emacs}.
1912
1913 If @var{period} is non-@code{nil}, then the returned value includes
1914 the period that delimits the extension, and if @var{filename} has no
1915 extension, the value is @code{""}.
1916 @end defun
1917
1918 @defun file-name-sans-extension filename
1919 This function returns @var{filename} minus its extension, if any. The
1920 version/backup part, if present, is only removed if the file has an
1921 extension. For example,
1922
1923 @example
1924 (file-name-sans-extension "foo.lose.c")
1925 @result{} "foo.lose"
1926 (file-name-sans-extension "big.hack/foo")
1927 @result{} "big.hack/foo"
1928 (file-name-sans-extension "/my/home/.emacs")
1929 @result{} "/my/home/.emacs"
1930 (file-name-sans-extension "/my/home/.emacs.el")
1931 @result{} "/my/home/.emacs"
1932 (file-name-sans-extension "~/foo.el.~3~")
1933 @result{} "~/foo"
1934 (file-name-sans-extension "~/foo.~3~")
1935 @result{} "~/foo.~3~"
1936 @end example
1937
1938 Note that the @samp{.~3~} in the two last examples is the backup part,
1939 not an extension.
1940 @end defun
1941
1942 @defun file-name-base &optional filename
1943 This function is the composition of @code{file-name-sans-extension}
1944 and @code{file-name-nondirectory}. For example,
1945
1946 @example
1947 (file-name-base "/my/home/foo.c")
1948 @result{} "foo"
1949 @end example
1950
1951 The @var{filename} argument defaults to @code{buffer-file-name}.
1952 @end defun
1953
1954 @node Relative File Names
1955 @subsection Absolute and Relative File Names
1956 @cindex absolute file name
1957 @cindex relative file name
1958
1959 All the directories in the file system form a tree starting at the
1960 root directory. A file name can specify all the directory names
1961 starting from the root of the tree; then it is called an
1962 @dfn{absolute} file name. Or it can specify the position of the file
1963 in the tree relative to a default directory; then it is called a
1964 @dfn{relative} file name. On Unix and GNU/Linux, an absolute file
1965 name starts with a @samp{/} or a @samp{~}
1966 (@pxref{abbreviate-file-name}), and a relative one does not. On
1967 MS-DOS and MS-Windows, an absolute file name starts with a slash or a
1968 backslash, or with a drive specification @samp{@var{x}:/}, where
1969 @var{x} is the @dfn{drive letter}.
1970
1971 @defun file-name-absolute-p filename
1972 This function returns @code{t} if file @var{filename} is an absolute
1973 file name, @code{nil} otherwise.
1974
1975 @example
1976 @group
1977 (file-name-absolute-p "~rms/foo")
1978 @result{} t
1979 @end group
1980 @group
1981 (file-name-absolute-p "rms/foo")
1982 @result{} nil
1983 @end group
1984 @group
1985 (file-name-absolute-p "/user/rms/foo")
1986 @result{} t
1987 @end group
1988 @end example
1989 @end defun
1990
1991 Given a possibly relative file name, you can convert it to an
1992 absolute name using @code{expand-file-name} (@pxref{File Name
1993 Expansion}). This function converts absolute file names to relative
1994 names:
1995
1996 @defun file-relative-name filename &optional directory
1997 This function tries to return a relative name that is equivalent to
1998 @var{filename}, assuming the result will be interpreted relative to
1999 @var{directory} (an absolute directory name or directory file name).
2000 If @var{directory} is omitted or @code{nil}, it defaults to the
2001 current buffer's default directory.
2002
2003 On some operating systems, an absolute file name begins with a device
2004 name. On such systems, @var{filename} has no relative equivalent based
2005 on @var{directory} if they start with two different device names. In
2006 this case, @code{file-relative-name} returns @var{filename} in absolute
2007 form.
2008
2009 @example
2010 (file-relative-name "/foo/bar" "/foo/")
2011 @result{} "bar"
2012 (file-relative-name "/foo/bar" "/hack/")
2013 @result{} "../foo/bar"
2014 @end example
2015 @end defun
2016
2017 @node Directory Names
2018 @subsection Directory Names
2019 @cindex directory name
2020 @cindex file name of directory
2021
2022 A @dfn{directory name} is the name of a directory. A directory is
2023 actually a kind of file, so it has a file name, which is related to
2024 the directory name but not identical to it. (This is not quite the
2025 same as the usual Unix terminology.) These two different names for
2026 the same entity are related by a syntactic transformation. On GNU and
2027 Unix systems, this is simple: a directory name ends in a slash,
2028 whereas the directory's name as a file lacks that slash. On MS-DOS
2029 the relationship is more complicated.
2030
2031 The difference between a directory name and its name as a file is
2032 subtle but crucial. When an Emacs variable or function argument is
2033 described as being a directory name, a file name of a directory is not
2034 acceptable. When @code{file-name-directory} returns a string, that is
2035 always a directory name.
2036
2037 The following two functions convert between directory names and file
2038 names. They do nothing special with environment variable substitutions
2039 such as @samp{$HOME}, and the constructs @samp{~}, @samp{.} and @samp{..}.
2040
2041 @defun file-name-as-directory filename
2042 This function returns a string representing @var{filename} in a form
2043 that the operating system will interpret as the name of a directory. On
2044 most systems, this means appending a slash to the string (if it does not
2045 already end in one).
2046
2047 @example
2048 @group
2049 (file-name-as-directory "~rms/lewis")
2050 @result{} "~rms/lewis/"
2051 @end group
2052 @end example
2053 @end defun
2054
2055 @defun directory-file-name dirname
2056 This function returns a string representing @var{dirname} in a form that
2057 the operating system will interpret as the name of a file. On most
2058 systems, this means removing the final slash (or backslash) from the
2059 string.
2060
2061 @example
2062 @group
2063 (directory-file-name "~lewis/")
2064 @result{} "~lewis"
2065 @end group
2066 @end example
2067 @end defun
2068
2069 Given a directory name, you can combine it with a relative file name
2070 using @code{concat}:
2071
2072 @example
2073 (concat @var{dirname} @var{relfile})
2074 @end example
2075
2076 @noindent
2077 Be sure to verify that the file name is relative before doing that.
2078 If you use an absolute file name, the results could be syntactically
2079 invalid or refer to the wrong file.
2080
2081 If you want to use a directory file name in making such a
2082 combination, you must first convert it to a directory name using
2083 @code{file-name-as-directory}:
2084
2085 @example
2086 (concat (file-name-as-directory @var{dirfile}) @var{relfile})
2087 @end example
2088
2089 @noindent
2090 Don't try concatenating a slash by hand, as in
2091
2092 @example
2093 ;;; @r{Wrong!}
2094 (concat @var{dirfile} "/" @var{relfile})
2095 @end example
2096
2097 @noindent
2098 because this is not portable. Always use
2099 @code{file-name-as-directory}.
2100
2101 To convert a directory name to its abbreviation, use this
2102 function:
2103
2104 @cindex file name abbreviations
2105 @cindex abbreviated file names
2106 @defun abbreviate-file-name filename
2107 @anchor{abbreviate-file-name}
2108 This function returns an abbreviated form of @var{filename}. It
2109 applies the abbreviations specified in @code{directory-abbrev-alist}
2110 (@pxref{File Aliases,,File Aliases, emacs, The GNU Emacs Manual}),
2111 then substitutes @samp{~} for the user's home directory if the
2112 argument names a file in the home directory or one of its
2113 subdirectories. If the home directory is a root directory, it is not
2114 replaced with @samp{~}, because this does not make the result shorter
2115 on many systems.
2116
2117 You can use this function for directory names and for file names,
2118 because it recognizes abbreviations even as part of the name.
2119 @end defun
2120
2121 @node File Name Expansion
2122 @subsection Functions that Expand Filenames
2123 @cindex expansion of file names
2124
2125 @dfn{Expanding} a file name means converting a relative file name to
2126 an absolute one. Since this is done relative to a default directory,
2127 you must specify the default directory name as well as the file name
2128 to be expanded. It also involves expanding abbreviations like
2129 @file{~/}
2130 @ifnottex
2131 (@pxref{abbreviate-file-name}),
2132 @end ifnottex
2133 and eliminating redundancies like @file{./} and @file{@var{name}/../}.
2134
2135 @defun expand-file-name filename &optional directory
2136 This function converts @var{filename} to an absolute file name. If
2137 @var{directory} is supplied, it is the default directory to start with
2138 if @var{filename} is relative. (The value of @var{directory} should
2139 itself be an absolute directory name or directory file name; it may
2140 start with @samp{~}.) Otherwise, the current buffer's value of
2141 @code{default-directory} is used. For example:
2142
2143 @example
2144 @group
2145 (expand-file-name "foo")
2146 @result{} "/xcssun/users/rms/lewis/foo"
2147 @end group
2148 @group
2149 (expand-file-name "../foo")
2150 @result{} "/xcssun/users/rms/foo"
2151 @end group
2152 @group
2153 (expand-file-name "foo" "/usr/spool/")
2154 @result{} "/usr/spool/foo"
2155 @end group
2156 @end example
2157
2158 If the part of the combined file name before the first slash is
2159 @samp{~}, it expands to the value of the @env{HOME} environment
2160 variable (usually your home directory). If the part before the first
2161 slash is @samp{~@var{user}} and if @var{user} is a valid login name,
2162 it expands to @var{user}'s home directory.
2163
2164 Filenames containing @samp{.} or @samp{..} are simplified to their
2165 canonical form:
2166
2167 @example
2168 @group
2169 (expand-file-name "bar/../foo")
2170 @result{} "/xcssun/users/rms/lewis/foo"
2171 @end group
2172 @end example
2173
2174 In some cases, a leading @samp{..} component can remain in the output:
2175
2176 @example
2177 @group
2178 (expand-file-name "../home" "/")
2179 @result{} "/../home"
2180 @end group
2181 @end example
2182
2183 @noindent
2184 This is for the sake of filesystems that have the concept of a
2185 ``superroot'' above the root directory @file{/}. On other filesystems,
2186 @file{/../} is interpreted exactly the same as @file{/}.
2187
2188 Note that @code{expand-file-name} does @emph{not} expand environment
2189 variables; only @code{substitute-in-file-name} does that:
2190
2191 @example
2192 @group
2193 (expand-file-name "$HOME/foo")
2194 @result{} "/xcssun/users/rms/lewis/$HOME/foo"
2195 @end group
2196 @end example
2197
2198 Note also that @code{expand-file-name} does not follow symbolic links
2199 at any level. This results in a difference between the way
2200 @code{file-truename} and @code{expand-file-name} treat @samp{..}.
2201 Assuming that @samp{/tmp/bar} is a symbolic link to the directory
2202 @samp{/tmp/foo/bar} we get:
2203
2204 @example
2205 @group
2206 (file-truename "/tmp/bar/../myfile")
2207 @result{} "/tmp/foo/myfile"
2208 @end group
2209 @group
2210 (expand-file-name "/tmp/bar/../myfile")
2211 @result{} "/tmp/myfile"
2212 @end group
2213 @end example
2214
2215 If you may need to follow symbolic links preceding @samp{..}, you
2216 should make sure to call @code{file-truename} without prior direct or
2217 indirect calls to @code{expand-file-name}. @xref{Truenames}.
2218 @end defun
2219
2220 @defvar default-directory
2221 The value of this buffer-local variable is the default directory for the
2222 current buffer. It should be an absolute directory name; it may start
2223 with @samp{~}. This variable is buffer-local in every buffer.
2224
2225 @code{expand-file-name} uses the default directory when its second
2226 argument is @code{nil}.
2227
2228 The value is always a string ending with a slash.
2229
2230 @example
2231 @group
2232 default-directory
2233 @result{} "/user/lewis/manual/"
2234 @end group
2235 @end example
2236 @end defvar
2237
2238 @defun substitute-in-file-name filename
2239 @anchor{Definition of substitute-in-file-name}
2240 This function replaces environment variable references in
2241 @var{filename} with the environment variable values. Following
2242 standard Unix shell syntax, @samp{$} is the prefix to substitute an
2243 environment variable value. If the input contains @samp{$$}, that is
2244 converted to @samp{$}; this gives the user a way to ``quote'' a
2245 @samp{$}.
2246
2247 The environment variable name is the series of alphanumeric characters
2248 (including underscores) that follow the @samp{$}. If the character following
2249 the @samp{$} is a @samp{@{}, then the variable name is everything up to the
2250 matching @samp{@}}.
2251
2252 Calling @code{substitute-in-file-name} on output produced by
2253 @code{substitute-in-file-name} tends to give incorrect results. For
2254 instance, use of @samp{$$} to quote a single @samp{$} won't work
2255 properly, and @samp{$} in an environment variable's value could lead
2256 to repeated substitution. Therefore, programs that call this function
2257 and put the output where it will be passed to this function need to
2258 double all @samp{$} characters to prevent subsequent incorrect
2259 results.
2260
2261 @c Wordy to avoid overfull hbox. --rjc 15mar92
2262 Here we assume that the environment variable @env{HOME}, which holds
2263 the user's home directory name, has value @samp{/xcssun/users/rms}.
2264
2265 @example
2266 @group
2267 (substitute-in-file-name "$HOME/foo")
2268 @result{} "/xcssun/users/rms/foo"
2269 @end group
2270 @end example
2271
2272 After substitution, if a @samp{~} or a @samp{/} appears immediately
2273 after another @samp{/}, the function discards everything before it (up
2274 through the immediately preceding @samp{/}).
2275
2276 @example
2277 @group
2278 (substitute-in-file-name "bar/~/foo")
2279 @result{} "~/foo"
2280 @end group
2281 @group
2282 (substitute-in-file-name "/usr/local/$HOME/foo")
2283 @result{} "/xcssun/users/rms/foo"
2284 ;; @r{@file{/usr/local/} has been discarded.}
2285 @end group
2286 @end example
2287
2288 @end defun
2289
2290 @node Unique File Names
2291 @subsection Generating Unique File Names
2292 @cindex unique file names
2293 @cindex temporary files
2294
2295 Some programs need to write temporary files. Here is the usual way to
2296 construct a name for such a file:
2297
2298 @example
2299 (make-temp-file @var{name-of-application})
2300 @end example
2301
2302 @noindent
2303 The job of @code{make-temp-file} is to prevent two different users or
2304 two different jobs from trying to use the exact same file name.
2305
2306 @defun make-temp-file prefix &optional dir-flag suffix
2307 This function creates a temporary file and returns its name. Emacs
2308 creates the temporary file's name by adding to @var{prefix} some
2309 random characters that are different in each Emacs job. The result is
2310 guaranteed to be a newly created empty file. On MS-DOS, this function
2311 can truncate the @var{string} prefix to fit into the 8+3 file-name
2312 limits. If @var{prefix} is a relative file name, it is expanded
2313 against @code{temporary-file-directory}.
2314
2315 @example
2316 @group
2317 (make-temp-file "foo")
2318 @result{} "/tmp/foo232J6v"
2319 @end group
2320 @end example
2321
2322 When @code{make-temp-file} returns, the file has been created and is
2323 empty. At that point, you should write the intended contents into the
2324 file.
2325
2326 If @var{dir-flag} is non-@code{nil}, @code{make-temp-file} creates an
2327 empty directory instead of an empty file. It returns the file name,
2328 not the directory name, of that directory. @xref{Directory Names}.
2329
2330 If @var{suffix} is non-@code{nil}, @code{make-temp-file} adds it at
2331 the end of the file name.
2332
2333 To prevent conflicts among different libraries running in the same
2334 Emacs, each Lisp program that uses @code{make-temp-file} should have its
2335 own @var{prefix}. The number added to the end of @var{prefix}
2336 distinguishes between the same application running in different Emacs
2337 jobs. Additional added characters permit a large number of distinct
2338 names even in one Emacs job.
2339 @end defun
2340
2341 The default directory for temporary files is controlled by the
2342 variable @code{temporary-file-directory}. This variable gives the user
2343 a uniform way to specify the directory for all temporary files. Some
2344 programs use @code{small-temporary-file-directory} instead, if that is
2345 non-@code{nil}. To use it, you should expand the prefix against
2346 the proper directory before calling @code{make-temp-file}.
2347
2348 @defopt temporary-file-directory
2349 @cindex @env{TMPDIR} environment variable
2350 @cindex @env{TMP} environment variable
2351 @cindex @env{TEMP} environment variable
2352 This variable specifies the directory name for creating temporary files.
2353 Its value should be a directory name (@pxref{Directory Names}), but it
2354 is good for Lisp programs to cope if the value is a directory's file
2355 name instead. Using the value as the second argument to
2356 @code{expand-file-name} is a good way to achieve that.
2357
2358 The default value is determined in a reasonable way for your operating
2359 system; it is based on the @env{TMPDIR}, @env{TMP} and @env{TEMP}
2360 environment variables, with a fall-back to a system-dependent name if
2361 none of these variables is defined.
2362
2363 Even if you do not use @code{make-temp-file} to create the temporary
2364 file, you should still use this variable to decide which directory to
2365 put the file in. However, if you expect the file to be small, you
2366 should use @code{small-temporary-file-directory} first if that is
2367 non-@code{nil}.
2368 @end defopt
2369
2370 @defopt small-temporary-file-directory
2371 This variable specifies the directory name for
2372 creating certain temporary files, which are likely to be small.
2373
2374 If you want to write a temporary file which is likely to be small, you
2375 should compute the directory like this:
2376
2377 @example
2378 (make-temp-file
2379 (expand-file-name @var{prefix}
2380 (or small-temporary-file-directory
2381 temporary-file-directory)))
2382 @end example
2383 @end defopt
2384
2385 @defun make-temp-name base-name
2386 This function generates a string that can be used as a unique file
2387 name. The name starts with @var{base-name}, and has several random
2388 characters appended to it, which are different in each Emacs job. It
2389 is like @code{make-temp-file} except that (i) it just constructs a
2390 name, and does not create a file, and (ii) @var{base-name} should be
2391 an absolute file name (on MS-DOS, this function can truncate
2392 @var{base-name} to fit into the 8+3 file-name limits).
2393
2394 @strong{Warning:} In most cases, you should not use this function; use
2395 @code{make-temp-file} instead! This function is susceptible to a race
2396 condition, between the @code{make-temp-name} call and the creation of
2397 the file, which in some cases may cause a security hole.
2398 @end defun
2399
2400 @node File Name Completion
2401 @subsection File Name Completion
2402 @cindex file name completion subroutines
2403 @cindex completion, file name
2404
2405 This section describes low-level subroutines for completing a file
2406 name. For higher level functions, see @ref{Reading File Names}.
2407
2408 @defun file-name-all-completions partial-filename directory
2409 This function returns a list of all possible completions for a file
2410 whose name starts with @var{partial-filename} in directory
2411 @var{directory}. The order of the completions is the order of the files
2412 in the directory, which is unpredictable and conveys no useful
2413 information.
2414
2415 The argument @var{partial-filename} must be a file name containing no
2416 directory part and no slash (or backslash on some systems). The current
2417 buffer's default directory is prepended to @var{directory}, if
2418 @var{directory} is not absolute.
2419
2420 In the following example, suppose that @file{~rms/lewis} is the current
2421 default directory, and has five files whose names begin with @samp{f}:
2422 @file{foo}, @file{file~}, @file{file.c}, @file{file.c.~1~}, and
2423 @file{file.c.~2~}.
2424
2425 @example
2426 @group
2427 (file-name-all-completions "f" "")
2428 @result{} ("foo" "file~" "file.c.~2~"
2429 "file.c.~1~" "file.c")
2430 @end group
2431
2432 @group
2433 (file-name-all-completions "fo" "")
2434 @result{} ("foo")
2435 @end group
2436 @end example
2437 @end defun
2438
2439 @defun file-name-completion filename directory &optional predicate
2440 This function completes the file name @var{filename} in directory
2441 @var{directory}. It returns the longest prefix common to all file names
2442 in directory @var{directory} that start with @var{filename}. If
2443 @var{predicate} is non-@code{nil} then it ignores possible completions
2444 that don't satisfy @var{predicate}, after calling that function
2445 with one argument, the expanded absolute file name.
2446
2447 If only one match exists and @var{filename} matches it exactly, the
2448 function returns @code{t}. The function returns @code{nil} if directory
2449 @var{directory} contains no name starting with @var{filename}.
2450
2451 In the following example, suppose that the current default directory
2452 has five files whose names begin with @samp{f}: @file{foo},
2453 @file{file~}, @file{file.c}, @file{file.c.~1~}, and
2454 @file{file.c.~2~}.
2455
2456 @example
2457 @group
2458 (file-name-completion "fi" "")
2459 @result{} "file"
2460 @end group
2461
2462 @group
2463 (file-name-completion "file.c.~1" "")
2464 @result{} "file.c.~1~"
2465 @end group
2466
2467 @group
2468 (file-name-completion "file.c.~1~" "")
2469 @result{} t
2470 @end group
2471
2472 @group
2473 (file-name-completion "file.c.~3" "")
2474 @result{} nil
2475 @end group
2476 @end example
2477 @end defun
2478
2479 @defopt completion-ignored-extensions
2480 @code{file-name-completion} usually ignores file names that end in any
2481 string in this list. It does not ignore them when all the possible
2482 completions end in one of these suffixes. This variable has no effect
2483 on @code{file-name-all-completions}.
2484
2485 A typical value might look like this:
2486
2487 @example
2488 @group
2489 completion-ignored-extensions
2490 @result{} (".o" ".elc" "~" ".dvi")
2491 @end group
2492 @end example
2493
2494 If an element of @code{completion-ignored-extensions} ends in a slash
2495 @samp{/}, it signals a directory. The elements which do @emph{not} end
2496 in a slash will never match a directory; thus, the above value will not
2497 filter out a directory named @file{foo.elc}.
2498 @end defopt
2499
2500 @node Standard File Names
2501 @subsection Standard File Names
2502
2503 Sometimes, an Emacs Lisp program needs to specify a standard file
2504 name for a particular use---typically, to hold configuration data
2505 specified by the current user. Usually, such files should be located
2506 in the directory specified by @code{user-emacs-directory}, which is
2507 @file{~/.emacs.d} by default (@pxref{Init File}). For example, abbrev
2508 definitions are stored by default in @file{~/.emacs.d/abbrev_defs}.
2509 The easiest way to specify such a file name is to use the function
2510 @code{locate-user-emacs-file}.
2511
2512 @defun locate-user-emacs-file base-name &optional old-name
2513 This function returns an absolute file name for an Emacs-specific
2514 configuration or data file. The argument @file{base-name} should be a
2515 relative file name. The return value is the absolute name of a file
2516 in the directory specified by @code{user-emacs-directory}; if that
2517 directory does not exist, this function creates it.
2518
2519 If the optional argument @var{old-name} is non-@code{nil}, it
2520 specifies a file in the user's home directory,
2521 @file{~/@var{old-name}}. If such a file exists, the return value is
2522 the absolute name of that file, instead of the file specified by
2523 @var{base-name}. This argument is intended to be used by Emacs
2524 packages to provide backward compatibility. For instance, prior to
2525 the introduction of @code{user-emacs-directory}, the abbrev file was
2526 located in @file{~/.abbrev_defs}. Here is the definition of
2527 @code{abbrev-file-name}:
2528
2529 @example
2530 (defcustom abbrev-file-name
2531 (locate-user-emacs-file "abbrev_defs" ".abbrev_defs")
2532 "Default name of file from which to read abbrevs."
2533 @dots{}
2534 :type 'file)
2535 @end example
2536 @end defun
2537
2538 A lower-level function for standardizing file names, which
2539 @code{locate-user-emacs-file} uses as a subroutine, is
2540 @code{convert-standard-filename}.
2541
2542 @defun convert-standard-filename filename
2543 This function returns a file name based on @var{filename}, which fits
2544 the conventions of the current operating system.
2545
2546 On GNU and Unix systems, this simply returns @var{filename}. On other
2547 operating systems, it may enforce system-specific file name
2548 conventions; for example, on MS-DOS this function performs a variety
2549 of changes to enforce MS-DOS file name limitations, including
2550 converting any leading @samp{.} to @samp{_} and truncating to three
2551 characters after the @samp{.}.
2552
2553 The recommended way to use this function is to specify a name which
2554 fits the conventions of GNU and Unix systems, and pass it to
2555 @code{convert-standard-filename}.
2556 @end defun
2557
2558 @node Contents of Directories
2559 @section Contents of Directories
2560 @cindex directory-oriented functions
2561 @cindex file names in directory
2562
2563 A directory is a kind of file that contains other files entered under
2564 various names. Directories are a feature of the file system.
2565
2566 Emacs can list the names of the files in a directory as a Lisp list,
2567 or display the names in a buffer using the @code{ls} shell command. In
2568 the latter case, it can optionally display information about each file,
2569 depending on the options passed to the @code{ls} command.
2570
2571 @defun directory-files directory &optional full-name match-regexp nosort
2572 This function returns a list of the names of the files in the directory
2573 @var{directory}. By default, the list is in alphabetical order.
2574
2575 If @var{full-name} is non-@code{nil}, the function returns the files'
2576 absolute file names. Otherwise, it returns the names relative to
2577 the specified directory.
2578
2579 If @var{match-regexp} is non-@code{nil}, this function returns only
2580 those file names that contain a match for that regular expression---the
2581 other file names are excluded from the list. On case-insensitive
2582 filesystems, the regular expression matching is case-insensitive.
2583
2584 @c Emacs 19 feature
2585 If @var{nosort} is non-@code{nil}, @code{directory-files} does not sort
2586 the list, so you get the file names in no particular order. Use this if
2587 you want the utmost possible speed and don't care what order the files
2588 are processed in. If the order of processing is visible to the user,
2589 then the user will probably be happier if you do sort the names.
2590
2591 @example
2592 @group
2593 (directory-files "~lewis")
2594 @result{} ("#foo#" "#foo.el#" "." ".."
2595 "dired-mods.el" "files.texi"
2596 "files.texi.~1~")
2597 @end group
2598 @end example
2599
2600 An error is signaled if @var{directory} is not the name of a directory
2601 that can be read.
2602 @end defun
2603
2604 @defun directory-files-and-attributes directory &optional full-name match-regexp nosort id-format
2605 This is similar to @code{directory-files} in deciding which files
2606 to report on and how to report their names. However, instead
2607 of returning a list of file names, it returns for each file a
2608 list @code{(@var{filename} . @var{attributes})}, where @var{attributes}
2609 is what @code{file-attributes} would return for that file.
2610 The optional argument @var{id-format} has the same meaning as the
2611 corresponding argument to @code{file-attributes} (@pxref{Definition
2612 of file-attributes}).
2613 @end defun
2614
2615 @defun file-expand-wildcards pattern &optional full
2616 This function expands the wildcard pattern @var{pattern}, returning
2617 a list of file names that match it.
2618
2619 If @var{pattern} is written as an absolute file name,
2620 the values are absolute also.
2621
2622 If @var{pattern} is written as a relative file name, it is interpreted
2623 relative to the current default directory. The file names returned are
2624 normally also relative to the current default directory. However, if
2625 @var{full} is non-@code{nil}, they are absolute.
2626 @end defun
2627
2628 @defun insert-directory file switches &optional wildcard full-directory-p
2629 This function inserts (in the current buffer) a directory listing for
2630 directory @var{file}, formatted with @code{ls} according to
2631 @var{switches}. It leaves point after the inserted text.
2632 @var{switches} may be a string of options, or a list of strings
2633 representing individual options.
2634
2635 The argument @var{file} may be either a directory name or a file
2636 specification including wildcard characters. If @var{wildcard} is
2637 non-@code{nil}, that means treat @var{file} as a file specification with
2638 wildcards.
2639
2640 If @var{full-directory-p} is non-@code{nil}, that means the directory
2641 listing is expected to show the full contents of a directory. You
2642 should specify @code{t} when @var{file} is a directory and switches do
2643 not contain @samp{-d}. (The @samp{-d} option to @code{ls} says to
2644 describe a directory itself as a file, rather than showing its
2645 contents.)
2646
2647 On most systems, this function works by running a directory listing
2648 program whose name is in the variable @code{insert-directory-program}.
2649 If @var{wildcard} is non-@code{nil}, it also runs the shell specified by
2650 @code{shell-file-name}, to expand the wildcards.
2651
2652 MS-DOS and MS-Windows systems usually lack the standard Unix program
2653 @code{ls}, so this function emulates the standard Unix program @code{ls}
2654 with Lisp code.
2655
2656 As a technical detail, when @var{switches} contains the long
2657 @samp{--dired} option, @code{insert-directory} treats it specially,
2658 for the sake of dired. However, the normally equivalent short
2659 @samp{-D} option is just passed on to @code{insert-directory-program},
2660 as any other option.
2661 @end defun
2662
2663 @defvar insert-directory-program
2664 This variable's value is the program to run to generate a directory listing
2665 for the function @code{insert-directory}. It is ignored on systems
2666 which generate the listing with Lisp code.
2667 @end defvar
2668
2669 @node Create/Delete Dirs
2670 @section Creating, Copying and Deleting Directories
2671 @cindex creating, copying and deleting directories
2672 @c Emacs 19 features
2673
2674 Most Emacs Lisp file-manipulation functions get errors when used on
2675 files that are directories. For example, you cannot delete a directory
2676 with @code{delete-file}. These special functions exist to create and
2677 delete directories.
2678
2679 @findex mkdir
2680 @deffn Command make-directory dirname &optional parents
2681 This command creates a directory named @var{dirname}. If
2682 @var{parents} is non-@code{nil}, as is always the case in an
2683 interactive call, that means to create the parent directories first,
2684 if they don't already exist.
2685
2686 @code{mkdir} is an alias for this.
2687 @end deffn
2688
2689 @deffn Command copy-directory dirname newname &optional keep-time parents copy-contents
2690 This command copies the directory named @var{dirname} to
2691 @var{newname}. If @var{newname} names an existing directory,
2692 @var{dirname} will be copied to a subdirectory there.
2693
2694 It always sets the file modes of the copied files to match the
2695 corresponding original file.
2696
2697 The third argument @var{keep-time} non-@code{nil} means to preserve the
2698 modification time of the copied files. A prefix arg makes
2699 @var{keep-time} non-@code{nil}.
2700
2701 The fourth argument @var{parents} says whether to
2702 create parent directories if they don't exist. Interactively,
2703 this happens by default.
2704
2705 The fifth argument @var{copy-contents}, if non-@code{nil}, means to
2706 copy the contents of @var{dirname} directly into @var{newname} if the
2707 latter is an existing directory, instead of copying @var{dirname} into
2708 it as a subdirectory.
2709 @end deffn
2710
2711 @cindex trash
2712 @vindex delete-by-moving-to-trash
2713 @deffn Command delete-directory dirname &optional recursive trash
2714 This command deletes the directory named @var{dirname}. The function
2715 @code{delete-file} does not work for files that are directories; you
2716 must use @code{delete-directory} for them. If @var{recursive} is
2717 @code{nil}, and the directory contains any files,
2718 @code{delete-directory} signals an error.
2719
2720 @code{delete-directory} only follows symbolic links at the level of
2721 parent directories.
2722
2723 If the optional argument @var{trash} is non-@code{nil} and the
2724 variable @code{delete-by-moving-to-trash} is non-@code{nil}, this
2725 command moves the file into the system Trash instead of deleting it.
2726 @xref{Misc File Ops,,Miscellaneous File Operations, emacs, The GNU
2727 Emacs Manual}. When called interactively, @var{trash} is @code{t} if
2728 no prefix argument is given, and @code{nil} otherwise.
2729 @end deffn
2730
2731 @node Magic File Names
2732 @section Making Certain File Names ``Magic''
2733 @cindex magic file names
2734
2735 You can implement special handling for certain file names. This is
2736 called making those names @dfn{magic}. The principal use for this
2737 feature is in implementing access to remote files (@pxref{Remote Files,,
2738 Remote Files, emacs, The GNU Emacs Manual}).
2739
2740 To define a kind of magic file name, you must supply a regular
2741 expression to define the class of names (all those that match the
2742 regular expression), plus a handler that implements all the primitive
2743 Emacs file operations for file names that match.
2744
2745 @cindex file handler
2746 @vindex file-name-handler-alist
2747 The variable @code{file-name-handler-alist} holds a list of handlers,
2748 together with regular expressions that determine when to apply each
2749 handler. Each element has this form:
2750
2751 @example
2752 (@var{regexp} . @var{handler})
2753 @end example
2754
2755 @noindent
2756 All the Emacs primitives for file access and file name transformation
2757 check the given file name against @code{file-name-handler-alist}. If
2758 the file name matches @var{regexp}, the primitives handle that file by
2759 calling @var{handler}.
2760
2761 The first argument given to @var{handler} is the name of the
2762 primitive, as a symbol; the remaining arguments are the arguments that
2763 were passed to that primitive. (The first of these arguments is most
2764 often the file name itself.) For example, if you do this:
2765
2766 @example
2767 (file-exists-p @var{filename})
2768 @end example
2769
2770 @noindent
2771 and @var{filename} has handler @var{handler}, then @var{handler} is
2772 called like this:
2773
2774 @example
2775 (funcall @var{handler} 'file-exists-p @var{filename})
2776 @end example
2777
2778 When a function takes two or more arguments that must be file names,
2779 it checks each of those names for a handler. For example, if you do
2780 this:
2781
2782 @example
2783 (expand-file-name @var{filename} @var{dirname})
2784 @end example
2785
2786 @noindent
2787 then it checks for a handler for @var{filename} and then for a handler
2788 for @var{dirname}. In either case, the @var{handler} is called like
2789 this:
2790
2791 @example
2792 (funcall @var{handler} 'expand-file-name @var{filename} @var{dirname})
2793 @end example
2794
2795 @noindent
2796 The @var{handler} then needs to figure out whether to handle
2797 @var{filename} or @var{dirname}.
2798
2799 If the specified file name matches more than one handler, the one
2800 whose match starts last in the file name gets precedence. This rule
2801 is chosen so that handlers for jobs such as uncompression are handled
2802 first, before handlers for jobs such as remote file access.
2803
2804 Here are the operations that a magic file name handler gets to handle:
2805
2806 @ifnottex
2807 @noindent
2808 @code{access-file}, @code{add-name-to-file},
2809 @code{byte-compiler-base-file-name},@*
2810 @code{copy-directory}, @code{copy-file},
2811 @code{delete-directory}, @code{delete-file},
2812 @code{diff-latest-backup-file},
2813 @code{directory-file-name},
2814 @code{directory-files},
2815 @code{directory-files-and-attributes},
2816 @code{dired-compress-file}, @code{dired-uncache},@*
2817 @code{expand-file-name},
2818 @code{file-accessible-directory-p},
2819 @code{file-acl},
2820 @code{file-attributes},
2821 @code{file-directory-p},
2822 @code{file-equal-p},
2823 @code{file-executable-p}, @code{file-exists-p},
2824 @code{file-in-directory-p},
2825 @code{file-local-copy},
2826 @code{file-modes}, @code{file-name-all-completions},
2827 @code{file-name-as-directory},
2828 @code{file-name-completion},
2829 @code{file-name-directory},
2830 @code{file-name-nondirectory},
2831 @code{file-name-sans-versions}, @code{file-newer-than-file-p},
2832 @code{file-notify-add-watch}, @code{file-notify-rm-watch},
2833 @code{file-ownership-preserved-p},
2834 @code{file-readable-p}, @code{file-regular-p},
2835 @code{file-remote-p}, @code{file-selinux-context},
2836 @code{file-symlink-p}, @code{file-truename}, @code{file-writable-p},
2837 @code{find-backup-file-name},
2838 @c Not sure why it was here: @code{find-file-noselect},@*
2839 @code{get-file-buffer},
2840 @code{insert-directory},
2841 @code{insert-file-contents},@*
2842 @code{load},
2843 @code{make-auto-save-file-name},
2844 @code{make-directory},
2845 @code{make-directory-internal},
2846 @code{make-symbolic-link},@*
2847 @code{process-file},
2848 @code{rename-file}, @code{set-file-acl}, @code{set-file-modes},
2849 @code{set-file-selinux-context}, @code{set-file-times},
2850 @code{set-visited-file-modtime}, @code{shell-command},
2851 @code{start-file-process},
2852 @code{substitute-in-file-name},@*
2853 @code{unhandled-file-name-directory},
2854 @code{vc-registered},
2855 @code{verify-visited-file-modtime},@*
2856 @code{write-region}.
2857 @end ifnottex
2858 @iftex
2859 @noindent
2860 @flushleft
2861 @code{access-file}, @code{add-name-to-file},
2862 @code{byte-com@discretionary{}{}{}piler-base-file-name},
2863 @code{copy-directory}, @code{copy-file},
2864 @code{delete-directory}, @code{delete-file},
2865 @code{diff-latest-backup-file},
2866 @code{directory-file-name},
2867 @code{directory-files},
2868 @code{directory-files-and-at@discretionary{}{}{}tributes},
2869 @code{dired-compress-file}, @code{dired-uncache},
2870 @code{expand-file-name},
2871 @code{file-accessible-direc@discretionary{}{}{}tory-p},
2872 @code{file-acl},
2873 @code{file-attributes},
2874 @code{file-direc@discretionary{}{}{}tory-p},
2875 @code{file-equal-p},
2876 @code{file-executable-p}, @code{file-exists-p},
2877 @code{file-in-directory-p},
2878 @code{file-local-copy},
2879 @code{file-modes}, @code{file-name-all-completions},
2880 @code{file-name-as-directory},
2881 @code{file-name-completion},
2882 @code{file-name-directory},
2883 @code{file-name-nondirec@discretionary{}{}{}tory},
2884 @code{file-name-sans-versions}, @code{file-newer-than-file-p},
2885 @code{file-notify-add-watch}, @code{file-notify-rm-watch},
2886 @code{file-ownership-pre@discretionary{}{}{}served-p},
2887 @code{file-readable-p}, @code{file-regular-p},
2888 @code{file-remote-p}, @code{file-selinux-context},
2889 @code{file-symlink-p}, @code{file-truename}, @code{file-writable-p},
2890 @code{find-backup-file-name},
2891 @c Not sure why it was here: @code{find-file-noselect},
2892 @code{get-file-buffer},
2893 @code{insert-directory},
2894 @code{insert-file-contents},
2895 @code{load},
2896 @code{make-auto-save-file-name},
2897 @code{make-direc@discretionary{}{}{}tory},
2898 @code{make-direc@discretionary{}{}{}tory-internal},
2899 @code{make-symbolic-link},
2900 @code{process-file},
2901 @code{rename-file}, @code{set-file-acl}, @code{set-file-modes},
2902 @code{set-file-selinux-context}, @code{set-file-times},
2903 @code{set-visited-file-modtime}, @code{shell-command},
2904 @code{start-file-process},
2905 @code{substitute-in-file-name},
2906 @code{unhandled-file-name-directory},
2907 @code{vc-regis@discretionary{}{}{}tered},
2908 @code{verify-visited-file-modtime},
2909 @code{write-region}.
2910 @end flushleft
2911 @end iftex
2912
2913 Handlers for @code{insert-file-contents} typically need to clear the
2914 buffer's modified flag, with @code{(set-buffer-modified-p nil)}, if the
2915 @var{visit} argument is non-@code{nil}. This also has the effect of
2916 unlocking the buffer if it is locked.
2917
2918 The handler function must handle all of the above operations, and
2919 possibly others to be added in the future. It need not implement all
2920 these operations itself---when it has nothing special to do for a
2921 certain operation, it can reinvoke the primitive, to handle the
2922 operation ``in the usual way''. It should always reinvoke the primitive
2923 for an operation it does not recognize. Here's one way to do this:
2924
2925 @smallexample
2926 (defun my-file-handler (operation &rest args)
2927 ;; @r{First check for the specific operations}
2928 ;; @r{that we have special handling for.}
2929 (cond ((eq operation 'insert-file-contents) @dots{})
2930 ((eq operation 'write-region) @dots{})
2931 @dots{}
2932 ;; @r{Handle any operation we don't know about.}
2933 (t (let ((inhibit-file-name-handlers
2934 (cons 'my-file-handler
2935 (and (eq inhibit-file-name-operation operation)
2936 inhibit-file-name-handlers)))
2937 (inhibit-file-name-operation operation))
2938 (apply operation args)))))
2939 @end smallexample
2940
2941 When a handler function decides to call the ordinary Emacs primitive for
2942 the operation at hand, it needs to prevent the primitive from calling
2943 the same handler once again, thus leading to an infinite recursion. The
2944 example above shows how to do this, with the variables
2945 @code{inhibit-file-name-handlers} and
2946 @code{inhibit-file-name-operation}. Be careful to use them exactly as
2947 shown above; the details are crucial for proper behavior in the case of
2948 multiple handlers, and for operations that have two file names that may
2949 each have handlers.
2950
2951 @kindex safe-magic (@r{property})
2952 Handlers that don't really do anything special for actual access to the
2953 file---such as the ones that implement completion of host names for
2954 remote file names---should have a non-@code{nil} @code{safe-magic}
2955 property. For instance, Emacs normally ``protects'' directory names
2956 it finds in @code{PATH} from becoming magic, if they look like magic
2957 file names, by prefixing them with @samp{/:}. But if the handler that
2958 would be used for them has a non-@code{nil} @code{safe-magic}
2959 property, the @samp{/:} is not added.
2960
2961 @kindex operations (@r{property})
2962 A file name handler can have an @code{operations} property to
2963 declare which operations it handles in a nontrivial way. If this
2964 property has a non-@code{nil} value, it should be a list of
2965 operations; then only those operations will call the handler. This
2966 avoids inefficiency, but its main purpose is for autoloaded handler
2967 functions, so that they won't be loaded except when they have real
2968 work to do.
2969
2970 Simply deferring all operations to the usual primitives does not
2971 work. For instance, if the file name handler applies to
2972 @code{file-exists-p}, then it must handle @code{load} itself, because
2973 the usual @code{load} code won't work properly in that case. However,
2974 if the handler uses the @code{operations} property to say it doesn't
2975 handle @code{file-exists-p}, then it need not handle @code{load}
2976 nontrivially.
2977
2978 @defvar inhibit-file-name-handlers
2979 This variable holds a list of handlers whose use is presently inhibited
2980 for a certain operation.
2981 @end defvar
2982
2983 @defvar inhibit-file-name-operation
2984 The operation for which certain handlers are presently inhibited.
2985 @end defvar
2986
2987 @defun find-file-name-handler file operation
2988 This function returns the handler function for file name @var{file},
2989 or @code{nil} if there is none. The argument @var{operation} should
2990 be the operation to be performed on the file---the value you will pass
2991 to the handler as its first argument when you call it. If
2992 @var{operation} equals @code{inhibit-file-name-operation}, or if it is
2993 not found in the @code{operations} property of the handler, this
2994 function returns @code{nil}.
2995 @end defun
2996
2997 @defun file-local-copy filename
2998 This function copies file @var{filename} to an ordinary non-magic file
2999 on the local machine, if it isn't on the local machine already. Magic
3000 file names should handle the @code{file-local-copy} operation if they
3001 refer to files on other machines. A magic file name that is used for
3002 other purposes than remote file access should not handle
3003 @code{file-local-copy}; then this function will treat the file as
3004 local.
3005
3006 If @var{filename} is local, whether magic or not, this function does
3007 nothing and returns @code{nil}. Otherwise it returns the file name
3008 of the local copy file.
3009 @end defun
3010
3011 @defun file-remote-p filename &optional identification connected
3012 This function tests whether @var{filename} is a remote file. If
3013 @var{filename} is local (not remote), the return value is @code{nil}.
3014 If @var{filename} is indeed remote, the return value is a string that
3015 identifies the remote system.
3016
3017 This identifier string can include a host name and a user name, as
3018 well as characters designating the method used to access the remote
3019 system. For example, the remote identifier string for the filename
3020 @code{/sudo::/some/file} is @code{/sudo:root@@localhost:}.
3021
3022 If @code{file-remote-p} returns the same identifier for two different
3023 filenames, that means they are stored on the same file system and can
3024 be accessed locally with respect to each other. This means, for
3025 example, that it is possible to start a remote process accessing both
3026 files at the same time. Implementers of file handlers need to ensure
3027 this principle is valid.
3028
3029 @var{identification} specifies which part of the identifier shall be
3030 returned as string. @var{identification} can be the symbol
3031 @code{method}, @code{user} or @code{host}; any other value is handled
3032 like @code{nil} and means to return the complete identifier string.
3033 In the example above, the remote @code{user} identifier string would
3034 be @code{root}.
3035
3036 If @var{connected} is non-@code{nil}, this function returns @code{nil}
3037 even if @var{filename} is remote, if Emacs has no network connection
3038 to its host. This is useful when you want to avoid the delay of
3039 making connections when they don't exist.
3040 @end defun
3041
3042 @defun unhandled-file-name-directory filename
3043 This function returns the name of a directory that is not magic. It
3044 uses the directory part of @var{filename} if that is not magic. For a
3045 magic file name, it invokes the file name handler, which therefore
3046 decides what value to return. If @var{filename} is not accessible
3047 from a local process, then the file name handler should indicate it by
3048 returning @code{nil}.
3049
3050 This is useful for running a subprocess; every subprocess must have a
3051 non-magic directory to serve as its current directory, and this function
3052 is a good way to come up with one.
3053 @end defun
3054
3055 @defopt remote-file-name-inhibit-cache
3056 The attributes of remote files can be cached for better performance. If
3057 they are changed outside of Emacs's control, the cached values become
3058 invalid, and must be reread.
3059
3060 When this variable is set to @code{nil}, cached values are never
3061 expired. Use this setting with caution, only if you are sure nothing
3062 other than Emacs ever changes the remote files. If it is set to
3063 @code{t}, cached values are never used. This is the safest value, but
3064 could result in performance degradation.
3065
3066 A compromise is to set it to a positive number. This means that
3067 cached values are used for that amount of seconds since they were
3068 cached. If a remote file is checked regularly, it might be a good
3069 idea to let-bind this variable to a value less than the time period
3070 between consecutive checks. For example:
3071
3072 @example
3073 (defun display-time-file-nonempty-p (file)
3074 (let ((remote-file-name-inhibit-cache
3075 (- display-time-interval 5)))
3076 (and (file-exists-p file)
3077 (< 0 (nth 7 (file-attributes
3078 (file-chase-links file)))))))
3079 @end example
3080 @end defopt
3081
3082 @node Format Conversion
3083 @section File Format Conversion
3084
3085 @cindex file format conversion
3086 @cindex encoding file formats
3087 @cindex decoding file formats
3088 @cindex text properties in files
3089 @cindex saving text properties
3090 Emacs performs several steps to convert the data in a buffer (text,
3091 text properties, and possibly other information) to and from a
3092 representation suitable for storing into a file. This section describes
3093 the fundamental functions that perform this @dfn{format conversion},
3094 namely @code{insert-file-contents} for reading a file into a buffer,
3095 and @code{write-region} for writing a buffer into a file.
3096
3097 @menu
3098 * Overview: Format Conversion Overview. @code{insert-file-contents} and @code{write-region}.
3099 * Round-Trip: Format Conversion Round-Trip. Using @code{format-alist}.
3100 * Piecemeal: Format Conversion Piecemeal. Specifying non-paired conversion.
3101 @end menu
3102
3103 @node Format Conversion Overview
3104 @subsection Overview
3105 @noindent
3106 The function @code{insert-file-contents}:
3107
3108 @itemize
3109 @item initially, inserts bytes from the file into the buffer;
3110 @item decodes bytes to characters as appropriate;
3111 @item processes formats as defined by entries in @code{format-alist}; and
3112 @item calls functions in @code{after-insert-file-functions}.
3113 @end itemize
3114
3115 @noindent
3116 The function @code{write-region}:
3117
3118 @itemize
3119 @item initially, calls functions in @code{write-region-annotate-functions};
3120 @item processes formats as defined by entries in @code{format-alist};
3121 @item encodes characters to bytes as appropriate; and
3122 @item modifies the file with the bytes.
3123 @end itemize
3124
3125 This shows the symmetry of the lowest-level operations; reading and
3126 writing handle things in opposite order. The rest of this section
3127 describes the two facilities surrounding the three variables named
3128 above, as well as some related functions. @ref{Coding Systems}, for
3129 details on character encoding and decoding.
3130
3131 @node Format Conversion Round-Trip
3132 @subsection Round-Trip Specification
3133
3134 The most general of the two facilities is controlled by the variable
3135 @code{format-alist}, a list of @dfn{file format} specifications, which
3136 describe textual representations used in files for the data in an Emacs
3137 buffer. The descriptions for reading and writing are paired, which is
3138 why we call this ``round-trip'' specification
3139 (@pxref{Format Conversion Piecemeal}, for non-paired specification).
3140
3141 @defvar format-alist
3142 This list contains one format definition for each defined file format.
3143 Each format definition is a list of this form:
3144
3145 @example
3146 (@var{name} @var{doc-string} @var{regexp} @var{from-fn} @var{to-fn} @var{modify} @var{mode-fn} @var{preserve})
3147 @end example
3148 @end defvar
3149
3150 @cindex format definition
3151 @noindent
3152 Here is what the elements in a format definition mean:
3153
3154 @table @var
3155 @item name
3156 The name of this format.
3157
3158 @item doc-string
3159 A documentation string for the format.
3160
3161 @item regexp
3162 A regular expression which is used to recognize files represented in
3163 this format. If @code{nil}, the format is never applied automatically.
3164
3165 @item from-fn
3166 A shell command or function to decode data in this format (to convert
3167 file data into the usual Emacs data representation).
3168
3169 A shell command is represented as a string; Emacs runs the command as a
3170 filter to perform the conversion.
3171
3172 If @var{from-fn} is a function, it is called with two arguments, @var{begin}
3173 and @var{end}, which specify the part of the buffer it should convert.
3174 It should convert the text by editing it in place. Since this can
3175 change the length of the text, @var{from-fn} should return the modified
3176 end position.
3177
3178 One responsibility of @var{from-fn} is to make sure that the beginning
3179 of the file no longer matches @var{regexp}. Otherwise it is likely to
3180 get called again.
3181
3182 @item to-fn
3183 A shell command or function to encode data in this format---that is, to
3184 convert the usual Emacs data representation into this format.
3185
3186 If @var{to-fn} is a string, it is a shell command; Emacs runs the
3187 command as a filter to perform the conversion.
3188
3189 If @var{to-fn} is a function, it is called with three arguments:
3190 @var{begin} and @var{end}, which specify the part of the buffer it
3191 should convert, and @var{buffer}, which specifies which buffer. There
3192 are two ways it can do the conversion:
3193
3194 @itemize @bullet
3195 @item
3196 By editing the buffer in place. In this case, @var{to-fn} should
3197 return the end-position of the range of text, as modified.
3198
3199 @item
3200 By returning a list of annotations. This is a list of elements of the
3201 form @code{(@var{position} . @var{string})}, where @var{position} is an
3202 integer specifying the relative position in the text to be written, and
3203 @var{string} is the annotation to add there. The list must be sorted in
3204 order of position when @var{to-fn} returns it.
3205
3206 When @code{write-region} actually writes the text from the buffer to the
3207 file, it intermixes the specified annotations at the corresponding
3208 positions. All this takes place without modifying the buffer.
3209 @end itemize
3210
3211 @item modify
3212 A flag, @code{t} if the encoding function modifies the buffer, and
3213 @code{nil} if it works by returning a list of annotations.
3214
3215 @item mode-fn
3216 A minor-mode function to call after visiting a file converted from this
3217 format. The function is called with one argument, the integer 1;
3218 that tells a minor-mode function to enable the mode.
3219
3220 @item preserve
3221 A flag, @code{t} if @code{format-write-file} should not remove this format
3222 from @code{buffer-file-format}.
3223 @end table
3224
3225 The function @code{insert-file-contents} automatically recognizes file
3226 formats when it reads the specified file. It checks the text of the
3227 beginning of the file against the regular expressions of the format
3228 definitions, and if it finds a match, it calls the decoding function for
3229 that format. Then it checks all the known formats over again.
3230 It keeps checking them until none of them is applicable.
3231
3232 Visiting a file, with @code{find-file-noselect} or the commands that use
3233 it, performs conversion likewise (because it calls
3234 @code{insert-file-contents}); it also calls the mode function for each
3235 format that it decodes. It stores a list of the format names in the
3236 buffer-local variable @code{buffer-file-format}.
3237
3238 @defvar buffer-file-format
3239 This variable states the format of the visited file. More precisely,
3240 this is a list of the file format names that were decoded in the course
3241 of visiting the current buffer's file. It is always buffer-local in all
3242 buffers.
3243 @end defvar
3244
3245 When @code{write-region} writes data into a file, it first calls the
3246 encoding functions for the formats listed in @code{buffer-file-format},
3247 in the order of appearance in the list.
3248
3249 @deffn Command format-write-file file format &optional confirm
3250 This command writes the current buffer contents into the file @var{file}
3251 in a format based on @var{format}, which is a list of format names. It
3252 constructs the actual format starting from @var{format}, then appending
3253 any elements from the value of @code{buffer-file-format} with a
3254 non-@code{nil} @var{preserve} flag (see above), if they are not already
3255 present in @var{format}. It then updates @code{buffer-file-format} with
3256 this format, making it the default for future saves. Except for the
3257 @var{format} argument, this command is similar to @code{write-file}. In
3258 particular, @var{confirm} has the same meaning and interactive treatment
3259 as the corresponding argument to @code{write-file}. @xref{Definition of
3260 write-file}.
3261 @end deffn
3262
3263 @deffn Command format-find-file file format
3264 This command finds the file @var{file}, converting it according to
3265 format @var{format}. It also makes @var{format} the default if the
3266 buffer is saved later.
3267
3268 The argument @var{format} is a list of format names. If @var{format} is
3269 @code{nil}, no conversion takes place. Interactively, typing just
3270 @key{RET} for @var{format} specifies @code{nil}.
3271 @end deffn
3272
3273 @deffn Command format-insert-file file format &optional beg end
3274 This command inserts the contents of file @var{file}, converting it
3275 according to format @var{format}. If @var{beg} and @var{end} are
3276 non-@code{nil}, they specify which part of the file to read, as in
3277 @code{insert-file-contents} (@pxref{Reading from Files}).
3278
3279 The return value is like what @code{insert-file-contents} returns: a
3280 list of the absolute file name and the length of the data inserted
3281 (after conversion).
3282
3283 The argument @var{format} is a list of format names. If @var{format} is
3284 @code{nil}, no conversion takes place. Interactively, typing just
3285 @key{RET} for @var{format} specifies @code{nil}.
3286 @end deffn
3287
3288 @defvar buffer-auto-save-file-format
3289 This variable specifies the format to use for auto-saving. Its value is
3290 a list of format names, just like the value of
3291 @code{buffer-file-format}; however, it is used instead of
3292 @code{buffer-file-format} for writing auto-save files. If the value
3293 is @code{t}, the default, auto-saving uses the same format as a
3294 regular save in the same buffer. This variable is always buffer-local
3295 in all buffers.
3296 @end defvar
3297
3298 @node Format Conversion Piecemeal
3299 @subsection Piecemeal Specification
3300
3301 In contrast to the round-trip specification described in the previous
3302 subsection (@pxref{Format Conversion Round-Trip}), you can use the variables
3303 @code{after-insert-file-functions} and @code{write-region-annotate-functions}
3304 to separately control the respective reading and writing conversions.
3305
3306 Conversion starts with one representation and produces another
3307 representation. When there is only one conversion to do, there is no
3308 conflict about what to start with. However, when there are multiple
3309 conversions involved, conflict may arise when two conversions need to
3310 start with the same data.
3311
3312 This situation is best understood in the context of converting text
3313 properties during @code{write-region}. For example, the character at
3314 position 42 in a buffer is @samp{X} with a text property @code{foo}. If
3315 the conversion for @code{foo} is done by inserting into the buffer, say,
3316 @samp{FOO:}, then that changes the character at position 42 from
3317 @samp{X} to @samp{F}. The next conversion will start with the wrong
3318 data straight away.
3319
3320 To avoid conflict, cooperative conversions do not modify the buffer,
3321 but instead specify @dfn{annotations}, a list of elements of the form
3322 @code{(@var{position} . @var{string})}, sorted in order of increasing
3323 @var{position}.
3324
3325 If there is more than one conversion, @code{write-region} merges their
3326 annotations destructively into one sorted list. Later, when the text
3327 from the buffer is actually written to the file, it intermixes the
3328 specified annotations at the corresponding positions. All this takes
3329 place without modifying the buffer.
3330
3331 @c ??? What about ``overriding'' conversions like those allowed
3332 @c ??? for `write-region-annotate-functions', below? --ttn
3333
3334 In contrast, when reading, the annotations intermixed with the text
3335 are handled immediately. @code{insert-file-contents} sets point to
3336 the beginning of some text to be converted, then calls the conversion
3337 functions with the length of that text. These functions should always
3338 return with point at the beginning of the inserted text. This
3339 approach makes sense for reading because annotations removed by the
3340 first converter can't be mistakenly processed by a later converter.
3341 Each conversion function should scan for the annotations it
3342 recognizes, remove the annotation, modify the buffer text (to set a
3343 text property, for example), and return the updated length of the
3344 text, as it stands after those changes. The value returned by one
3345 function becomes the argument to the next function.
3346
3347 @defvar write-region-annotate-functions
3348 A list of functions for @code{write-region} to call. Each function in
3349 the list is called with two arguments: the start and end of the region
3350 to be written. These functions should not alter the contents of the
3351 buffer. Instead, they should return annotations.
3352
3353 As a special case, a function may return with a different buffer
3354 current. Emacs takes this to mean that the current buffer contains
3355 altered text to be output. It therefore changes the @var{start} and
3356 @var{end} arguments of the @code{write-region} call, giving them the
3357 values of @code{point-min} and @code{point-max} in the new buffer,
3358 respectively. It also discards all previous annotations, because they
3359 should have been dealt with by this function.
3360 @end defvar
3361
3362 @defvar write-region-post-annotation-function
3363 The value of this variable, if non-@code{nil}, should be a function.
3364 This function is called, with no arguments, after @code{write-region}
3365 has completed.
3366
3367 If any function in @code{write-region-annotate-functions} returns with
3368 a different buffer current, Emacs calls
3369 @code{write-region-post-annotation-function} more than once. Emacs
3370 calls it with the last buffer that was current, and again with the
3371 buffer before that, and so on back to the original buffer.
3372
3373 Thus, a function in @code{write-region-annotate-functions} can create
3374 a buffer, give this variable the local value of @code{kill-buffer} in
3375 that buffer, set up the buffer with altered text, and make the buffer
3376 current. The buffer will be killed after @code{write-region} is done.
3377 @end defvar
3378
3379 @defvar after-insert-file-functions
3380 Each function in this list is called by @code{insert-file-contents}
3381 with one argument, the number of characters inserted, and with point
3382 at the beginning of the inserted text. Each function should leave
3383 point unchanged, and return the new character count describing the
3384 inserted text as modified by the function.
3385 @c ??? The docstring mentions a handler from `file-name-handler-alist'
3386 @c "intercepting" `insert-file-contents'. Hmmm. --ttn
3387 @end defvar
3388
3389 We invite users to write Lisp programs to store and retrieve text
3390 properties in files, using these hooks, and thus to experiment with
3391 various data formats and find good ones. Eventually we hope users
3392 will produce good, general extensions we can install in Emacs.
3393
3394 We suggest not trying to handle arbitrary Lisp objects as text property
3395 names or values---because a program that general is probably difficult
3396 to write, and slow. Instead, choose a set of possible data types that
3397 are reasonably flexible, and not too hard to encode.