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