]> code.delx.au - gnu-emacs/blob - doc/lispref/processes.texi
Quote less in manuals
[gnu-emacs] / doc / lispref / processes.texi
1 @c -*-texinfo-*-
2 @c This is part of the GNU Emacs Lisp Reference Manual.
3 @c Copyright (C) 1990-1995, 1998-1999, 2001-2015 Free Software
4 @c Foundation, Inc.
5 @c See the file elisp.texi for copying conditions.
6 @node Processes
7 @chapter Processes
8 @cindex child process
9 @cindex parent process
10 @cindex subprocess
11 @cindex process
12
13 In the terminology of operating systems, a @dfn{process} is a space in
14 which a program can execute. Emacs runs in a process. Emacs Lisp
15 programs can invoke other programs in processes of their own. These are
16 called @dfn{subprocesses} or @dfn{child processes} of the Emacs process,
17 which is their @dfn{parent process}.
18
19 A subprocess of Emacs may be @dfn{synchronous} or @dfn{asynchronous},
20 depending on how it is created. When you create a synchronous
21 subprocess, the Lisp program waits for the subprocess to terminate
22 before continuing execution. When you create an asynchronous
23 subprocess, it can run in parallel with the Lisp program. This kind of
24 subprocess is represented within Emacs by a Lisp object which is also
25 called a ``process''. Lisp programs can use this object to communicate
26 with the subprocess or to control it. For example, you can send
27 signals, obtain status information, receive output from the process, or
28 send input to it.
29
30 @defun processp object
31 This function returns @code{t} if @var{object} represents an Emacs
32 subprocess, @code{nil} otherwise.
33 @end defun
34
35 In addition to subprocesses of the current Emacs session, you can
36 also access other processes running on your machine. @xref{System
37 Processes}.
38
39 @menu
40 * Subprocess Creation:: Functions that start subprocesses.
41 * Shell Arguments:: Quoting an argument to pass it to a shell.
42 * Synchronous Processes:: Details of using synchronous subprocesses.
43 * Asynchronous Processes:: Starting up an asynchronous subprocess.
44 * Deleting Processes:: Eliminating an asynchronous subprocess.
45 * Process Information:: Accessing run-status and other attributes.
46 * Input to Processes:: Sending input to an asynchronous subprocess.
47 * Signals to Processes:: Stopping, continuing or interrupting
48 an asynchronous subprocess.
49 * Output from Processes:: Collecting output from an asynchronous subprocess.
50 * Sentinels:: Sentinels run when process run-status changes.
51 * Query Before Exit:: Whether to query if exiting will kill a process.
52 * System Processes:: Accessing other processes running on your system.
53 * Transaction Queues:: Transaction-based communication with subprocesses.
54 * Network:: Opening network connections.
55 * Network Servers:: Network servers let Emacs accept net connections.
56 * Datagrams:: UDP network connections.
57 * Low-Level Network:: Lower-level but more general function
58 to create connections and servers.
59 * Misc Network:: Additional relevant functions for net connections.
60 * Serial Ports:: Communicating with serial ports.
61 * Byte Packing:: Using bindat to pack and unpack binary data.
62 @end menu
63
64 @node Subprocess Creation
65 @section Functions that Create Subprocesses
66 @cindex create subprocess
67 @cindex process creation
68
69 There are three primitives that create a new subprocess in which to run
70 a program. One of them, @code{start-process}, creates an asynchronous
71 process and returns a process object (@pxref{Asynchronous Processes}).
72 The other two, @code{call-process} and @code{call-process-region},
73 create a synchronous process and do not return a process object
74 (@pxref{Synchronous Processes}). There are various higher-level
75 functions that make use of these primitives to run particular types of
76 process.
77
78 Synchronous and asynchronous processes are explained in the following
79 sections. Since the three functions are all called in a similar
80 fashion, their common arguments are described here.
81
82 @cindex execute program
83 @cindex @env{PATH} environment variable
84 @cindex @env{HOME} environment variable
85 In all cases, the function's @var{program} argument specifies the
86 program to be run. An error is signaled if the file is not found or
87 cannot be executed. If the file name is relative, the variable
88 @code{exec-path} contains a list of directories to search. Emacs
89 initializes @code{exec-path} when it starts up, based on the value of
90 the environment variable @env{PATH}. The standard file name
91 constructs, @samp{~}, @samp{.}, and @samp{..}, are interpreted as
92 usual in @code{exec-path}, but environment variable substitutions
93 (@samp{$HOME}, etc.)@: are not recognized; use
94 @code{substitute-in-file-name} to perform them (@pxref{File Name
95 Expansion}). @code{nil} in this list refers to
96 @code{default-directory}.
97
98 Executing a program can also try adding suffixes to the specified
99 name:
100
101 @defopt exec-suffixes
102 This variable is a list of suffixes (strings) to try adding to the
103 specified program file name. The list should include @code{""} if you
104 want the name to be tried exactly as specified. The default value is
105 system-dependent.
106 @end defopt
107
108 @strong{Please note:} The argument @var{program} contains only the
109 name of the program; it may not contain any command-line arguments. You
110 must use a separate argument, @var{args}, to provide those, as
111 described below.
112
113 Each of the subprocess-creating functions has a @var{buffer-or-name}
114 argument that specifies where the standard output from the program will
115 go. It should be a buffer or a buffer name; if it is a buffer name,
116 that will create the buffer if it does not already exist. It can also
117 be @code{nil}, which says to discard the output, unless a custom filter function
118 handles it. (@xref{Filter Functions}, and @ref{Read and Print}.)
119 Normally, you should avoid having multiple processes send output to the
120 same buffer because their output would be intermixed randomly.
121 For synchronous processes, you can send the output to a file instead
122 of a buffer.
123
124 @cindex program arguments
125 All three of the subprocess-creating functions have a @code{&rest}
126 argument, @var{args}. The @var{args} must all be strings, and they are
127 supplied to @var{program} as separate command line arguments. Wildcard
128 characters and other shell constructs have no special meanings in these
129 strings, since the strings are passed directly to the specified program.
130
131 @cindex environment variables, subprocesses
132 The subprocess inherits its environment from Emacs, but you can
133 specify overrides for it with @code{process-environment}. @xref{System
134 Environment}. The subprocess gets its current directory from the
135 value of @code{default-directory}.
136
137 @defvar exec-directory
138 @pindex movemail
139 The value of this variable is a string, the name of a directory that
140 contains programs that come with GNU Emacs and are intended for Emacs
141 to invoke. The program @code{movemail} is an example of such a program;
142 Rmail uses it to fetch new mail from an inbox.
143 @end defvar
144
145 @defopt exec-path
146 The value of this variable is a list of directories to search for
147 programs to run in subprocesses. Each element is either the name of a
148 directory (i.e., a string), or @code{nil}, which stands for the default
149 directory (which is the value of @code{default-directory}).
150 @cindex program directories
151
152 The value of @code{exec-path} is used by @code{call-process} and
153 @code{start-process} when the @var{program} argument is not an absolute
154 file name.
155
156 Generally, you should not modify @code{exec-path} directly. Instead,
157 ensure that your @env{PATH} environment variable is set appropriately
158 before starting Emacs. Trying to modify @code{exec-path}
159 independently of @env{PATH} can lead to confusing results.
160 @end defopt
161
162 @node Shell Arguments
163 @section Shell Arguments
164 @cindex arguments for shell commands
165 @cindex shell command arguments
166
167 Lisp programs sometimes need to run a shell and give it a command
168 that contains file names that were specified by the user. These
169 programs ought to be able to support any valid file name. But the shell
170 gives special treatment to certain characters, and if these characters
171 occur in the file name, they will confuse the shell. To handle these
172 characters, use the function @code{shell-quote-argument}:
173
174 @defun shell-quote-argument argument
175 This function returns a string that represents, in shell syntax,
176 an argument whose actual contents are @var{argument}. It should
177 work reliably to concatenate the return value into a shell command
178 and then pass it to a shell for execution.
179
180 Precisely what this function does depends on your operating system. The
181 function is designed to work with the syntax of your system's standard
182 shell; if you use an unusual shell, you will need to redefine this
183 function.
184
185 @example
186 ;; @r{This example shows the behavior on GNU and Unix systems.}
187 (shell-quote-argument "foo > bar")
188 @result{} "foo\\ \\>\\ bar"
189
190 ;; @r{This example shows the behavior on MS-DOS and MS-Windows.}
191 (shell-quote-argument "foo > bar")
192 @result{} "\"foo > bar\""
193 @end example
194
195 Here's an example of using @code{shell-quote-argument} to construct
196 a shell command:
197
198 @example
199 (concat "diff -u "
200 (shell-quote-argument oldfile)
201 " "
202 (shell-quote-argument newfile))
203 @end example
204 @end defun
205
206 @cindex quoting and unquoting command-line arguments
207 @cindex minibuffer input, and command-line arguments
208 @cindex @code{call-process}, command-line arguments from minibuffer
209 @cindex @code{start-process}, command-line arguments from minibuffer
210 The following two functions are useful for combining a list of
211 individual command-line argument strings into a single string, and
212 taking a string apart into a list of individual command-line
213 arguments. These functions are mainly intended for
214 converting user input in the minibuffer, a Lisp string, into a list of
215 string arguments to be passed to @code{call-process} or
216 @code{start-process}, or for converting such lists of arguments into
217 a single Lisp string to be presented in the minibuffer or echo area.
218
219 @defun split-string-and-unquote string &optional separators
220 This function splits @var{string} into substrings at matches for the
221 regular expression @var{separators}, like @code{split-string} does
222 (@pxref{Creating Strings}); in addition, it removes quoting from the
223 substrings. It then makes a list of the substrings and returns it.
224
225 If @var{separators} is omitted or @code{nil}, it defaults to
226 @code{"\\s-+"}, which is a regular expression that matches one or more
227 characters with whitespace syntax (@pxref{Syntax Class Table}).
228
229 This function supports two types of quoting: enclosing a whole string
230 in double quotes @code{"@dots{}"}, and quoting individual characters
231 with a backslash escape @samp{\}. The latter is also used in Lisp
232 strings, so this function can handle those as well.
233 @end defun
234
235 @defun combine-and-quote-strings list-of-strings &optional separator
236 This function concatenates @var{list-of-strings} into a single string,
237 quoting each string as necessary. It also sticks the @var{separator}
238 string between each pair of strings; if @var{separator} is omitted or
239 @code{nil}, it defaults to @code{" "}. The return value is the
240 resulting string.
241
242 The strings in @var{list-of-strings} that need quoting are those that
243 include @var{separator} as their substring. Quoting a string encloses
244 it in double quotes @code{"@dots{}"}. In the simplest case, if you
245 are consing a command from the individual command-line arguments,
246 every argument that includes embedded blanks will be quoted.
247 @end defun
248
249 @node Synchronous Processes
250 @section Creating a Synchronous Process
251 @cindex synchronous subprocess
252
253 After a @dfn{synchronous process} is created, Emacs waits for the
254 process to terminate before continuing. Starting Dired on GNU or
255 Unix@footnote{On other systems, Emacs uses a Lisp emulation of
256 @code{ls}; see @ref{Contents of Directories}.} is an example of this: it
257 runs @code{ls} in a synchronous process, then modifies the output
258 slightly. Because the process is synchronous, the entire directory
259 listing arrives in the buffer before Emacs tries to do anything with it.
260
261 While Emacs waits for the synchronous subprocess to terminate, the
262 user can quit by typing @kbd{C-g}. The first @kbd{C-g} tries to kill
263 the subprocess with a @code{SIGINT} signal; but it waits until the
264 subprocess actually terminates before quitting. If during that time the
265 user types another @kbd{C-g}, that kills the subprocess instantly with
266 @code{SIGKILL} and quits immediately (except on MS-DOS, where killing
267 other processes doesn't work). @xref{Quitting}.
268
269 The synchronous subprocess functions return an indication of how the
270 process terminated.
271
272 The output from a synchronous subprocess is generally decoded using a
273 coding system, much like text read from a file. The input sent to a
274 subprocess by @code{call-process-region} is encoded using a coding
275 system, much like text written into a file. @xref{Coding Systems}.
276
277 @defun call-process program &optional infile destination display &rest args
278 This function calls @var{program} and waits for it to finish.
279
280 The current working directory of the subprocess is
281 @code{default-directory}.
282
283 The standard input for the new process comes from file @var{infile} if
284 @var{infile} is not @code{nil}, and from the null device otherwise.
285 The argument @var{destination} says where to put the process output.
286 Here are the possibilities:
287
288 @table @asis
289 @item a buffer
290 Insert the output in that buffer, before point. This includes both the
291 standard output stream and the standard error stream of the process.
292
293 @item a string
294 Insert the output in a buffer with that name, before point.
295
296 @item @code{t}
297 Insert the output in the current buffer, before point.
298
299 @item @code{nil}
300 Discard the output.
301
302 @item 0
303 Discard the output, and return @code{nil} immediately without waiting
304 for the subprocess to finish.
305
306 In this case, the process is not truly synchronous, since it can run in
307 parallel with Emacs; but you can think of it as synchronous in that
308 Emacs is essentially finished with the subprocess as soon as this
309 function returns.
310
311 MS-DOS doesn't support asynchronous subprocesses, so this option doesn't
312 work there.
313
314 @item @code{(:file @var{file-name})}
315 Send the output to the file name specified, overwriting it if it
316 already exists.
317
318 @item @code{(@var{real-destination} @var{error-destination})}
319 Keep the standard output stream separate from the standard error stream;
320 deal with the ordinary output as specified by @var{real-destination},
321 and dispose of the error output according to @var{error-destination}.
322 If @var{error-destination} is @code{nil}, that means to discard the
323 error output, @code{t} means mix it with the ordinary output, and a
324 string specifies a file name to redirect error output into.
325
326 You can't directly specify a buffer to put the error output in; that is
327 too difficult to implement. But you can achieve this result by sending
328 the error output to a temporary file and then inserting the file into a
329 buffer.
330 @end table
331
332 If @var{display} is non-@code{nil}, then @code{call-process} redisplays
333 the buffer as output is inserted. (However, if the coding system chosen
334 for decoding output is @code{undecided}, meaning deduce the encoding
335 from the actual data, then redisplay sometimes cannot continue once
336 non-@acronym{ASCII} characters are encountered. There are fundamental
337 reasons why it is hard to fix this; see @ref{Output from Processes}.)
338
339 Otherwise the function @code{call-process} does no redisplay, and the
340 results become visible on the screen only when Emacs redisplays that
341 buffer in the normal course of events.
342
343 The remaining arguments, @var{args}, are strings that specify command
344 line arguments for the program.
345
346 The value returned by @code{call-process} (unless you told it not to
347 wait) indicates the reason for process termination. A number gives the
348 exit status of the subprocess; 0 means success, and any other value
349 means failure. If the process terminated with a signal,
350 @code{call-process} returns a string describing the signal.
351
352 In the examples below, the buffer @samp{foo} is current.
353
354 @smallexample
355 @group
356 (call-process "pwd" nil t)
357 @result{} 0
358
359 ---------- Buffer: foo ----------
360 /home/lewis/manual
361 ---------- Buffer: foo ----------
362 @end group
363
364 @group
365 (call-process "grep" nil "bar" nil "lewis" "/etc/passwd")
366 @result{} 0
367
368 ---------- Buffer: bar ----------
369 lewis:x:1001:1001:Bil Lewis,,,,:/home/lewis:/bin/bash
370
371 ---------- Buffer: bar ----------
372 @end group
373 @end smallexample
374
375 Here is an example of the use of @code{call-process}, as used to
376 be found in the definition of the @code{insert-directory} function:
377
378 @smallexample
379 @group
380 (call-process insert-directory-program nil t nil switches
381 (if full-directory-p
382 (concat (file-name-as-directory file) ".")
383 file))
384 @end group
385 @end smallexample
386 @end defun
387
388 @defun process-file program &optional infile buffer display &rest args
389 This function processes files synchronously in a separate process. It
390 is similar to @code{call-process}, but may invoke a file handler based
391 on the value of the variable @code{default-directory}, which specifies
392 the current working directory of the subprocess.
393
394 The arguments are handled in almost the same way as for
395 @code{call-process}, with the following differences:
396
397 Some file handlers may not support all combinations and forms of the
398 arguments @var{infile}, @var{buffer}, and @var{display}. For example,
399 some file handlers might behave as if @var{display} were @code{nil},
400 regardless of the value actually passed. As another example, some
401 file handlers might not support separating standard output and error
402 output by way of the @var{buffer} argument.
403
404 If a file handler is invoked, it determines the program to run based
405 on the first argument @var{program}. For instance, suppose that a
406 handler for remote files is invoked. Then the path that is used for
407 searching for the program might be different from @code{exec-path}.
408
409 The second argument @var{infile} may invoke a file handler. The file
410 handler could be different from the handler chosen for the
411 @code{process-file} function itself. (For example,
412 @code{default-directory} could be on one remote host, and
413 @var{infile} on a different remote host. Or @code{default-directory}
414 could be non-special, whereas @var{infile} is on a remote host.)
415
416 If @var{buffer} is a list of the form @code{(@var{real-destination}
417 @var{error-destination})}, and @var{error-destination} names a file,
418 then the same remarks as for @var{infile} apply.
419
420 The remaining arguments (@var{args}) will be passed to the process
421 verbatim. Emacs is not involved in processing file names that are
422 present in @var{args}. To avoid confusion, it may be best to avoid
423 absolute file names in @var{args}, but rather to specify all file
424 names as relative to @code{default-directory}. The function
425 @code{file-relative-name} is useful for constructing such relative
426 file names.
427 @end defun
428
429 @defvar process-file-side-effects
430 This variable indicates whether a call of @code{process-file} changes
431 remote files.
432
433 By default, this variable is always set to @code{t}, meaning that a
434 call of @code{process-file} could potentially change any file on a
435 remote host. When set to @code{nil}, a file handler could optimize
436 its behavior with respect to remote file attribute caching.
437
438 You should only ever change this variable with a let-binding; never
439 with @code{setq}.
440 @end defvar
441
442 @defun call-process-region start end program &optional delete destination display &rest args
443 This function sends the text from @var{start} to @var{end} as
444 standard input to a process running @var{program}. It deletes the text
445 sent if @var{delete} is non-@code{nil}; this is useful when
446 @var{destination} is @code{t}, to insert the output in the current
447 buffer in place of the input.
448
449 The arguments @var{destination} and @var{display} control what to do
450 with the output from the subprocess, and whether to update the display
451 as it comes in. For details, see the description of
452 @code{call-process}, above. If @var{destination} is the integer 0,
453 @code{call-process-region} discards the output and returns @code{nil}
454 immediately, without waiting for the subprocess to finish (this only
455 works if asynchronous subprocesses are supported; i.e., not on MS-DOS).
456
457 The remaining arguments, @var{args}, are strings that specify command
458 line arguments for the program.
459
460 The return value of @code{call-process-region} is just like that of
461 @code{call-process}: @code{nil} if you told it to return without
462 waiting; otherwise, a number or string which indicates how the
463 subprocess terminated.
464
465 In the following example, we use @code{call-process-region} to run the
466 @code{cat} utility, with standard input being the first five characters
467 in buffer @samp{foo} (the word @samp{input}). @code{cat} copies its
468 standard input into its standard output. Since the argument
469 @var{destination} is @code{t}, this output is inserted in the current
470 buffer.
471
472 @smallexample
473 @group
474 ---------- Buffer: foo ----------
475 input@point{}
476 ---------- Buffer: foo ----------
477 @end group
478
479 @group
480 (call-process-region 1 6 "cat" nil t)
481 @result{} 0
482
483 ---------- Buffer: foo ----------
484 inputinput@point{}
485 ---------- Buffer: foo ----------
486 @end group
487 @end smallexample
488
489 For example, the @code{shell-command-on-region} command uses
490 @code{call-process-region} in a manner similar to this:
491
492 @smallexample
493 @group
494 (call-process-region
495 start end
496 shell-file-name ; @r{name of program}
497 nil ; @r{do not delete region}
498 buffer ; @r{send output to @code{buffer}}
499 nil ; @r{no redisplay during output}
500 "-c" command) ; @r{arguments for the shell}
501 @end group
502 @end smallexample
503 @c It actually uses shell-command-switch, but no need to mention that here.
504 @end defun
505
506 @defun call-process-shell-command command &optional infile destination display
507 This function executes the shell command @var{command} synchronously.
508 The arguments are handled as in @code{call-process}. An old calling
509 convention allowed to pass any number of additional arguments after
510 @var{display}, which were concatenated to @var{command}; this is still
511 supported, but strongly discouraged.
512 @end defun
513
514 @defun process-file-shell-command command &optional infile destination display
515 This function is like @code{call-process-shell-command}, but uses
516 @code{process-file} internally. Depending on @code{default-directory},
517 @var{command} can be executed also on remote hosts. An old calling
518 convention allowed to pass any number of additional arguments after
519 @var{display}, which were concatenated to @var{command}; this is still
520 supported, but strongly discouraged.
521 @end defun
522
523 @defun shell-command-to-string command
524 This function executes @var{command} (a string) as a shell command,
525 then returns the command's output as a string.
526 @end defun
527
528 @c There is also shell-command-on-region, but that is more of a user
529 @c command, not something to use in programs.
530
531 @defun process-lines program &rest args
532 This function runs @var{program}, waits for it to finish, and returns
533 its output as a list of strings. Each string in the list holds a
534 single line of text output by the program; the end-of-line characters
535 are stripped from each line. The arguments beyond @var{program},
536 @var{args}, are strings that specify command-line arguments with which
537 to run the program.
538
539 If @var{program} exits with a non-zero exit status, this function
540 signals an error.
541
542 This function works by calling @code{call-process}, so program output
543 is decoded in the same way as for @code{call-process}.
544 @end defun
545
546 @node Asynchronous Processes
547 @section Creating an Asynchronous Process
548 @cindex asynchronous subprocess
549
550 In this section, we describe how to create an @dfn{asynchronous
551 process}. After an asynchronous process is created, it runs in
552 parallel with Emacs, and Emacs can communicate with it using the
553 functions described in the following sections (@pxref{Input to
554 Processes}, and @pxref{Output from Processes}). Note that process
555 communication is only partially asynchronous: Emacs sends data to the
556 process only when certain functions are called, and Emacs accepts data
557 from the process only while waiting for input or for a time delay.
558
559 @cindex pty
560 @cindex pipe
561 An asynchronous process is controlled either via a @dfn{pty}
562 (pseudo-terminal) or a @dfn{pipe}. The choice of pty or pipe is made
563 when creating the process, based on the value of the variable
564 @code{process-connection-type} (see below). Ptys are usually
565 preferable for processes visible to the user, as in Shell mode,
566 because they allow for job control (@kbd{C-c}, @kbd{C-z}, etc.)@:
567 between the process and its children, whereas pipes do not. For
568 subprocesses used for internal purposes by programs, it is often
569 better to use a pipe, because they are more efficient, and because
570 they are immune to stray character injections that ptys introduce for
571 large (around 500 byte) messages. Also, the total number of ptys is
572 limited on many systems and it is good not to waste them.
573
574 @defun start-process name buffer-or-name program &rest args
575 This function creates a new asynchronous subprocess and starts the
576 program @var{program} running in it. It returns a process object that
577 stands for the new subprocess in Lisp. The argument @var{name}
578 specifies the name for the process object; if a process with this name
579 already exists, then @var{name} is modified (by appending @samp{<1>},
580 etc.)@: to be unique. The buffer @var{buffer-or-name} is the buffer to
581 associate with the process.
582
583 If @var{program} is @code{nil}, Emacs opens a new pseudoterminal (pty)
584 and associates its input and output with @var{buffer-or-name}, without
585 creating a subprocess. In that case, the remaining arguments
586 @var{args} are ignored.
587
588 The remaining arguments, @var{args}, are strings that specify command
589 line arguments for the subprocess.
590
591 In the example below, the first process is started and runs (rather,
592 sleeps) for 100 seconds (the output buffer @samp{foo} is created
593 immediately). Meanwhile, the second process is started, and
594 given the name @samp{my-process<1>} for the sake of uniqueness. It
595 inserts the directory listing at the end of the buffer @samp{foo},
596 before the first process finishes. Then it finishes, and a message to
597 that effect is inserted in the buffer. Much later, the first process
598 finishes, and another message is inserted in the buffer for it.
599
600 @smallexample
601 @group
602 (start-process "my-process" "foo" "sleep" "100")
603 @result{} #<process my-process>
604 @end group
605
606 @group
607 (start-process "my-process" "foo" "ls" "-l" "/bin")
608 @result{} #<process my-process<1>>
609
610 ---------- Buffer: foo ----------
611 total 8336
612 -rwxr-xr-x 1 root root 971384 Mar 30 10:14 bash
613 -rwxr-xr-x 1 root root 146920 Jul 5 2011 bsd-csh
614 @dots{}
615 -rwxr-xr-x 1 root root 696880 Feb 28 15:55 zsh4
616
617 Process my-process<1> finished
618
619 Process my-process finished
620 ---------- Buffer: foo ----------
621 @end group
622 @end smallexample
623 @end defun
624
625 @defun start-file-process name buffer-or-name program &rest args
626 Like @code{start-process}, this function starts a new asynchronous
627 subprocess running @var{program} in it, and returns its process
628 object.
629
630 The difference from @code{start-process} is that this function may
631 invoked a file handler based on the value of @code{default-directory}.
632 This handler ought to run @var{program}, perhaps on the local host,
633 perhaps on a remote host that corresponds to @code{default-directory}.
634 In the latter case, the local part of @code{default-directory} becomes
635 the working directory of the process.
636
637 This function does not try to invoke file name handlers for
638 @var{program} or for the @var{program-args}.
639
640 Depending on the implementation of the file handler, it might not be
641 possible to apply @code{process-filter} or @code{process-sentinel} to
642 the resulting process object. @xref{Filter Functions}, and @ref{Sentinels}.
643
644 @c FIXME Can we find a better example (i.e., a more modern function
645 @c that is actually documented).
646 Some file handlers may not support @code{start-file-process} (for
647 example the function @code{ange-ftp-hook-function}). In such cases,
648 this function does nothing and returns @code{nil}.
649 @end defun
650
651 @defun start-process-shell-command name buffer-or-name command
652 This function is like @code{start-process}, except that it uses a shell
653 to execute the specified command. The argument @var{command} is a shell
654 command name. The variable @code{shell-file-name} specifies which shell to
655 use.
656
657 The point of running a program through the shell, rather than directly
658 with @code{start-process}, is so that you can employ shell features such
659 as wildcards in the arguments. It follows that if you include any
660 arbitrary user-specified arguments in the command, you should quote them
661 with @code{shell-quote-argument} first, so that any special shell
662 characters do @emph{not} have their special shell meanings. @xref{Shell
663 Arguments}. Of course, when executing commands based on user input
664 you should also consider the security implications.
665 @end defun
666
667 @defun start-file-process-shell-command name buffer-or-name command
668 This function is like @code{start-process-shell-command}, but uses
669 @code{start-file-process} internally. Because of this, @var{command}
670 can also be executed on remote hosts, depending on @code{default-directory}.
671 @end defun
672
673 @defvar process-connection-type
674 This variable controls the type of device used to communicate with
675 asynchronous subprocesses. If it is non-@code{nil}, then ptys are
676 used, when available. Otherwise, pipes are used.
677
678 The value of @code{process-connection-type} takes effect when
679 @code{start-process} is called. So you can specify how to communicate
680 with one subprocess by binding the variable around the call to
681 @code{start-process}.
682
683 @smallexample
684 @group
685 (let ((process-connection-type nil)) ; @r{use a pipe}
686 (start-process @dots{}))
687 @end group
688 @end smallexample
689
690 To determine whether a given subprocess actually got a pipe or a pty,
691 use the function @code{process-tty-name} (@pxref{Process
692 Information}).
693 @end defvar
694
695 @defun make-process &rest args
696 This function is like @code{start-process}, but takes keyword arguments.
697
698 The arguments @var{args} are a list of keyword/argument pairs.
699 Omitting a keyword is always equivalent to specifying it with value
700 @code{nil}. Here are the meaningful keywords:
701
702 @table @asis
703 @item :name @var{name}
704 Use the string @var{name} as the process name. It is modified if
705 necessary to make it unique.
706
707 @item :buffer @var{buffer}
708 Use @var{buffer} as the process buffer.
709
710 @item :command @var{command}
711 Use @var{command} as the command line of the process. @var{command}
712 is a list starting with the program's executable file name, followed
713 by strings to give to program as arguments.
714
715 @item :coding @var{coding}
716 If @var{coding} is a symbol, it specifies the coding system to be
717 used for both reading and writing of data from and to the
718 connection. If @var{coding} is a cons cell
719 @w{@code{(@var{decoding} . @var{encoding})}}, then @var{decoding}
720 will be used for reading and @var{encoding} for writing.
721
722 If @var{coding} is @code{nil}, the default rules for finding the
723 coding system will apply. @xref{Default Coding Systems}.
724
725 @item :connection-type @var{TYPE}
726 Initialize the type of device used to communicate with the subprocess.
727 Possible values are @code{pty} to use a pty, @code{pipe} to use a
728 pipe, or @code{nil} to use the default derived from the value of
729 the @code{process-connection-type} variable.
730
731 @item :noquery @var{query-flag}
732 Initialize the process query flag to @var{query-flag}.
733 @xref{Query Before Exit}.
734
735 @item :stop @var{stopped}
736 If @var{stopped} is non-@code{nil}, start the process in the
737 stopped state.
738
739 @item :filter @var{filter}
740 Initialize the process filter to @var{filter}.
741
742 @item :sentinel @var{sentinel}
743 Initialize the process sentinel to @var{sentinel}.
744
745 @item :stderr @var{stderr}
746 Associate @var{stderr} with the standard error of the process.
747 @var{stderr} is either a buffer or a pipe process created with
748 @code{make-pipe-process}.
749 @end table
750
751 The original argument list, modified with the actual connection
752 information, is available via the @code{process-contact} function.
753 @end defun
754
755 @defun make-pipe-process &rest args
756 This function creates a bidirectional pipe which can be attached to a
757 child process (currently only useful with the @code{:stderr} keyword
758 of @code{make-process}).
759
760 The arguments @var{args} are a list of keyword/argument pairs.
761 Omitting a keyword is always equivalent to specifying it with value
762 @code{nil}, except for @code{:coding}.
763 Here are the meaningful keywords:
764
765 @table @asis
766 @item :name @var{name}
767 Use the string @var{name} as the process name. It is modified if
768 necessary to make it unique.
769
770 @item :buffer @var{buffer}
771 Use @var{buffer} as the process buffer.
772
773 @item :coding @var{coding}
774 If @var{coding} is a symbol, it specifies the coding system to be
775 used for both reading and writing of data from and to the
776 connection. If @var{coding} is a cons cell
777 @w{@code{(@var{decoding} . @var{encoding})}}, then @var{decoding}
778 will be used for reading and @var{encoding} for writing.
779
780 If @var{coding} is @code{nil}, the default rules for finding the
781 coding system will apply. @xref{Default Coding Systems}.
782
783 @item :noquery @var{query-flag}
784 Initialize the process query flag to @var{query-flag}.
785 @xref{Query Before Exit}.
786
787 @item :stop @var{stopped}
788 If @var{stopped} is non-@code{nil}, start the process in the
789 stopped state.
790
791 @item :filter @var{filter}
792 Initialize the process filter to @var{filter}.
793
794 @item :sentinel @var{sentinel}
795 Initialize the process sentinel to @var{sentinel}.
796 @end table
797
798 The original argument list, modified with the actual connection
799 information, is available via the @code{process-contact} function.
800 @end defun
801
802 @node Deleting Processes
803 @section Deleting Processes
804 @cindex deleting processes
805
806 @dfn{Deleting a process} disconnects Emacs immediately from the
807 subprocess. Processes are deleted automatically after they terminate,
808 but not necessarily right away. You can delete a process explicitly
809 at any time. If you explicitly delete a terminated process before it
810 is deleted automatically, no harm results. Deleting a running
811 process sends a signal to terminate it (and its child processes, if
812 any), and calls the process sentinel. @xref{Sentinels}.
813
814 When a process is deleted, the process object itself continues to
815 exist as long as other Lisp objects point to it. All the Lisp
816 primitives that work on process objects accept deleted processes, but
817 those that do I/O or send signals will report an error. The process
818 mark continues to point to the same place as before, usually into a
819 buffer where output from the process was being inserted.
820
821 @defopt delete-exited-processes
822 This variable controls automatic deletion of processes that have
823 terminated (due to calling @code{exit} or to a signal). If it is
824 @code{nil}, then they continue to exist until the user runs
825 @code{list-processes}. Otherwise, they are deleted immediately after
826 they exit.
827 @end defopt
828
829 @defun delete-process process
830 This function deletes a process, killing it with a @code{SIGKILL}
831 signal. The argument may be a process, the name of a process, a
832 buffer, or the name of a buffer. (A buffer or buffer-name stands for
833 the process that @code{get-buffer-process} returns.) Calling
834 @code{delete-process} on a running process terminates it, updates the
835 process status, and runs the sentinel immediately. If the
836 process has already terminated, calling @code{delete-process} has no
837 effect on its status, or on the running of its sentinel (which will
838 happen sooner or later).
839
840 @smallexample
841 @group
842 (delete-process "*shell*")
843 @result{} nil
844 @end group
845 @end smallexample
846 @end defun
847
848 @node Process Information
849 @section Process Information
850 @cindex process information
851
852 Several functions return information about processes.
853
854 @deffn Command list-processes &optional query-only buffer
855 This command displays a listing of all living processes. In addition,
856 it finally deletes any process whose status was @samp{Exited} or
857 @samp{Signaled}. It returns @code{nil}.
858
859 The processes are shown in a buffer named @file{*Process List*}
860 (unless you specify otherwise using the optional argument @var{buffer}),
861 whose major mode is Process Menu mode.
862
863 If @var{query-only} is non-@code{nil}, it only lists processes
864 whose query flag is non-@code{nil}. @xref{Query Before Exit}.
865 @end deffn
866
867 @defun process-list
868 This function returns a list of all processes that have not been deleted.
869
870 @smallexample
871 @group
872 (process-list)
873 @result{} (#<process display-time> #<process shell>)
874 @end group
875 @end smallexample
876 @end defun
877
878 @defun get-process name
879 This function returns the process named @var{name} (a string), or
880 @code{nil} if there is none.
881
882 @smallexample
883 @group
884 (get-process "shell")
885 @result{} #<process shell>
886 @end group
887 @end smallexample
888 @end defun
889
890 @defun process-command process
891 This function returns the command that was executed to start
892 @var{process}. This is a list of strings, the first string being the
893 program executed and the rest of the strings being the arguments that
894 were given to the program.
895
896 @smallexample
897 @group
898 (process-command (get-process "shell"))
899 @result{} ("bash" "-i")
900 @end group
901 @end smallexample
902 @end defun
903
904 @defun process-contact process &optional key
905
906 This function returns information about how a network or serial
907 process was set up. When @var{key} is @code{nil}, it returns
908 @code{(@var{hostname} @var{service})} for a network process, and
909 @code{(@var{port} @var{speed})} for a serial process.
910 For an ordinary child process, this function always returns @code{t}.
911
912 If @var{key} is @code{t}, the value is the complete status information
913 for the connection, server, or serial port; that is, the list of
914 keywords and values specified in @code{make-network-process} or
915 @code{make-serial-process}, except that some of the values represent
916 the current status instead of what you specified.
917
918 For a network process, the values include (see
919 @code{make-network-process} for a complete list):
920
921 @table @code
922 @item :buffer
923 The associated value is the process buffer.
924 @item :filter
925 The associated value is the process filter function.
926 @item :sentinel
927 The associated value is the process sentinel function.
928 @item :remote
929 In a connection, the address in internal format of the remote peer.
930 @item :local
931 The local address, in internal format.
932 @item :service
933 In a server, if you specified @code{t} for @var{service},
934 this value is the actual port number.
935 @end table
936
937 @code{:local} and @code{:remote} are included even if they were not
938 specified explicitly in @code{make-network-process}.
939
940 For a serial process, see @code{make-serial-process} and
941 @code{serial-process-configure} for a list of keys.
942
943 If @var{key} is a keyword, the function returns the value corresponding
944 to that keyword.
945 @end defun
946
947 @defun process-id process
948 This function returns the @acronym{PID} of @var{process}. This is an
949 integer that distinguishes the process @var{process} from all other
950 processes running on the same computer at the current time. The
951 @acronym{PID} of a process is chosen by the operating system kernel when the
952 process is started and remains constant as long as the process exists.
953 @end defun
954
955 @defun process-name process
956 This function returns the name of @var{process}, as a string.
957 @end defun
958
959 @defun process-status process-name
960 This function returns the status of @var{process-name} as a symbol.
961 The argument @var{process-name} must be a process, a buffer, or a
962 process name (a string).
963
964 The possible values for an actual subprocess are:
965
966 @table @code
967 @item run
968 for a process that is running.
969 @item stop
970 for a process that is stopped but continuable.
971 @item exit
972 for a process that has exited.
973 @item signal
974 for a process that has received a fatal signal.
975 @item open
976 for a network connection that is open.
977 @item closed
978 for a network connection that is closed. Once a connection
979 is closed, you cannot reopen it, though you might be able to open
980 a new connection to the same place.
981 @item connect
982 for a non-blocking connection that is waiting to complete.
983 @item failed
984 for a non-blocking connection that has failed to complete.
985 @item listen
986 for a network server that is listening.
987 @item nil
988 if @var{process-name} is not the name of an existing process.
989 @end table
990
991 @smallexample
992 @group
993 (process-status (get-buffer "*shell*"))
994 @result{} run
995 @end group
996 @end smallexample
997
998 For a network connection, @code{process-status} returns one of the symbols
999 @code{open} or @code{closed}. The latter means that the other side
1000 closed the connection, or Emacs did @code{delete-process}.
1001 @end defun
1002
1003 @defun process-live-p process
1004 This function returns non-@code{nil} if @var{process} is alive. A
1005 process is considered alive if its status is @code{run}, @code{open},
1006 @code{listen}, @code{connect} or @code{stop}.
1007 @end defun
1008
1009 @defun process-type process
1010 This function returns the symbol @code{network} for a network
1011 connection or server, @code{serial} for a serial port connection, or
1012 @code{real} for a real subprocess.
1013 @end defun
1014
1015 @defun process-exit-status process
1016 This function returns the exit status of @var{process} or the signal
1017 number that killed it. (Use the result of @code{process-status} to
1018 determine which of those it is.) If @var{process} has not yet
1019 terminated, the value is 0.
1020 @end defun
1021
1022 @defun process-tty-name process
1023 This function returns the terminal name that @var{process} is using for
1024 its communication with Emacs---or @code{nil} if it is using pipes
1025 instead of a terminal (see @code{process-connection-type} in
1026 @ref{Asynchronous Processes}). If @var{process} represents a program
1027 running on a remote host, the terminal name used by that program on
1028 the remote host is provided as process property @code{remote-tty}.
1029 @end defun
1030
1031 @defun process-coding-system process
1032 @anchor{Coding systems for a subprocess}
1033 This function returns a cons cell @code{(@var{decode} . @var{encode})},
1034 describing the coding systems in use for decoding output from, and
1035 encoding input to, @var{process} (@pxref{Coding Systems}).
1036 @end defun
1037
1038 @defun set-process-coding-system process &optional decoding-system encoding-system
1039 This function specifies the coding systems to use for subsequent output
1040 from and input to @var{process}. It will use @var{decoding-system} to
1041 decode subprocess output, and @var{encoding-system} to encode subprocess
1042 input.
1043 @end defun
1044
1045 Every process also has a property list that you can use to store
1046 miscellaneous values associated with the process.
1047
1048 @defun process-get process propname
1049 This function returns the value of the @var{propname} property
1050 of @var{process}.
1051 @end defun
1052
1053 @defun process-put process propname value
1054 This function sets the value of the @var{propname} property
1055 of @var{process} to @var{value}.
1056 @end defun
1057
1058 @defun process-plist process
1059 This function returns the process plist of @var{process}.
1060 @end defun
1061
1062 @defun set-process-plist process plist
1063 This function sets the process plist of @var{process} to @var{plist}.
1064 @end defun
1065
1066 @node Input to Processes
1067 @section Sending Input to Processes
1068 @cindex process input
1069
1070 Asynchronous subprocesses receive input when it is sent to them by
1071 Emacs, which is done with the functions in this section. You must
1072 specify the process to send input to, and the input data to send. The
1073 data appears on the standard input of the subprocess.
1074
1075 @c FIXME which?
1076 Some operating systems have limited space for buffered input in a
1077 pty. On these systems, Emacs sends an @acronym{EOF} periodically
1078 amidst the other characters, to force them through. For most
1079 programs, these @acronym{EOF}s do no harm.
1080
1081 Subprocess input is normally encoded using a coding system before the
1082 subprocess receives it, much like text written into a file. You can use
1083 @code{set-process-coding-system} to specify which coding system to use
1084 (@pxref{Process Information}). Otherwise, the coding system comes from
1085 @code{coding-system-for-write}, if that is non-@code{nil}; or else from
1086 the defaulting mechanism (@pxref{Default Coding Systems}).
1087
1088 Sometimes the system is unable to accept input for that process,
1089 because the input buffer is full. When this happens, the send functions
1090 wait a short while, accepting output from subprocesses, and then try
1091 again. This gives the subprocess a chance to read more of its pending
1092 input and make space in the buffer. It also allows filters, sentinels
1093 and timers to run---so take account of that in writing your code.
1094
1095 In these functions, the @var{process} argument can be a process or
1096 the name of a process, or a buffer or buffer name (which stands
1097 for a process via @code{get-buffer-process}). @code{nil} means
1098 the current buffer's process.
1099
1100 @defun process-send-string process string
1101 This function sends @var{process} the contents of @var{string} as
1102 standard input. It returns @code{nil}. For example, to make a
1103 Shell buffer list files:
1104
1105 @smallexample
1106 @group
1107 (process-send-string "shell<1>" "ls\n")
1108 @result{} nil
1109 @end group
1110 @end smallexample
1111 @end defun
1112
1113 @defun process-send-region process start end
1114 This function sends the text in the region defined by @var{start} and
1115 @var{end} as standard input to @var{process}.
1116
1117 An error is signaled unless both @var{start} and @var{end} are
1118 integers or markers that indicate positions in the current buffer. (It
1119 is unimportant which number is larger.)
1120 @end defun
1121
1122 @defun process-send-eof &optional process
1123 This function makes @var{process} see an end-of-file in its
1124 input. The @acronym{EOF} comes after any text already sent to it.
1125 The function returns @var{process}.
1126
1127 @smallexample
1128 @group
1129 (process-send-eof "shell")
1130 @result{} "shell"
1131 @end group
1132 @end smallexample
1133 @end defun
1134
1135 @defun process-running-child-p &optional process
1136 This function will tell you whether a @var{process} has given control of
1137 its terminal to its own child process. The value is @code{t} if this is
1138 true, or if Emacs cannot tell; it is @code{nil} if Emacs can be certain
1139 that this is not so.
1140 @end defun
1141
1142 @node Signals to Processes
1143 @section Sending Signals to Processes
1144 @cindex process signals
1145 @cindex sending signals
1146 @cindex signals
1147
1148 @dfn{Sending a signal} to a subprocess is a way of interrupting its
1149 activities. There are several different signals, each with its own
1150 meaning. The set of signals and their names is defined by the operating
1151 system. For example, the signal @code{SIGINT} means that the user has
1152 typed @kbd{C-c}, or that some analogous thing has happened.
1153
1154 Each signal has a standard effect on the subprocess. Most signals
1155 kill the subprocess, but some stop (or resume) execution instead. Most
1156 signals can optionally be handled by programs; if the program handles
1157 the signal, then we can say nothing in general about its effects.
1158
1159 You can send signals explicitly by calling the functions in this
1160 section. Emacs also sends signals automatically at certain times:
1161 killing a buffer sends a @code{SIGHUP} signal to all its associated
1162 processes; killing Emacs sends a @code{SIGHUP} signal to all remaining
1163 processes. (@code{SIGHUP} is a signal that usually indicates that the
1164 user ``hung up the phone'', i.e., disconnected.)
1165
1166 Each of the signal-sending functions takes two optional arguments:
1167 @var{process} and @var{current-group}.
1168
1169 The argument @var{process} must be either a process, a process
1170 name, a buffer, a buffer name, or @code{nil}. A buffer or buffer name
1171 stands for a process through @code{get-buffer-process}. @code{nil}
1172 stands for the process associated with the current buffer. An error
1173 is signaled if @var{process} does not identify a process.
1174
1175 The argument @var{current-group} is a flag that makes a difference
1176 when you are running a job-control shell as an Emacs subprocess. If it
1177 is non-@code{nil}, then the signal is sent to the current process-group
1178 of the terminal that Emacs uses to communicate with the subprocess. If
1179 the process is a job-control shell, this means the shell's current
1180 subjob. If it is @code{nil}, the signal is sent to the process group of
1181 the immediate subprocess of Emacs. If the subprocess is a job-control
1182 shell, this is the shell itself.
1183
1184 The flag @var{current-group} has no effect when a pipe is used to
1185 communicate with the subprocess, because the operating system does not
1186 support the distinction in the case of pipes. For the same reason,
1187 job-control shells won't work when a pipe is used. See
1188 @code{process-connection-type} in @ref{Asynchronous Processes}.
1189
1190 @defun interrupt-process &optional process current-group
1191 This function interrupts the process @var{process} by sending the
1192 signal @code{SIGINT}. Outside of Emacs, typing the interrupt
1193 character (normally @kbd{C-c} on some systems, and @key{DEL} on
1194 others) sends this signal. When the argument @var{current-group} is
1195 non-@code{nil}, you can think of this function as typing @kbd{C-c}
1196 on the terminal by which Emacs talks to the subprocess.
1197 @end defun
1198
1199 @defun kill-process &optional process current-group
1200 This function kills the process @var{process} by sending the
1201 signal @code{SIGKILL}. This signal kills the subprocess immediately,
1202 and cannot be handled by the subprocess.
1203 @end defun
1204
1205 @defun quit-process &optional process current-group
1206 This function sends the signal @code{SIGQUIT} to the process
1207 @var{process}. This signal is the one sent by the quit
1208 character (usually @kbd{C-\}) when you are not inside
1209 Emacs.
1210 @end defun
1211
1212 @defun stop-process &optional process current-group
1213 This function stops the process @var{process} by sending the
1214 signal @code{SIGTSTP}. Use @code{continue-process} to resume its
1215 execution.
1216
1217 Outside of Emacs, on systems with job control, the stop character
1218 (usually @kbd{C-z}) normally sends this signal. When
1219 @var{current-group} is non-@code{nil}, you can think of this function as
1220 typing @kbd{C-z} on the terminal Emacs uses to communicate with the
1221 subprocess.
1222 @end defun
1223
1224 @defun continue-process &optional process current-group
1225 This function resumes execution of the process @var{process} by sending
1226 it the signal @code{SIGCONT}. This presumes that @var{process} was
1227 stopped previously.
1228 @end defun
1229
1230 @deffn Command signal-process process signal
1231 This function sends a signal to process @var{process}. The argument
1232 @var{signal} specifies which signal to send; it should be an integer,
1233 or a symbol whose name is a signal.
1234
1235 The @var{process} argument can be a system process @acronym{ID} (an
1236 integer); that allows you to send signals to processes that are not
1237 children of Emacs. @xref{System Processes}.
1238 @end deffn
1239
1240 @node Output from Processes
1241 @section Receiving Output from Processes
1242 @cindex process output
1243 @cindex output from processes
1244
1245 The output that a subprocess writes to its standard output stream
1246 is passed to a function called the @dfn{filter function}. The default
1247 filter function simply inserts the output into a buffer, which is
1248 called the associated buffer of the process (@pxref{Process
1249 Buffers}). If the process has no buffer then the default filter
1250 discards the output.
1251
1252 When a subprocess terminates, Emacs reads any pending output,
1253 then stops reading output from that subprocess. Therefore, if the
1254 subprocess has children that are still live and still producing
1255 output, Emacs won't receive that output.
1256
1257 Output from a subprocess can arrive only while Emacs is waiting: when
1258 reading terminal input (see the function @code{waiting-for-user-input-p}),
1259 in @code{sit-for} and @code{sleep-for} (@pxref{Waiting}), and in
1260 @code{accept-process-output} (@pxref{Accepting Output}). This
1261 minimizes the problem of timing errors that usually plague parallel
1262 programming. For example, you can safely create a process and only
1263 then specify its buffer or filter function; no output can arrive
1264 before you finish, if the code in between does not call any primitive
1265 that waits.
1266
1267 @defvar process-adaptive-read-buffering
1268 On some systems, when Emacs reads the output from a subprocess, the
1269 output data is read in very small blocks, potentially resulting in
1270 very poor performance. This behavior can be remedied to some extent
1271 by setting the variable @code{process-adaptive-read-buffering} to a
1272 non-@code{nil} value (the default), as it will automatically delay reading
1273 from such processes, thus allowing them to produce more output before
1274 Emacs tries to read it.
1275 @end defvar
1276
1277 It is impossible to separate the standard output and standard error
1278 streams of the subprocess, because Emacs normally spawns the subprocess
1279 inside a pseudo-TTY, and a pseudo-TTY has only one output channel. If
1280 you want to keep the output to those streams separate, you should
1281 redirect one of them to a file---for example, by using an appropriate
1282 shell command.
1283
1284 @menu
1285 * Process Buffers:: By default, output is put in a buffer.
1286 * Filter Functions:: Filter functions accept output from the process.
1287 * Decoding Output:: Filters can get unibyte or multibyte strings.
1288 * Accepting Output:: How to wait until process output arrives.
1289 @end menu
1290
1291 @node Process Buffers
1292 @subsection Process Buffers
1293
1294 A process can (and usually does) have an @dfn{associated buffer},
1295 which is an ordinary Emacs buffer that is used for two purposes: storing
1296 the output from the process, and deciding when to kill the process. You
1297 can also use the buffer to identify a process to operate on, since in
1298 normal practice only one process is associated with any given buffer.
1299 Many applications of processes also use the buffer for editing input to
1300 be sent to the process, but this is not built into Emacs Lisp.
1301
1302 By default, process output is inserted in the associated buffer.
1303 (You can change this by defining a custom filter function,
1304 @pxref{Filter Functions}.) The position to insert the output is
1305 determined by the @code{process-mark}, which is then updated to point
1306 to the end of the text just inserted. Usually, but not always, the
1307 @code{process-mark} is at the end of the buffer.
1308
1309 @findex process-kill-buffer-query-function
1310 Killing the associated buffer of a process also kills the process.
1311 Emacs asks for confirmation first, if the process's
1312 @code{process-query-on-exit-flag} is non-@code{nil} (@pxref{Query
1313 Before Exit}). This confirmation is done by the function
1314 @code{process-kill-buffer-query-function}, which is run from
1315 @code{kill-buffer-query-functions} (@pxref{Killing Buffers}).
1316
1317 @defun process-buffer process
1318 This function returns the associated buffer of the process
1319 @var{process}.
1320
1321 @smallexample
1322 @group
1323 (process-buffer (get-process "shell"))
1324 @result{} #<buffer *shell*>
1325 @end group
1326 @end smallexample
1327 @end defun
1328
1329 @defun process-mark process
1330 This function returns the process marker for @var{process}, which is the
1331 marker that says where to insert output from the process.
1332
1333 If @var{process} does not have a buffer, @code{process-mark} returns a
1334 marker that points nowhere.
1335
1336 The default filter function uses this marker to decide where to
1337 insert process output, and updates it to point after the inserted text.
1338 That is why successive batches of output are inserted consecutively.
1339
1340 Custom filter functions normally should use this marker in the same fashion.
1341 For an example of a filter function that uses @code{process-mark},
1342 @pxref{Process Filter Example}.
1343
1344 When the user is expected to enter input in the process buffer for
1345 transmission to the process, the process marker separates the new input
1346 from previous output.
1347 @end defun
1348
1349 @defun set-process-buffer process buffer
1350 This function sets the buffer associated with @var{process} to
1351 @var{buffer}. If @var{buffer} is @code{nil}, the process becomes
1352 associated with no buffer.
1353 @end defun
1354
1355 @defun get-buffer-process buffer-or-name
1356 This function returns a nondeleted process associated with the buffer
1357 specified by @var{buffer-or-name}. If there are several processes
1358 associated with it, this function chooses one (currently, the one most
1359 recently created, but don't count on that). Deletion of a process
1360 (see @code{delete-process}) makes it ineligible for this function to
1361 return.
1362
1363 It is usually a bad idea to have more than one process associated with
1364 the same buffer.
1365
1366 @smallexample
1367 @group
1368 (get-buffer-process "*shell*")
1369 @result{} #<process shell>
1370 @end group
1371 @end smallexample
1372
1373 Killing the process's buffer deletes the process, which kills the
1374 subprocess with a @code{SIGHUP} signal (@pxref{Signals to Processes}).
1375 @end defun
1376
1377 @node Filter Functions
1378 @subsection Process Filter Functions
1379 @cindex filter function
1380 @cindex process filter
1381
1382 A process @dfn{filter function} is a function that receives the
1383 standard output from the associated process. @emph{All} output from
1384 that process is passed to the filter. The default filter simply
1385 outputs directly to the process buffer.
1386
1387 The filter function can only be called when Emacs is waiting for
1388 something, because process output arrives only at such times. Emacs
1389 waits when reading terminal input (see the function
1390 @code{waiting-for-user-input-p}), in @code{sit-for} and
1391 @code{sleep-for} (@pxref{Waiting}), and in
1392 @code{accept-process-output} (@pxref{Accepting Output}).
1393
1394 A filter function must accept two arguments: the associated process
1395 and a string, which is output just received from it. The function is
1396 then free to do whatever it chooses with the output.
1397
1398 @c Note this text is duplicated in the sentinels section.
1399 Quitting is normally inhibited within a filter function---otherwise,
1400 the effect of typing @kbd{C-g} at command level or to quit a user
1401 command would be unpredictable. If you want to permit quitting inside
1402 a filter function, bind @code{inhibit-quit} to @code{nil}. In most
1403 cases, the right way to do this is with the macro
1404 @code{with-local-quit}. @xref{Quitting}.
1405
1406 If an error happens during execution of a filter function, it is
1407 caught automatically, so that it doesn't stop the execution of whatever
1408 program was running when the filter function was started. However, if
1409 @code{debug-on-error} is non-@code{nil}, errors are not caught.
1410 This makes it possible to use the Lisp debugger to debug the
1411 filter function. @xref{Debugger}.
1412
1413 Many filter functions sometimes (or always) insert the output in the
1414 process's buffer, mimicking the actions of the default filter.
1415 Such filter functions need to make sure that they save the
1416 current buffer, select the correct buffer (if different) before
1417 inserting output, and then restore the original buffer.
1418 They should also check whether the buffer is still alive, update the
1419 process marker, and in some cases update the value of point. Here is
1420 how to do these things:
1421
1422 @anchor{Process Filter Example}
1423 @smallexample
1424 @group
1425 (defun ordinary-insertion-filter (proc string)
1426 (when (buffer-live-p (process-buffer proc))
1427 (with-current-buffer (process-buffer proc)
1428 (let ((moving (= (point) (process-mark proc))))
1429 @end group
1430 @group
1431 (save-excursion
1432 ;; @r{Insert the text, advancing the process marker.}
1433 (goto-char (process-mark proc))
1434 (insert string)
1435 (set-marker (process-mark proc) (point)))
1436 (if moving (goto-char (process-mark proc)))))))
1437 @end group
1438 @end smallexample
1439
1440 To make the filter force the process buffer to be visible whenever new
1441 text arrives, you could insert a line like the following just before the
1442 @code{with-current-buffer} construct:
1443
1444 @smallexample
1445 (display-buffer (process-buffer proc))
1446 @end smallexample
1447
1448 To force point to the end of the new output, no matter where it was
1449 previously, eliminate the variable @code{moving} and call
1450 @code{goto-char} unconditionally.
1451
1452 @ignore
1453 In earlier Emacs versions, every filter function that did regular
1454 expression searching or matching had to explicitly save and restore the
1455 match data. Now Emacs does this automatically for filter functions;
1456 they never need to do it explicitly.
1457 @end ignore
1458 Note that Emacs automatically saves and restores the match data
1459 while executing filter functions. @xref{Match Data}.
1460
1461 The output to the filter may come in chunks of any size. A program
1462 that produces the same output twice in a row may send it as one batch of
1463 200 characters one time, and five batches of 40 characters the next. If
1464 the filter looks for certain text strings in the subprocess output, make
1465 sure to handle the case where one of these strings is split across two
1466 or more batches of output; one way to do this is to insert the
1467 received text into a temporary buffer, which can then be searched.
1468
1469 @defun set-process-filter process filter
1470 This function gives @var{process} the filter function @var{filter}. If
1471 @var{filter} is @code{nil}, it gives the process the default filter,
1472 which inserts the process output into the process buffer.
1473 @end defun
1474
1475 @defun process-filter process
1476 This function returns the filter function of @var{process}.
1477 @end defun
1478
1479 In case the process's output needs to be passed to several filters, you can
1480 use @code{add-function} to combine an existing filter with a new one.
1481 @xref{Advising Functions}.
1482
1483 Here is an example of the use of a filter function:
1484
1485 @smallexample
1486 @group
1487 (defun keep-output (process output)
1488 (setq kept (cons output kept)))
1489 @result{} keep-output
1490 @end group
1491 @group
1492 (setq kept nil)
1493 @result{} nil
1494 @end group
1495 @group
1496 (set-process-filter (get-process "shell") 'keep-output)
1497 @result{} keep-output
1498 @end group
1499 @group
1500 (process-send-string "shell" "ls ~/other\n")
1501 @result{} nil
1502 kept
1503 @result{} ("lewis@@slug:$ "
1504 @end group
1505 @group
1506 "FINAL-W87-SHORT.MSS backup.otl kolstad.mss~
1507 address.txt backup.psf kolstad.psf
1508 backup.bib~ david.mss resume-Dec-86.mss~
1509 backup.err david.psf resume-Dec.psf
1510 backup.mss dland syllabus.mss
1511 "
1512 "#backups.mss# backup.mss~ kolstad.mss
1513 ")
1514 @end group
1515 @end smallexample
1516
1517 @ignore @c The code in this example doesn't show the right way to do things.
1518 Here is another, more realistic example, which demonstrates how to use
1519 the process mark to do insertion in the same fashion as the default filter:
1520
1521 @smallexample
1522 @group
1523 ;; @r{Insert input in the buffer specified by @code{my-shell-buffer}}
1524 ;; @r{and make sure that buffer is shown in some window.}
1525 (defun my-process-filter (proc str)
1526 (let ((cur (selected-window))
1527 (pop-up-windows t))
1528 (pop-to-buffer my-shell-buffer)
1529 @end group
1530 @group
1531 (goto-char (point-max))
1532 (insert str)
1533 (set-marker (process-mark proc) (point-max))
1534 (select-window cur)))
1535 @end group
1536 @end smallexample
1537 @end ignore
1538
1539 @node Decoding Output
1540 @subsection Decoding Process Output
1541 @cindex decode process output
1542
1543 When Emacs writes process output directly into a multibyte buffer,
1544 it decodes the output according to the process output coding system.
1545 If the coding system is @code{raw-text} or @code{no-conversion}, Emacs
1546 converts the unibyte output to multibyte using
1547 @code{string-to-multibyte}, and inserts the resulting multibyte text.
1548
1549 You can use @code{set-process-coding-system} to specify which coding
1550 system to use (@pxref{Process Information}). Otherwise, the coding
1551 system comes from @code{coding-system-for-read}, if that is
1552 non-@code{nil}; or else from the defaulting mechanism (@pxref{Default
1553 Coding Systems}). If the text output by a process contains null
1554 bytes, Emacs by default uses @code{no-conversion} for it; see
1555 @ref{Lisp and Coding Systems, inhibit-null-byte-detection}, for how to
1556 control this behavior.
1557
1558 @strong{Warning:} Coding systems such as @code{undecided}, which
1559 determine the coding system from the data, do not work entirely
1560 reliably with asynchronous subprocess output. This is because Emacs
1561 has to process asynchronous subprocess output in batches, as it
1562 arrives. Emacs must try to detect the proper coding system from one
1563 batch at a time, and this does not always work. Therefore, if at all
1564 possible, specify a coding system that determines both the character
1565 code conversion and the end of line conversion---that is, one like
1566 @code{latin-1-unix}, rather than @code{undecided} or @code{latin-1}.
1567
1568 @c Let's keep the index entries that were there for
1569 @c set-process-filter-multibyte and process-filter-multibyte-p,
1570 @cindex filter multibyte flag, of process
1571 @cindex process filter multibyte flag
1572 When Emacs calls a process filter function, it provides the process
1573 output as a multibyte string or as a unibyte string according to the
1574 process's filter coding system. Emacs
1575 decodes the output according to the process output coding system,
1576 which usually produces a multibyte string, except for coding systems
1577 such as @code{binary} and @code{raw-text}.
1578
1579 @node Accepting Output
1580 @subsection Accepting Output from Processes
1581 @cindex accept input from processes
1582
1583 Output from asynchronous subprocesses normally arrives only while
1584 Emacs is waiting for some sort of external event, such as elapsed time
1585 or terminal input. Occasionally it is useful in a Lisp program to
1586 explicitly permit output to arrive at a specific point, or even to wait
1587 until output arrives from a process.
1588
1589 @defun accept-process-output &optional process seconds millisec just-this-one
1590 This function allows Emacs to read pending output from processes. The
1591 output is given to their filter functions. If @var{process} is
1592 non-@code{nil} then this function does not return until some output
1593 has been received from @var{process}.
1594
1595 The arguments @var{seconds} and @var{millisec} let you specify timeout
1596 periods. The former specifies a period measured in seconds and the
1597 latter specifies one measured in milliseconds. The two time periods
1598 thus specified are added together, and @code{accept-process-output}
1599 returns after that much time, even if there is no
1600 subprocess output.
1601
1602 The argument @var{millisec} is obsolete (and should not be used),
1603 because @var{seconds} can be floating point to specify
1604 waiting a fractional number of seconds. If @var{seconds} is 0, the
1605 function accepts whatever output is pending but does not wait.
1606
1607 @c Emacs 22.1 feature
1608 If @var{process} is a process, and the argument @var{just-this-one} is
1609 non-@code{nil}, only output from that process is handled, suspending output
1610 from other processes until some output has been received from that
1611 process or the timeout expires. If @var{just-this-one} is an integer,
1612 also inhibit running timers. This feature is generally not
1613 recommended, but may be necessary for specific applications, such as
1614 speech synthesis.
1615
1616 The function @code{accept-process-output} returns non-@code{nil} if it
1617 got output from @var{process}, or from any process if @var{process} is
1618 @code{nil}. It returns @code{nil} if the timeout expired before output
1619 arrived.
1620 @end defun
1621
1622 @node Sentinels
1623 @section Sentinels: Detecting Process Status Changes
1624 @cindex process sentinel
1625 @cindex sentinel (of process)
1626
1627 A @dfn{process sentinel} is a function that is called whenever the
1628 associated process changes status for any reason, including signals
1629 (whether sent by Emacs or caused by the process's own actions) that
1630 terminate, stop, or continue the process. The process sentinel is
1631 also called if the process exits. The sentinel receives two
1632 arguments: the process for which the event occurred, and a string
1633 describing the type of event.
1634
1635 The string describing the event looks like one of the following:
1636
1637 @c FIXME? Also "killed\n" - see example below?
1638 @itemize @bullet
1639 @item
1640 @code{"finished\n"}.
1641
1642 @item
1643 @code{"exited abnormally with code @var{exitcode}\n"}.
1644
1645 @item
1646 @code{"@var{name-of-signal}\n"}.
1647
1648 @item
1649 @code{"@var{name-of-signal} (core dumped)\n"}.
1650 @end itemize
1651
1652 A sentinel runs only while Emacs is waiting (e.g., for terminal
1653 input, or for time to elapse, or for process output). This avoids the
1654 timing errors that could result from running sentinels at random places in
1655 the middle of other Lisp programs. A program can wait, so that
1656 sentinels will run, by calling @code{sit-for} or @code{sleep-for}
1657 (@pxref{Waiting}), or @code{accept-process-output} (@pxref{Accepting
1658 Output}). Emacs also allows sentinels to run when the command loop is
1659 reading input. @code{delete-process} calls the sentinel when it
1660 terminates a running process.
1661
1662 Emacs does not keep a queue of multiple reasons to call the sentinel
1663 of one process; it records just the current status and the fact that
1664 there has been a change. Therefore two changes in status, coming in
1665 quick succession, can call the sentinel just once. However, process
1666 termination will always run the sentinel exactly once. This is
1667 because the process status can't change again after termination.
1668
1669 Emacs explicitly checks for output from the process before running
1670 the process sentinel. Once the sentinel runs due to process
1671 termination, no further output can arrive from the process.
1672
1673 A sentinel that writes the output into the buffer of the process
1674 should check whether the buffer is still alive. If it tries to insert
1675 into a dead buffer, it will get an error. If the buffer is dead,
1676 @code{(buffer-name (process-buffer @var{process}))} returns @code{nil}.
1677
1678 @c Note this text is duplicated in the filter functions section.
1679 Quitting is normally inhibited within a sentinel---otherwise, the
1680 effect of typing @kbd{C-g} at command level or to quit a user command
1681 would be unpredictable. If you want to permit quitting inside a
1682 sentinel, bind @code{inhibit-quit} to @code{nil}. In most cases, the
1683 right way to do this is with the macro @code{with-local-quit}.
1684 @xref{Quitting}.
1685
1686 If an error happens during execution of a sentinel, it is caught
1687 automatically, so that it doesn't stop the execution of whatever
1688 programs was running when the sentinel was started. However, if
1689 @code{debug-on-error} is non-@code{nil}, errors are not caught.
1690 This makes it possible to use the Lisp debugger to debug the
1691 sentinel. @xref{Debugger}.
1692
1693 While a sentinel is running, the process sentinel is temporarily
1694 set to @code{nil} so that the sentinel won't run recursively.
1695 For this reason it is not possible for a sentinel to specify
1696 a new sentinel.
1697
1698 @ignore
1699 In earlier Emacs versions, every sentinel that did regular expression
1700 searching or matching had to explicitly save and restore the match data.
1701 Now Emacs does this automatically for sentinels; they never need to do
1702 it explicitly.
1703 @end ignore
1704 Note that Emacs automatically saves and restores the match data
1705 while executing sentinels. @xref{Match Data}.
1706
1707 @defun set-process-sentinel process sentinel
1708 This function associates @var{sentinel} with @var{process}. If
1709 @var{sentinel} is @code{nil}, then the process will have the default
1710 sentinel, which inserts a message in the process's buffer when the
1711 process status changes.
1712
1713 Changes in process sentinels take effect immediately---if the sentinel
1714 is slated to be run but has not been called yet, and you specify a new
1715 sentinel, the eventual call to the sentinel will use the new one.
1716
1717 @smallexample
1718 @group
1719 (defun msg-me (process event)
1720 (princ
1721 (format "Process: %s had the event '%s'" process event)))
1722 (set-process-sentinel (get-process "shell") 'msg-me)
1723 @result{} msg-me
1724 @end group
1725 @group
1726 (kill-process (get-process "shell"))
1727 @print{} Process: #<process shell> had the event 'killed'
1728 @result{} #<process shell>
1729 @end group
1730 @end smallexample
1731 @end defun
1732
1733 @defun process-sentinel process
1734 This function returns the sentinel of @var{process}.
1735 @end defun
1736
1737 In case a process status changes need to be passed to several sentinels, you
1738 can use @code{add-function} to combine an existing sentinel with a new one.
1739 @xref{Advising Functions}.
1740
1741 @defun waiting-for-user-input-p
1742 While a sentinel or filter function is running, this function returns
1743 non-@code{nil} if Emacs was waiting for keyboard input from the user at
1744 the time the sentinel or filter function was called, or @code{nil} if it
1745 was not.
1746 @end defun
1747
1748 @node Query Before Exit
1749 @section Querying Before Exit
1750
1751 When Emacs exits, it terminates all its subprocesses by sending them
1752 the @code{SIGHUP} signal. Because subprocesses may be doing
1753 valuable work, Emacs normally asks the user to confirm that it is ok
1754 to terminate them. Each process has a query flag, which, if
1755 non-@code{nil}, says that Emacs should ask for confirmation before
1756 exiting and thus killing that process. The default for the query flag
1757 is @code{t}, meaning @emph{do} query.
1758
1759 @defun process-query-on-exit-flag process
1760 This returns the query flag of @var{process}.
1761 @end defun
1762
1763 @defun set-process-query-on-exit-flag process flag
1764 This function sets the query flag of @var{process} to @var{flag}. It
1765 returns @var{flag}.
1766
1767 Here is an example of using @code{set-process-query-on-exit-flag} on a
1768 shell process to avoid querying:
1769
1770 @smallexample
1771 @group
1772 (set-process-query-on-exit-flag (get-process "shell") nil)
1773 @result{} nil
1774 @end group
1775 @end smallexample
1776 @end defun
1777
1778 @node System Processes
1779 @section Accessing Other Processes
1780 @cindex system processes
1781
1782 In addition to accessing and manipulating processes that are
1783 subprocesses of the current Emacs session, Emacs Lisp programs can
1784 also access other processes running on the same machine. We call
1785 these @dfn{system processes}, to distinguish them from Emacs
1786 subprocesses.
1787
1788 Emacs provides several primitives for accessing system processes.
1789 Not all platforms support these primitives; on those which don't,
1790 these primitives return @code{nil}.
1791
1792 @defun list-system-processes
1793 This function returns a list of all the processes running on the
1794 system. Each process is identified by its @acronym{PID}, a numerical
1795 process ID that is assigned by the OS and distinguishes the process
1796 from all the other processes running on the same machine at the same
1797 time.
1798 @end defun
1799
1800 @defun process-attributes pid
1801 This function returns an alist of attributes for the process specified
1802 by its process ID @var{pid}. Each association in the alist is of the
1803 form @code{(@var{key} . @var{value})}, where @var{key} designates the
1804 attribute and @var{value} is the value of that attribute. The various
1805 attribute @var{key}s that this function can return are listed below.
1806 Not all platforms support all of these attributes; if an attribute is
1807 not supported, its association will not appear in the returned alist.
1808 Values that are numbers can be either integer or floating point,
1809 depending on the magnitude of the value.
1810
1811 @table @code
1812 @item euid
1813 The effective user ID of the user who invoked the process. The
1814 corresponding @var{value} is a number. If the process was invoked by
1815 the same user who runs the current Emacs session, the value is
1816 identical to what @code{user-uid} returns (@pxref{User
1817 Identification}).
1818
1819 @item user
1820 User name corresponding to the process's effective user ID, a string.
1821
1822 @item egid
1823 The group ID of the effective user ID, a number.
1824
1825 @item group
1826 Group name corresponding to the effective user's group ID, a string.
1827
1828 @item comm
1829 The name of the command that runs in the process. This is a string
1830 that usually specifies the name of the executable file of the process,
1831 without the leading directories. However, some special system
1832 processes can report strings that do not correspond to an executable
1833 file of a program.
1834
1835 @item state
1836 The state code of the process. This is a short string that encodes
1837 the scheduling state of the process. Here's a list of the most
1838 frequently seen codes:
1839
1840 @table @code
1841 @item "D"
1842 uninterruptible sleep (usually I/O)
1843 @item "R"
1844 running
1845 @item "S"
1846 interruptible sleep (waiting for some event)
1847 @item "T"
1848 stopped, e.g., by a job control signal
1849 @item "Z"
1850 zombie: a process that terminated, but was not reaped by its parent
1851 @end table
1852
1853 @noindent
1854 For the full list of the possible states, see the manual page of the
1855 @command{ps} command.
1856
1857 @item ppid
1858 The process ID of the parent process, a number.
1859
1860 @item pgrp
1861 The process group ID of the process, a number.
1862
1863 @item sess
1864 The session ID of the process. This is a number that is the process
1865 ID of the process's @dfn{session leader}.
1866
1867 @item ttname
1868 A string that is the name of the process's controlling terminal. On
1869 Unix and GNU systems, this is normally the file name of the
1870 corresponding terminal device, such as @file{/dev/pts65}.
1871
1872 @item tpgid
1873 The numerical process group ID of the foreground process group that
1874 uses the process's terminal.
1875
1876 @item minflt
1877 The number of minor page faults caused by the process since its
1878 beginning. (Minor page faults are those that don't involve reading
1879 from disk.)
1880
1881 @item majflt
1882 The number of major page faults caused by the process since its
1883 beginning. (Major page faults require a disk to be read, and are thus
1884 more expensive than minor page faults.)
1885
1886 @item cminflt
1887 @itemx cmajflt
1888 Like @code{minflt} and @code{majflt}, but include the number of page
1889 faults for all the child processes of the given process.
1890
1891 @item utime
1892 Time spent by the process in the user context, for running the
1893 application's code. The corresponding @var{value} is in the
1894 @w{@code{(@var{high} @var{low} @var{microsec} @var{picosec})}} format, the same
1895 format used by functions @code{current-time} (@pxref{Time of Day,
1896 current-time}) and @code{file-attributes} (@pxref{File Attributes}).
1897
1898 @item stime
1899 Time spent by the process in the system (kernel) context, for
1900 processing system calls. The corresponding @var{value} is in the same
1901 format as for @code{utime}.
1902
1903 @item time
1904 The sum of @code{utime} and @code{stime}. The corresponding
1905 @var{value} is in the same format as for @code{utime}.
1906
1907 @item cutime
1908 @itemx cstime
1909 @itemx ctime
1910 Like @code{utime}, @code{stime}, and @code{time}, but include the
1911 times of all the child processes of the given process.
1912
1913 @item pri
1914 The numerical priority of the process.
1915
1916 @item nice
1917 The @dfn{nice value} of the process, a number. (Processes with smaller
1918 nice values get scheduled more favorably.)
1919
1920 @item thcount
1921 The number of threads in the process.
1922
1923 @item start
1924 The time when the process was started, in the same
1925 @code{(@var{high} @var{low} @var{microsec} @var{picosec})} format used by
1926 @code{file-attributes} and @code{current-time}.
1927
1928 @item etime
1929 The time elapsed since the process started, in the format @code{(@var{high}
1930 @var{low} @var{microsec} @var{picosec})}.
1931
1932 @item vsize
1933 The virtual memory size of the process, measured in kilobytes.
1934
1935 @item rss
1936 The size of the process's @dfn{resident set}, the number of kilobytes
1937 occupied by the process in the machine's physical memory.
1938
1939 @item pcpu
1940 The percentage of the CPU time used by the process since it started.
1941 The corresponding @var{value} is a floating-point number between 0 and
1942 100.
1943
1944 @item pmem
1945 The percentage of the total physical memory installed on the machine
1946 used by the process's resident set. The value is a floating-point
1947 number between 0 and 100.
1948
1949 @item args
1950 The command-line with which the process was invoked. This is a string
1951 in which individual command-line arguments are separated by blanks;
1952 whitespace characters that are embedded in the arguments are quoted as
1953 appropriate for the system's shell: escaped by backslash characters on
1954 GNU and Unix, and enclosed in double quote characters on Windows.
1955 Thus, this command-line string can be directly used in primitives such
1956 as @code{shell-command}.
1957 @end table
1958
1959 @end defun
1960
1961
1962 @node Transaction Queues
1963 @section Transaction Queues
1964 @cindex transaction queue
1965
1966 @c That's not very informative. What is a transaction, and when might
1967 @c I want to use one?
1968 You can use a @dfn{transaction queue} to communicate with a subprocess
1969 using transactions. First use @code{tq-create} to create a transaction
1970 queue communicating with a specified process. Then you can call
1971 @code{tq-enqueue} to send a transaction.
1972
1973 @defun tq-create process
1974 This function creates and returns a transaction queue communicating with
1975 @var{process}. The argument @var{process} should be a subprocess
1976 capable of sending and receiving streams of bytes. It may be a child
1977 process, or it may be a TCP connection to a server, possibly on another
1978 machine.
1979 @end defun
1980
1981 @defun tq-enqueue queue question regexp closure fn &optional delay-question
1982 This function sends a transaction to queue @var{queue}. Specifying the
1983 queue has the effect of specifying the subprocess to talk to.
1984
1985 The argument @var{question} is the outgoing message that starts the
1986 transaction. The argument @var{fn} is the function to call when the
1987 corresponding answer comes back; it is called with two arguments:
1988 @var{closure}, and the answer received.
1989
1990 The argument @var{regexp} is a regular expression that should match
1991 text at the end of the entire answer, but nothing before; that's how
1992 @code{tq-enqueue} determines where the answer ends.
1993
1994 If the argument @var{delay-question} is non-@code{nil}, delay sending
1995 this question until the process has finished replying to any previous
1996 questions. This produces more reliable results with some processes.
1997 @ignore
1998
1999 @c Let's not mention it then.
2000 The return value of @code{tq-enqueue} itself is not meaningful.
2001 @end ignore
2002 @end defun
2003
2004 @defun tq-close queue
2005 Shut down transaction queue @var{queue}, waiting for all pending transactions
2006 to complete, and then terminate the connection or child process.
2007 @end defun
2008
2009 Transaction queues are implemented by means of a filter function.
2010 @xref{Filter Functions}.
2011
2012 @node Network
2013 @section Network Connections
2014 @cindex network connection
2015 @cindex TCP
2016 @cindex UDP
2017
2018 Emacs Lisp programs can open stream (TCP) and datagram (UDP) network
2019 connections (@pxref{Datagrams}) to other processes on the same machine
2020 or other machines.
2021 A network connection is handled by Lisp much like a subprocess, and is
2022 represented by a process object. However, the process you are
2023 communicating with is not a child of the Emacs process, has no
2024 process @acronym{ID}, and you can't kill it or send it signals. All you
2025 can do is send and receive data. @code{delete-process} closes the
2026 connection, but does not kill the program at the other end; that
2027 program must decide what to do about closure of the connection.
2028
2029 Lisp programs can listen for connections by creating network
2030 servers. A network server is also represented by a kind of process
2031 object, but unlike a network connection, the network server never
2032 transfers data itself. When it receives a connection request, it
2033 creates a new network connection to represent the connection just
2034 made. (The network connection inherits certain information, including
2035 the process plist, from the server.) The network server then goes
2036 back to listening for more connection requests.
2037
2038 Network connections and servers are created by calling
2039 @code{make-network-process} with an argument list consisting of
2040 keyword/argument pairs, for example @code{:server t} to create a
2041 server process, or @code{:type 'datagram} to create a datagram
2042 connection. @xref{Low-Level Network}, for details. You can also use
2043 the @code{open-network-stream} function described below.
2044
2045 To distinguish the different types of processes, the
2046 @code{process-type} function returns the symbol @code{network} for a
2047 network connection or server, @code{serial} for a serial port
2048 connection, or @code{real} for a real subprocess.
2049
2050 The @code{process-status} function returns @code{open},
2051 @code{closed}, @code{connect}, or @code{failed} for network
2052 connections. For a network server, the status is always
2053 @code{listen}. None of those values is possible for a real
2054 subprocess. @xref{Process Information}.
2055
2056 You can stop and resume operation of a network process by calling
2057 @code{stop-process} and @code{continue-process}. For a server
2058 process, being stopped means not accepting new connections. (Up to 5
2059 connection requests will be queued for when you resume the server; you
2060 can increase this limit, unless it is imposed by the operating
2061 system---see the @code{:server} keyword of @code{make-network-process},
2062 @ref{Network Processes}.) For a network stream connection, being
2063 stopped means not processing input (any arriving input waits until you
2064 resume the connection). For a datagram connection, some number of
2065 packets may be queued but input may be lost. You can use the function
2066 @code{process-command} to determine whether a network connection or
2067 server is stopped; a non-@code{nil} value means yes.
2068
2069 @cindex network connection, encrypted
2070 @cindex encrypted network connections
2071 @cindex @acronym{TLS} network connections
2072 @cindex @acronym{STARTTLS} network connections
2073 Emacs can create encrypted network connections, using either built-in
2074 or external support. The built-in support uses the GnuTLS
2075 Transport Layer Security Library; see
2076 @uref{http://www.gnu.org/software/gnutls/, the GnuTLS project page}.
2077 If your Emacs was compiled with GnuTLS support, the function
2078 @code{gnutls-available-p} is defined and returns non-@code{nil}. For
2079 more details, @pxref{Top,, Overview, emacs-gnutls, The Emacs-GnuTLS manual}.
2080 The external support uses the @file{starttls.el} library, which
2081 requires a helper utility such as @command{gnutls-cli} to be installed
2082 on the system. The @code{open-network-stream} function can
2083 transparently handle the details of creating encrypted connections for
2084 you, using whatever support is available.
2085
2086 @defun open-network-stream name buffer host service &rest parameters
2087 This function opens a TCP connection, with optional encryption, and
2088 returns a process object that represents the connection.
2089
2090 The @var{name} argument specifies the name for the process object. It
2091 is modified as necessary to make it unique.
2092
2093 The @var{buffer} argument is the buffer to associate with the
2094 connection. Output from the connection is inserted in the buffer,
2095 unless you specify your own filter function to handle the output. If
2096 @var{buffer} is @code{nil}, it means that the connection is not
2097 associated with any buffer.
2098
2099 The arguments @var{host} and @var{service} specify where to connect to;
2100 @var{host} is the host name (a string), and @var{service} is the name of
2101 a defined network service (a string) or a port number (an integer).
2102
2103 The remaining arguments @var{parameters} are keyword/argument pairs
2104 that are mainly relevant to encrypted connections:
2105
2106 @table @code
2107
2108 @item :nowait @var{boolean}
2109 If non-@code{nil}, try to make an asynchronous connection.
2110
2111 @item :type @var{type}
2112 The type of connection. Options are:
2113
2114 @table @code
2115 @item plain
2116 An ordinary, unencrypted connection.
2117 @item tls
2118 @itemx ssl
2119 A @acronym{TLS} (Transport Layer Security) connection.
2120 @item nil
2121 @itemx network
2122 Start with a plain connection, and if parameters @samp{:success}
2123 and @samp{:capability-command} are supplied, try to upgrade to an encrypted
2124 connection via @acronym{STARTTLS}. If that fails, retain the
2125 unencrypted connection.
2126 @item starttls
2127 As for @code{nil}, but if @acronym{STARTTLS} fails drop the connection.
2128 @item shell
2129 A shell connection.
2130 @end table
2131
2132 @item :always-query-capabilities @var{boolean}
2133 If non-@code{nil}, always ask for the server's capabilities, even when
2134 doing a @samp{plain} connection.
2135
2136 @item :capability-command @var{capability-command}
2137 Command string to query the host capabilities.
2138
2139 @item :end-of-command @var{regexp}
2140 @itemx :end-of-capability @var{regexp}
2141 Regular expression matching the end of a command, or the end of the
2142 command @var{capability-command}. The latter defaults to the former.
2143
2144 @item :starttls-function @var{function}
2145 Function of one argument (the response to @var{capability-command}),
2146 which returns either @code{nil}, or the command to activate @acronym{STARTTLS}
2147 if supported.
2148
2149 @item :success @var{regexp}
2150 Regular expression matching a successful @acronym{STARTTLS} negotiation.
2151
2152 @item :use-starttls-if-possible @var{boolean}
2153 If non-@code{nil}, do opportunistic @acronym{STARTTLS} upgrades even if Emacs
2154 doesn't have built-in @acronym{TLS} support.
2155
2156 @item :warn-unless-encrypted @var{boolean}
2157 If non-@code{nil}, and @code{:return-value} is also non-@code{nil},
2158 Emacs will warn if the connection isn't encrypted. This is useful for
2159 protocols like @acronym{IMAP} and the like, where most users would
2160 expect the network traffic to be encrypted.
2161
2162 @item :client-certificate @var{list-or-t}
2163 Either a list of the form @code{(@var{key-file} @var{cert-file})},
2164 naming the certificate key file and certificate file itself, or
2165 @code{t}, meaning to query @code{auth-source} for this information
2166 (@pxref{Top,,Overview, auth, The Auth-Source Manual}).
2167 Only used for @acronym{TLS} or @acronym{STARTTLS}.
2168
2169 @item :return-list @var{cons-or-nil}
2170 The return value of this function. If omitted or @code{nil}, return a
2171 process object. Otherwise, a cons of the form @code{(@var{process-object}
2172 . @var{plist})}, where @var{plist} has keywords:
2173
2174 @table @code
2175 @item :greeting @var{string-or-nil}
2176 If non-@code{nil}, the greeting string returned by the host.
2177 @item :capabilities @var{string-or-nil}
2178 If non-@code{nil}, the host's capability string.
2179 @item :type @var{symbol}
2180 The connection type: @samp{plain} or @samp{tls}.
2181 @end table
2182
2183 @end table
2184
2185 @end defun
2186
2187
2188 @node Network Servers
2189 @section Network Servers
2190 @cindex network servers
2191
2192 You create a server by calling @code{make-network-process}
2193 (@pxref{Network Processes}) with @code{:server t}. The server will
2194 listen for connection requests from clients. When it accepts a client
2195 connection request, that creates a new network connection, itself a
2196 process object, with the following parameters:
2197
2198 @itemize @bullet
2199 @item
2200 The connection's process name is constructed by concatenating the
2201 server process's @var{name} with a client identification string. The
2202 @c FIXME? What about IPv6? Say briefly what the difference is?
2203 client identification string for an IPv4 connection looks like
2204 @samp{<@var{a}.@var{b}.@var{c}.@var{d}:@var{p}>}, which represents an
2205 address and port number. Otherwise, it is a
2206 unique number in brackets, as in @samp{<@var{nnn}>}. The number
2207 is unique for each connection in the Emacs session.
2208
2209 @item
2210 If the server has a non-default filter, the connection process does
2211 not get a separate process buffer; otherwise, Emacs creates a new
2212 buffer for the purpose. The buffer name is the server's buffer name
2213 or process name, concatenated with the client identification string.
2214
2215 The server's process buffer value is never used directly, but the log
2216 function can retrieve it and use it to log connections by inserting
2217 text there.
2218
2219 @item
2220 The communication type and the process filter and sentinel are
2221 inherited from those of the server. The server never directly
2222 uses its filter and sentinel; their sole purpose is to initialize
2223 connections made to the server.
2224
2225 @item
2226 The connection's process contact information is set according to the client's
2227 addressing information (typically an IP address and a port number).
2228 This information is associated with the @code{process-contact}
2229 keywords @code{:host}, @code{:service}, @code{:remote}.
2230
2231 @item
2232 The connection's local address is set up according to the port
2233 number used for the connection.
2234
2235 @item
2236 The client process's plist is initialized from the server's plist.
2237 @end itemize
2238
2239 @node Datagrams
2240 @section Datagrams
2241 @cindex datagrams
2242
2243 A @dfn{datagram} connection communicates with individual packets rather
2244 than streams of data. Each call to @code{process-send} sends one
2245 datagram packet (@pxref{Input to Processes}), and each datagram
2246 received results in one call to the filter function.
2247
2248 The datagram connection doesn't have to talk with the same remote
2249 peer all the time. It has a @dfn{remote peer address} which specifies
2250 where to send datagrams to. Each time an incoming datagram is passed
2251 to the filter function, the peer address is set to the address that
2252 datagram came from; that way, if the filter function sends a datagram,
2253 it will go back to that place. You can specify the remote peer
2254 address when you create the datagram connection using the
2255 @code{:remote} keyword. You can change it later on by calling
2256 @code{set-process-datagram-address}.
2257
2258 @defun process-datagram-address process
2259 If @var{process} is a datagram connection or server, this function
2260 returns its remote peer address.
2261 @end defun
2262
2263 @defun set-process-datagram-address process address
2264 If @var{process} is a datagram connection or server, this function
2265 sets its remote peer address to @var{address}.
2266 @end defun
2267
2268 @node Low-Level Network
2269 @section Low-Level Network Access
2270
2271 You can also create network connections by operating at a lower
2272 level than that of @code{open-network-stream}, using
2273 @code{make-network-process}.
2274
2275 @menu
2276 * Proc: Network Processes. Using @code{make-network-process}.
2277 * Options: Network Options. Further control over network connections.
2278 * Features: Network Feature Testing.
2279 Determining which network features work on
2280 the machine you are using.
2281 @end menu
2282
2283 @node Network Processes
2284 @subsection @code{make-network-process}
2285
2286 The basic function for creating network connections and network
2287 servers is @code{make-network-process}. It can do either of those
2288 jobs, depending on the arguments you give it.
2289
2290 @defun make-network-process &rest args
2291 This function creates a network connection or server and returns the
2292 process object that represents it. The arguments @var{args} are a
2293 list of keyword/argument pairs. Omitting a keyword is always
2294 equivalent to specifying it with value @code{nil}, except for
2295 @code{:coding}, @code{:filter-multibyte}, and @code{:reuseaddr}. Here
2296 are the meaningful keywords (those corresponding to network options
2297 are listed in the following section):
2298
2299 @table @asis
2300 @item :name @var{name}
2301 Use the string @var{name} as the process name. It is modified if
2302 necessary to make it unique.
2303
2304 @item :type @var{type}
2305 Specify the communication type. A value of @code{nil} specifies a
2306 stream connection (the default); @code{datagram} specifies a datagram
2307 connection; @code{seqpacket} specifies a sequenced packet stream
2308 connection. Both connections and servers can be of these types.
2309
2310 @item :server @var{server-flag}
2311 If @var{server-flag} is non-@code{nil}, create a server. Otherwise,
2312 create a connection. For a stream type server, @var{server-flag} may
2313 be an integer, which then specifies the length of the queue of pending
2314 connections to the server. The default queue length is 5.
2315
2316 @item :host @var{host}
2317 Specify the host to connect to. @var{host} should be a host name or
2318 Internet address, as a string, or the symbol @code{local} to specify
2319 the local host. If you specify @var{host} for a server, it must
2320 specify a valid address for the local host, and only clients
2321 connecting to that address will be accepted.
2322
2323 @item :service @var{service}
2324 @var{service} specifies a port number to connect to; or, for a server,
2325 the port number to listen on. It should be a service name that
2326 translates to a port number, or an integer specifying the port number
2327 directly. For a server, it can also be @code{t}, which means to let
2328 the system select an unused port number.
2329
2330 @item :family @var{family}
2331 @var{family} specifies the address (and protocol) family for
2332 communication. @code{nil} means determine the proper address family
2333 automatically for the given @var{host} and @var{service}.
2334 @code{local} specifies a Unix socket, in which case @var{host} is
2335 ignored. @code{ipv4} and @code{ipv6} specify to use IPv4 and IPv6,
2336 respectively.
2337
2338 @item :local @var{local-address}
2339 For a server process, @var{local-address} is the address to listen on.
2340 It overrides @var{family}, @var{host} and @var{service}, so you
2341 might as well not specify them.
2342
2343 @item :remote @var{remote-address}
2344 For a connection, @var{remote-address} is the address to connect to.
2345 It overrides @var{family}, @var{host} and @var{service}, so you
2346 might as well not specify them.
2347
2348 For a datagram server, @var{remote-address} specifies the initial
2349 setting of the remote datagram address.
2350
2351 The format of @var{local-address} or @var{remote-address} depends on
2352 the address family:
2353
2354 @itemize -
2355 @item
2356 An IPv4 address is represented as a five-element vector of four 8-bit
2357 integers and one 16-bit integer
2358 @code{[@var{a} @var{b} @var{c} @var{d} @var{p}]} corresponding to
2359 numeric IPv4 address @var{a}.@var{b}.@var{c}.@var{d} and port number
2360 @var{p}.
2361
2362 @item
2363 An IPv6 address is represented as a nine-element vector of 16-bit
2364 integers @code{[@var{a} @var{b} @var{c} @var{d} @var{e} @var{f}
2365 @var{g} @var{h} @var{p}]} corresponding to numeric IPv6 address
2366 @var{a}:@var{b}:@var{c}:@var{d}:@var{e}:@var{f}:@var{g}:@var{h} and
2367 port number @var{p}.
2368
2369 @item
2370 A local address is represented as a string, which specifies the address
2371 in the local address space.
2372
2373 @item
2374 An unsupported-family address is represented by a cons
2375 @code{(@var{f} . @var{av})}, where @var{f} is the family number and
2376 @var{av} is a vector specifying the socket address using one element
2377 per address data byte. Do not rely on this format in portable code,
2378 as it may depend on implementation defined constants, data sizes, and
2379 data structure alignment.
2380 @end itemize
2381
2382 @item :nowait @var{bool}
2383 If @var{bool} is non-@code{nil} for a stream connection, return
2384 without waiting for the connection to complete. When the connection
2385 succeeds or fails, Emacs will call the sentinel function, with a
2386 second argument matching @code{"open"} (if successful) or
2387 @code{"failed"}. The default is to block, so that
2388 @code{make-network-process} does not return until the connection
2389 has succeeded or failed.
2390
2391 @item :stop @var{stopped}
2392 If @var{stopped} is non-@code{nil}, start the network connection or
2393 server in the stopped state.
2394
2395 @item :buffer @var{buffer}
2396 Use @var{buffer} as the process buffer.
2397
2398 @item :coding @var{coding}
2399 Use @var{coding} as the coding system for this process. To specify
2400 different coding systems for decoding data from the connection and for
2401 encoding data sent to it, specify @code{(@var{decoding} .
2402 @var{encoding})} for @var{coding}.
2403
2404 If you don't specify this keyword at all, the default
2405 is to determine the coding systems from the data.
2406
2407 @item :noquery @var{query-flag}
2408 Initialize the process query flag to @var{query-flag}.
2409 @xref{Query Before Exit}.
2410
2411 @item :filter @var{filter}
2412 Initialize the process filter to @var{filter}.
2413
2414 @item :filter-multibyte @var{multibyte}
2415 If @var{multibyte} is non-@code{nil}, strings given to the process
2416 filter are multibyte, otherwise they are unibyte. The default is the
2417 default value of @code{enable-multibyte-characters}.
2418
2419 @item :sentinel @var{sentinel}
2420 Initialize the process sentinel to @var{sentinel}.
2421
2422 @item :log @var{log}
2423 Initialize the log function of a server process to @var{log}. The log
2424 function is called each time the server accepts a network connection
2425 from a client. The arguments passed to the log function are
2426 @var{server}, @var{connection}, and @var{message}; where @var{server}
2427 is the server process, @var{connection} is the new process for the
2428 connection, and @var{message} is a string describing what has
2429 happened.
2430
2431 @item :plist @var{plist}
2432 Initialize the process plist to @var{plist}.
2433 @end table
2434
2435 The original argument list, modified with the actual connection
2436 information, is available via the @code{process-contact} function.
2437 @end defun
2438
2439 @node Network Options
2440 @subsection Network Options
2441
2442 The following network options can be specified when you create a
2443 network process. Except for @code{:reuseaddr}, you can also set or
2444 modify these options later, using @code{set-network-process-option}.
2445
2446 For a server process, the options specified with
2447 @code{make-network-process} are not inherited by the client
2448 connections, so you will need to set the necessary options for each
2449 child connection as it is created.
2450
2451 @table @asis
2452 @item :bindtodevice @var{device-name}
2453 If @var{device-name} is a non-empty string identifying a network
2454 interface name (see @code{network-interface-list}), only handle
2455 packets received on that interface. If @var{device-name} is @code{nil}
2456 (the default), handle packets received on any interface.
2457
2458 Using this option may require special privileges on some systems.
2459
2460 @item :broadcast @var{broadcast-flag}
2461 If @var{broadcast-flag} is non-@code{nil} for a datagram process, the
2462 process will receive datagram packet sent to a broadcast address, and
2463 be able to send packets to a broadcast address. This is ignored for a stream
2464 connection.
2465
2466 @item :dontroute @var{dontroute-flag}
2467 If @var{dontroute-flag} is non-@code{nil}, the process can only send
2468 to hosts on the same network as the local host.
2469
2470 @item :keepalive @var{keepalive-flag}
2471 If @var{keepalive-flag} is non-@code{nil} for a stream connection,
2472 enable exchange of low-level keep-alive messages.
2473
2474 @item :linger @var{linger-arg}
2475 If @var{linger-arg} is non-@code{nil}, wait for successful
2476 transmission of all queued packets on the connection before it is
2477 deleted (see @code{delete-process}). If @var{linger-arg} is an
2478 integer, it specifies the maximum time in seconds to wait for queued
2479 packets to be sent before closing the connection. The default is
2480 @code{nil}, which means to discard unsent queued packets when the
2481 process is deleted.
2482
2483 @c FIXME Where out-of-band data is ...?
2484 @item :oobinline @var{oobinline-flag}
2485 If @var{oobinline-flag} is non-@code{nil} for a stream connection,
2486 receive out-of-band data in the normal data stream. Otherwise, ignore
2487 out-of-band data.
2488
2489 @item :priority @var{priority}
2490 Set the priority for packets sent on this connection to the integer
2491 @var{priority}. The interpretation of this number is protocol
2492 specific; such as setting the TOS (type of service) field on IP
2493 packets sent on this connection. It may also have system dependent
2494 effects, such as selecting a specific output queue on the network
2495 interface.
2496
2497 @item :reuseaddr @var{reuseaddr-flag}
2498 If @var{reuseaddr-flag} is non-@code{nil} (the default) for a stream
2499 server process, allow this server to reuse a specific port number (see
2500 @code{:service}), unless another process on this host is already
2501 listening on that port. If @var{reuseaddr-flag} is @code{nil}, there
2502 may be a period of time after the last use of that port (by any
2503 process on the host) where it is not possible to make a new server on
2504 that port.
2505 @end table
2506
2507 @defun set-network-process-option process option value &optional no-error
2508 This function sets or modifies a network option for network process
2509 @var{process}. The accepted options and values are as for
2510 @code{make-network-process}. If @var{no-error} is non-@code{nil},
2511 this function returns @code{nil} instead of signaling an error if
2512 @var{option} is not a supported option. If the function successfully
2513 completes, it returns @code{t}.
2514
2515 The current setting of an option is available via the
2516 @code{process-contact} function.
2517 @end defun
2518
2519 @node Network Feature Testing
2520 @subsection Testing Availability of Network Features
2521
2522 To test for the availability of a given network feature, use
2523 @code{featurep} like this:
2524
2525 @example
2526 (featurep 'make-network-process '(@var{keyword} @var{value}))
2527 @end example
2528
2529 @noindent
2530 The result of this form is @code{t} if it works to specify
2531 @var{keyword} with value @var{value} in @code{make-network-process}.
2532 Here are some of the @var{keyword}---@var{value} pairs you can test in
2533 this way.
2534
2535 @table @code
2536 @item (:nowait t)
2537 Non-@code{nil} if non-blocking connect is supported.
2538 @item (:type datagram)
2539 Non-@code{nil} if datagrams are supported.
2540 @item (:family local)
2541 Non-@code{nil} if local (a.k.a.@: UNIX domain) sockets are supported.
2542 @item (:family ipv6)
2543 Non-@code{nil} if IPv6 is supported.
2544 @item (:service t)
2545 Non-@code{nil} if the system can select the port for a server.
2546 @end table
2547
2548 To test for the availability of a given network option, use
2549 @code{featurep} like this:
2550
2551 @example
2552 (featurep 'make-network-process '@var{keyword})
2553 @end example
2554
2555 @noindent
2556 The accepted @var{keyword} values are @code{:bindtodevice}, etc.
2557 For the complete list, @pxref{Network Options}. This form returns
2558 non-@code{nil} if that particular network option is supported by
2559 @code{make-network-process} (or @code{set-network-process-option}).
2560
2561 @node Misc Network
2562 @section Misc Network Facilities
2563
2564 These additional functions are useful for creating and operating
2565 on network connections. Note that they are supported only on some
2566 systems.
2567
2568 @defun network-interface-list
2569 This function returns a list describing the network interfaces
2570 of the machine you are using. The value is an alist whose
2571 elements have the form @code{(@var{name} . @var{address})}.
2572 @var{address} has the same form as the @var{local-address}
2573 and @var{remote-address} arguments to @code{make-network-process}.
2574 @end defun
2575
2576 @defun network-interface-info ifname
2577 This function returns information about the network interface named
2578 @var{ifname}. The value is a list of the form
2579 @code{(@var{addr} @var{bcast} @var{netmask} @var{hwaddr} @var{flags})}.
2580
2581 @table @var
2582 @item addr
2583 The Internet protocol address.
2584 @item bcast
2585 The broadcast address.
2586 @item netmask
2587 The network mask.
2588 @item hwaddr
2589 The layer 2 address (Ethernet MAC address, for instance).
2590 @item flags
2591 The current flags of the interface.
2592 @end table
2593 @end defun
2594
2595 @defun format-network-address address &optional omit-port
2596 This function converts the Lisp representation of a network address to
2597 a string.
2598
2599 A five-element vector @code{[@var{a} @var{b} @var{c} @var{d} @var{p}]}
2600 represents an IPv4 address @var{a}.@var{b}.@var{c}.@var{d} and port
2601 number @var{p}. @code{format-network-address} converts that to the
2602 string @code{"@var{a}.@var{b}.@var{c}.@var{d}:@var{p}"}.
2603
2604 A nine-element vector @code{[@var{a} @var{b} @var{c} @var{d} @var{e}
2605 @var{f} @var{g} @var{h} @var{p}]} represents an IPv6 address along
2606 with a port number. @code{format-network-address} converts that to
2607 the string
2608 @code{"[@var{a}:@var{b}:@var{c}:@var{d}:@var{e}:@var{f}:@var{g}:@var{h}]:@var{p}"}.
2609
2610 If the vector does not include the port number, @var{p}, or if
2611 @var{omit-port} is non-@code{nil}, the result does not include the
2612 @code{:@var{p}} suffix.
2613 @end defun
2614
2615 @node Serial Ports
2616 @section Communicating with Serial Ports
2617 @cindex @file{/dev/tty}
2618 @cindex @file{COM1}
2619 @cindex serial connections
2620
2621 Emacs can communicate with serial ports. For interactive use,
2622 @kbd{M-x serial-term} opens a terminal window. In a Lisp program,
2623 @code{make-serial-process} creates a process object.
2624
2625 The serial port can be configured at run-time, without having to
2626 close and re-open it. The function @code{serial-process-configure}
2627 lets you change the speed, bytesize, and other parameters. In a
2628 terminal window created by @code{serial-term}, you can click on the
2629 mode line for configuration.
2630
2631 A serial connection is represented by a process object, which can be
2632 used in a similar way to a subprocess or network process. You can send and
2633 receive data, and configure the serial port. A serial process object
2634 has no process ID, however, and you can't send signals to it, and the
2635 status codes are different from other types of processes.
2636 @code{delete-process} on the process object or @code{kill-buffer} on
2637 the process buffer close the connection, but this does not affect the
2638 device connected to the serial port.
2639
2640 The function @code{process-type} returns the symbol @code{serial}
2641 for a process object representing a serial port connection.
2642
2643 Serial ports are available on GNU/Linux, Unix, and MS Windows systems.
2644
2645 @deffn Command serial-term port speed
2646 Start a terminal-emulator for a serial port in a new buffer.
2647 @var{port} is the name of the serial port to connect to. For
2648 example, this could be @file{/dev/ttyS0} on Unix. On MS Windows, this
2649 could be @file{COM1}, or @file{\\.\COM10} (double the backslashes in
2650 Lisp strings).
2651
2652 @c FIXME is 9600 still the most common value, or is it 115200 now?
2653 @c (Same value, 9600, appears below as well.)
2654 @var{speed} is the speed of the serial port in bits per second. 9600
2655 is a common value. The buffer is in Term mode; see @ref{Term Mode,,,
2656 emacs, The GNU Emacs Manual}, for the commands to use in that buffer.
2657 You can change the speed and the configuration in the mode line menu.
2658 @end deffn
2659
2660 @defun make-serial-process &rest args
2661 This function creates a process and a buffer. Arguments are specified
2662 as keyword/argument pairs. Here's the list of the meaningful
2663 keywords, with the first two (@var{port} and @var{speed}) being mandatory:
2664
2665 @table @code
2666 @item :port @var{port}
2667 This is the name of the serial port. On Unix and GNU systems, this is
2668 a file name such as @file{/dev/ttyS0}. On Windows, this could be
2669 @file{COM1}, or @file{\\.\COM10} for ports higher than @file{COM9}
2670 (double the backslashes in Lisp strings).
2671
2672 @item :speed @var{speed}
2673 The speed of the serial port in bits per second. This function calls
2674 @code{serial-process-configure} to handle the speed; see the
2675 following documentation of that function for more details.
2676
2677 @item :name @var{name}
2678 The name of the process. If @var{name} is not given, @var{port} will
2679 serve as the process name as well.
2680
2681 @item :buffer @var{buffer}
2682 The buffer to associate with the process. The value can be either a
2683 buffer or a string that names a buffer. Process output goes at the
2684 end of that buffer, unless you specify an output stream or filter
2685 function to handle the output. If @var{buffer} is not given, the
2686 process buffer's name is taken from the value of the @code{:name}
2687 keyword.
2688
2689 @item :coding @var{coding}
2690 If @var{coding} is a symbol, it specifies the coding system used for
2691 both reading and writing for this process. If @var{coding} is a cons
2692 @code{(@var{decoding} . @var{encoding})}, @var{decoding} is used for
2693 reading, and @var{encoding} is used for writing. If not specified,
2694 the default is to determine the coding systems from the data itself.
2695
2696 @item :noquery @var{query-flag}
2697 Initialize the process query flag to @var{query-flag}. @xref{Query
2698 Before Exit}. The flags defaults to @code{nil} if unspecified.
2699
2700 @item :stop @var{bool}
2701 Start process in the stopped state if @var{bool} is
2702 non-@code{nil}. In the stopped state, a serial process does not
2703 accept incoming data, but you can send outgoing data. The stopped
2704 state is cleared by @code{continue-process} and set by
2705 @code{stop-process}.
2706
2707 @item :filter @var{filter}
2708 Install @var{filter} as the process filter.
2709
2710 @item :sentinel @var{sentinel}
2711 Install @var{sentinel} as the process sentinel.
2712
2713 @item :plist @var{plist}
2714 Install @var{plist} as the initial plist of the process.
2715
2716 @item :bytesize
2717 @itemx :parity
2718 @itemx :stopbits
2719 @itemx :flowcontrol
2720 These are handled by @code{serial-process-configure}, which is called
2721 by @code{make-serial-process}.
2722 @end table
2723
2724 The original argument list, possibly modified by later configuration,
2725 is available via the function @code{process-contact}.
2726
2727 Here is an example:
2728
2729 @example
2730 (make-serial-process :port "/dev/ttyS0" :speed 9600)
2731 @end example
2732 @end defun
2733
2734 @defun serial-process-configure &rest args
2735 @cindex baud, in serial connections
2736 @cindex bytesize, in serial connections
2737 @cindex parity, in serial connections
2738 @cindex stopbits, in serial connections
2739 @cindex flowcontrol, in serial connections
2740
2741 This function configures a serial port connection. Arguments are
2742 specified as keyword/argument pairs. Attributes that are not given
2743 are re-initialized from the process's current configuration (available
2744 via the function @code{process-contact}), or set to reasonable default
2745 values. The following arguments are defined:
2746
2747 @table @code
2748 @item :process @var{process}
2749 @itemx :name @var{name}
2750 @itemx :buffer @var{buffer}
2751 @itemx :port @var{port}
2752 Any of these arguments can be given to identify the process that is to
2753 be configured. If none of these arguments is given, the current
2754 buffer's process is used.
2755
2756 @item :speed @var{speed}
2757 The speed of the serial port in bits per second, a.k.a.@: @dfn{baud
2758 rate}. The value can be any number, but most serial ports work only
2759 at a few defined values between 1200 and 115200, with 9600 being the
2760 most common value. If @var{speed} is @code{nil}, the function ignores
2761 all other arguments and does not configure the port. This may be
2762 useful for special serial ports such as Bluetooth-to-serial converters,
2763 which can only be configured through @samp{AT} commands sent through the
2764 connection. The value of @code{nil} for @var{speed} is valid only for
2765 connections that were already opened by a previous call to
2766 @code{make-serial-process} or @code{serial-term}.
2767
2768 @item :bytesize @var{bytesize}
2769 The number of bits per byte, which can be 7 or 8. If @var{bytesize}
2770 is not given or @code{nil}, it defaults to 8.
2771
2772 @item :parity @var{parity}
2773 The value can be @code{nil} (don't use parity), the symbol
2774 @code{odd} (use odd parity), or the symbol @code{even} (use even
2775 parity). If @var{parity} is not given, it defaults to no parity.
2776
2777 @item :stopbits @var{stopbits}
2778 The number of stopbits used to terminate a transmission
2779 of each byte. @var{stopbits} can be 1 or 2. If @var{stopbits} is not
2780 given or @code{nil}, it defaults to 1.
2781
2782 @item :flowcontrol @var{flowcontrol}
2783 The type of flow control to use for this connection, which is either
2784 @code{nil} (don't use flow control), the symbol @code{hw} (use RTS/CTS
2785 hardware flow control), or the symbol @code{sw} (use XON/XOFF software
2786 flow control). If @var{flowcontrol} is not given, it defaults to no
2787 flow control.
2788 @end table
2789
2790 Internally, @code{make-serial-process} calls
2791 @code{serial-process-configure} for the initial configuration of the
2792 serial port.
2793 @end defun
2794
2795 @node Byte Packing
2796 @section Packing and Unpacking Byte Arrays
2797 @cindex byte packing and unpacking
2798
2799 This section describes how to pack and unpack arrays of bytes,
2800 usually for binary network protocols. These functions convert byte arrays
2801 to alists, and vice versa. The byte array can be represented as a
2802 @c FIXME? No multibyte?
2803 unibyte string or as a vector of integers, while the alist associates
2804 symbols either with fixed-size objects or with recursive sub-alists.
2805 To use the functions referred to in this section, load the
2806 @code{bindat} library.
2807 @c It doesn't have any autoloads.
2808
2809 @cindex serializing
2810 @cindex deserializing
2811 @cindex packing
2812 @cindex unpacking
2813 Conversion from byte arrays to nested alists is also known as
2814 @dfn{deserializing} or @dfn{unpacking}, while going in the opposite
2815 direction is also known as @dfn{serializing} or @dfn{packing}.
2816
2817 @menu
2818 * Bindat Spec:: Describing data layout.
2819 * Bindat Functions:: Doing the unpacking and packing.
2820 * Bindat Examples:: Samples of what bindat.el can do for you!
2821 @end menu
2822
2823 @node Bindat Spec
2824 @subsection Describing Data Layout
2825
2826 To control unpacking and packing, you write a @dfn{data layout
2827 specification}, a special nested list describing named and typed
2828 @dfn{fields}. This specification controls the length of each field to be
2829 processed, and how to pack or unpack it. We normally keep bindat specs
2830 in variables whose names end in @samp{-bindat-spec}; that kind of name
2831 is automatically recognized as risky.
2832
2833 @cindex endianness
2834 @cindex big endian
2835 @cindex little endian
2836 @cindex network byte ordering
2837 A field's @dfn{type} describes the size (in bytes) of the object
2838 that the field represents and, in the case of multibyte fields, how
2839 the bytes are ordered within the field. The two possible orderings
2840 are big endian (also known as network byte ordering) and
2841 little endian. For instance, the number @code{#x23cd} (decimal
2842 9165) in big endian would be the two bytes @code{#x23} @code{#xcd};
2843 and in little endian, @code{#xcd} @code{#x23}. Here are the possible
2844 type values:
2845
2846 @table @code
2847 @item u8
2848 @itemx byte
2849 Unsigned byte, with length 1.
2850
2851 @item u16
2852 @itemx word
2853 @itemx short
2854 Unsigned integer in network byte order, with length 2.
2855
2856 @item u24
2857 Unsigned integer in network byte order, with length 3.
2858
2859 @item u32
2860 @itemx dword
2861 @itemx long
2862 Unsigned integer in network byte order, with length 4.
2863 Note: These values may be limited by Emacs's integer implementation limits.
2864
2865 @item u16r
2866 @itemx u24r
2867 @itemx u32r
2868 Unsigned integer in little endian order, with length 2, 3 and 4, respectively.
2869
2870 @item str @var{len}
2871 String of length @var{len}.
2872
2873 @item strz @var{len}
2874 Zero-terminated string, in a fixed-size field with length @var{len}.
2875
2876 @item vec @var{len} [@var{type}]
2877 Vector of @var{len} elements of type @var{type}, defaulting to bytes.
2878 The @var{type} is any of the simple types above, or another vector
2879 specified as a list of the form @code{(vec @var{len} [@var{type}])}.
2880
2881 @item ip
2882 @c FIXME? IPv6?
2883 Four-byte vector representing an Internet address. For example:
2884 @code{[127 0 0 1]} for localhost.
2885
2886 @item bits @var{len}
2887 List of set bits in @var{len} bytes. The bytes are taken in big
2888 endian order and the bits are numbered starting with @code{8 *
2889 @var{len} @minus{} 1} and ending with zero. For example: @code{bits
2890 2} unpacks @code{#x28} @code{#x1c} to @code{(2 3 4 11 13)} and
2891 @code{#x1c} @code{#x28} to @code{(3 5 10 11 12)}.
2892
2893 @item (eval @var{form})
2894 @var{form} is a Lisp expression evaluated at the moment the field is
2895 unpacked or packed. The result of the evaluation should be one of the
2896 above-listed type specifications.
2897 @end table
2898
2899 For a fixed-size field, the length @var{len} is given as an integer
2900 specifying the number of bytes in the field.
2901
2902 When the length of a field is not fixed, it typically depends on the
2903 value of a preceding field. In this case, the length @var{len} can be
2904 given either as a list @code{(@var{name} ...)} identifying a
2905 @dfn{field name} in the format specified for @code{bindat-get-field}
2906 below, or by an expression @code{(eval @var{form})} where @var{form}
2907 should evaluate to an integer, specifying the field length.
2908
2909 A field specification generally has the form @code{([@var{name}]
2910 @var{handler})}, where @var{name} is optional. Don't use names that
2911 are symbols meaningful as type specifications (above) or handler
2912 specifications (below), since that would be ambiguous. @var{name} can
2913 be a symbol or an expression @code{(eval @var{form})}, in which case
2914 @var{form} should evaluate to a symbol.
2915
2916 @var{handler} describes how to unpack or pack the field and can be one
2917 of the following:
2918
2919 @table @code
2920 @item @var{type}
2921 Unpack/pack this field according to the type specification @var{type}.
2922
2923 @item eval @var{form}
2924 Evaluate @var{form}, a Lisp expression, for side-effect only. If the
2925 field name is specified, the value is bound to that field name.
2926
2927 @item fill @var{len}
2928 Skip @var{len} bytes. In packing, this leaves them unchanged,
2929 which normally means they remain zero. In unpacking, this means
2930 they are ignored.
2931
2932 @item align @var{len}
2933 Skip to the next multiple of @var{len} bytes.
2934
2935 @item struct @var{spec-name}
2936 Process @var{spec-name} as a sub-specification. This describes a
2937 structure nested within another structure.
2938
2939 @item union @var{form} (@var{tag} @var{spec})@dots{}
2940 @c ??? I don't see how one would actually use this.
2941 @c ??? what kind of expression would be useful for @var{form}?
2942 Evaluate @var{form}, a Lisp expression, find the first @var{tag}
2943 that matches it, and process its associated data layout specification
2944 @var{spec}. Matching can occur in one of three ways:
2945
2946 @itemize
2947 @item
2948 If a @var{tag} has the form @code{(eval @var{expr})}, evaluate
2949 @var{expr} with the variable @code{tag} dynamically bound to the value
2950 of @var{form}. A non-@code{nil} result indicates a match.
2951
2952 @item
2953 @var{tag} matches if it is @code{equal} to the value of @var{form}.
2954
2955 @item
2956 @var{tag} matches unconditionally if it is @code{t}.
2957 @end itemize
2958
2959 @item repeat @var{count} @var{field-specs}@dots{}
2960 Process the @var{field-specs} recursively, in order, then repeat
2961 starting from the first one, processing all the specifications @var{count}
2962 times overall. The @var{count} is given using the same formats as a
2963 field length---if an @code{eval} form is used, it is evaluated just once.
2964 For correct operation, each specification in @var{field-specs} must
2965 include a name.
2966 @end table
2967
2968 For the @code{(eval @var{form})} forms used in a bindat specification,
2969 the @var{form} can access and update these dynamically bound variables
2970 during evaluation:
2971
2972 @table @code
2973 @item last
2974 Value of the last field processed.
2975
2976 @item bindat-raw
2977 The data as a byte array.
2978
2979 @item bindat-idx
2980 Current index (within @code{bindat-raw}) for unpacking or packing.
2981
2982 @item struct
2983 The alist containing the structured data that have been unpacked so
2984 far, or the entire structure being packed. You can use
2985 @code{bindat-get-field} to access specific fields of this structure.
2986
2987 @item count
2988 @itemx index
2989 Inside a @code{repeat} block, these contain the maximum number of
2990 repetitions (as specified by the @var{count} parameter), and the
2991 current repetition number (counting from 0). Setting @code{count} to
2992 zero will terminate the inner-most repeat block after the current
2993 repetition has completed.
2994 @end table
2995
2996 @node Bindat Functions
2997 @subsection Functions to Unpack and Pack Bytes
2998
2999 In the following documentation, @var{spec} refers to a data layout
3000 specification, @code{bindat-raw} to a byte array, and @var{struct} to an
3001 alist representing unpacked field data.
3002
3003 @defun bindat-unpack spec bindat-raw &optional bindat-idx
3004 @c FIXME? Again, no multibyte?
3005 This function unpacks data from the unibyte string or byte
3006 array @code{bindat-raw}
3007 according to @var{spec}. Normally, this starts unpacking at the
3008 beginning of the byte array, but if @var{bindat-idx} is non-@code{nil}, it
3009 specifies a zero-based starting position to use instead.
3010
3011 The value is an alist or nested alist in which each element describes
3012 one unpacked field.
3013 @end defun
3014
3015 @defun bindat-get-field struct &rest name
3016 This function selects a field's data from the nested alist
3017 @var{struct}. Usually @var{struct} was returned by
3018 @code{bindat-unpack}. If @var{name} corresponds to just one argument,
3019 that means to extract a top-level field value. Multiple @var{name}
3020 arguments specify repeated lookup of sub-structures. An integer name
3021 acts as an array index.
3022
3023 For example, if @var{name} is @code{(a b 2 c)}, that means to find
3024 field @code{c} in the third element of subfield @code{b} of field
3025 @code{a}. (This corresponds to @code{struct.a.b[2].c} in C.)
3026 @end defun
3027
3028 Although packing and unpacking operations change the organization of
3029 data (in memory), they preserve the data's @dfn{total length}, which is
3030 the sum of all the fields' lengths, in bytes. This value is not
3031 generally inherent in either the specification or alist alone; instead,
3032 both pieces of information contribute to its calculation. Likewise, the
3033 length of a string or array being unpacked may be longer than the data's
3034 total length as described by the specification.
3035
3036 @defun bindat-length spec struct
3037 This function returns the total length of the data in @var{struct},
3038 according to @var{spec}.
3039 @end defun
3040
3041 @defun bindat-pack spec struct &optional bindat-raw bindat-idx
3042 This function returns a byte array packed according to @var{spec} from
3043 the data in the alist @var{struct}. It normally creates and fills a
3044 new byte array starting at the beginning. However, if @var{bindat-raw}
3045 is non-@code{nil}, it specifies a pre-allocated unibyte string or vector to
3046 pack into. If @var{bindat-idx} is non-@code{nil}, it specifies the starting
3047 offset for packing into @code{bindat-raw}.
3048
3049 When pre-allocating, you should make sure @code{(length @var{bindat-raw})}
3050 meets or exceeds the total length to avoid an out-of-range error.
3051 @end defun
3052
3053 @defun bindat-ip-to-string ip
3054 Convert the Internet address vector @var{ip} to a string in the usual
3055 dotted notation.
3056 @c FIXME? Does it do IPv6?
3057
3058 @example
3059 (bindat-ip-to-string [127 0 0 1])
3060 @result{} "127.0.0.1"
3061 @end example
3062 @end defun
3063
3064 @node Bindat Examples
3065 @subsection Examples of Byte Unpacking and Packing
3066 @c FIXME? This seems a very long example for something that is not used
3067 @c very often. As of 24.1, gdb-mi.el is the only user of bindat.el in Emacs.
3068 @c Maybe one or both of these examples should just be moved to the
3069 @c commentary of bindat.el.
3070
3071 Here is a complete example of byte unpacking and packing:
3072
3073 @lisp
3074 (require 'bindat)
3075
3076 (defvar fcookie-index-spec
3077 '((:version u32)
3078 (:count u32)
3079 (:longest u32)
3080 (:shortest u32)
3081 (:flags u32)
3082 (:delim u8)
3083 (:ignored fill 3)
3084 (:offset repeat (:count) (:foo u32)))
3085 "Description of a fortune cookie index file's contents.")
3086
3087 (defun fcookie (cookies &optional index)
3088 "Display a random fortune cookie from file COOKIES.
3089 Optional second arg INDEX specifies the associated index
3090 filename, by default \"COOKIES.dat\". Display cookie text
3091 in buffer \"*Fortune Cookie: BASENAME*\", where BASENAME
3092 is COOKIES without the directory part."
3093 (interactive "fCookies file: ")
3094 (let* ((info (with-temp-buffer
3095 (insert-file-contents-literally
3096 (or index (concat cookies ".dat")))
3097 (bindat-unpack fcookie-index-spec
3098 (buffer-string))))
3099 (sel (random (bindat-get-field info :count)))
3100 (beg (cdar (bindat-get-field info :offset sel)))
3101 (end (or (cdar (bindat-get-field info
3102 :offset (1+ sel)))
3103 (nth 7 (file-attributes cookies)))))
3104 (switch-to-buffer
3105 (get-buffer-create
3106 (format "*Fortune Cookie: %s*"
3107 (file-name-nondirectory cookies))))
3108 (erase-buffer)
3109 (insert-file-contents-literally
3110 cookies nil beg (- end 3))))
3111
3112 (defun fcookie-create-index (cookies &optional index delim)
3113 "Scan file COOKIES, and write out its index file.
3114 Optional arg INDEX specifies the index filename, which by
3115 default is \"COOKIES.dat\". Optional arg DELIM specifies the
3116 unibyte character that, when found on a line of its own in
3117 COOKIES, indicates the border between entries."
3118 (interactive "fCookies file: ")
3119 (setq delim (or delim ?%))
3120 (let ((delim-line (format "\n%c\n" delim))
3121 (count 0)
3122 (max 0)
3123 min p q len offsets)
3124 (unless (= 3 (string-bytes delim-line))
3125 (error "Delimiter cannot be represented in one byte"))
3126 (with-temp-buffer
3127 (insert-file-contents-literally cookies)
3128 (while (and (setq p (point))
3129 (search-forward delim-line (point-max) t)
3130 (setq len (- (point) 3 p)))
3131 (setq count (1+ count)
3132 max (max max len)
3133 min (min (or min max) len)
3134 offsets (cons (1- p) offsets))))
3135 (with-temp-buffer
3136 (set-buffer-multibyte nil)
3137 (insert
3138 (bindat-pack
3139 fcookie-index-spec
3140 `((:version . 2)
3141 (:count . ,count)
3142 (:longest . ,max)
3143 (:shortest . ,min)
3144 (:flags . 0)
3145 (:delim . ,delim)
3146 (:offset . ,(mapcar (lambda (o)
3147 (list (cons :foo o)))
3148 (nreverse offsets))))))
3149 (let ((coding-system-for-write 'raw-text-unix))
3150 (write-file (or index (concat cookies ".dat")))))))
3151 @end lisp
3152
3153 The following is an example of defining and unpacking a complex
3154 structure. Consider the following C structures:
3155
3156 @example
3157 struct header @{
3158 unsigned long dest_ip;
3159 unsigned long src_ip;
3160 unsigned short dest_port;
3161 unsigned short src_port;
3162 @};
3163
3164 struct data @{
3165 unsigned char type;
3166 unsigned char opcode;
3167 unsigned short length; /* in network byte order */
3168 unsigned char id[8]; /* null-terminated string */
3169 unsigned char data[/* (length + 3) & ~3 */];
3170 @};
3171
3172 struct packet @{
3173 struct header header;
3174 unsigned long counters[2]; /* in little endian order */
3175 unsigned char items;
3176 unsigned char filler[3];
3177 struct data item[/* items */];
3178
3179 @};
3180 @end example
3181
3182 The corresponding data layout specification is:
3183
3184 @lisp
3185 (setq header-spec
3186 '((dest-ip ip)
3187 (src-ip ip)
3188 (dest-port u16)
3189 (src-port u16)))
3190
3191 (setq data-spec
3192 '((type u8)
3193 (opcode u8)
3194 (length u16) ; network byte order
3195 (id strz 8)
3196 (data vec (length))
3197 (align 4)))
3198
3199 (setq packet-spec
3200 '((header struct header-spec)
3201 (counters vec 2 u32r) ; little endian order
3202 (items u8)
3203 (fill 3)
3204 (item repeat (items)
3205 (struct data-spec))))
3206 @end lisp
3207
3208 A binary data representation is:
3209
3210 @lisp
3211 (setq binary-data
3212 [ 192 168 1 100 192 168 1 101 01 28 21 32
3213 160 134 1 0 5 1 0 0 2 0 0 0
3214 2 3 0 5 ?A ?B ?C ?D ?E ?F 0 0 1 2 3 4 5 0 0 0
3215 1 4 0 7 ?B ?C ?D ?E ?F ?G 0 0 6 7 8 9 10 11 12 0 ])
3216 @end lisp
3217
3218 The corresponding decoded structure is:
3219
3220 @lisp
3221 (setq decoded (bindat-unpack packet-spec binary-data))
3222 @result{}
3223 ((header
3224 (dest-ip . [192 168 1 100])
3225 (src-ip . [192 168 1 101])
3226 (dest-port . 284)
3227 (src-port . 5408))
3228 (counters . [100000 261])
3229 (items . 2)
3230 (item ((data . [1 2 3 4 5])
3231 (id . "ABCDEF")
3232 (length . 5)
3233 (opcode . 3)
3234 (type . 2))
3235 ((data . [6 7 8 9 10 11 12])
3236 (id . "BCDEFG")
3237 (length . 7)
3238 (opcode . 4)
3239 (type . 1))))
3240 @end lisp
3241
3242 An example of fetching data from this structure:
3243
3244 @lisp
3245 (bindat-get-field decoded 'item 1 'id)
3246 @result{} "BCDEFG"
3247 @end lisp