]> code.delx.au - gnu-emacs/blob - doc/lispref/processes.texi
Go back to grave quoting in source-code docstrings etc.
[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 @c FIXME? Never heard of C-b being used for this. In readline, e.g.,
1209 @c bash, that is backward-word.
1210 character'' (usually @kbd{C-b} or @kbd{C-\}) when you are not inside
1211 Emacs.
1212 @end defun
1213
1214 @defun stop-process &optional process current-group
1215 This function stops the process @var{process} by sending the
1216 signal @code{SIGTSTP}. Use @code{continue-process} to resume its
1217 execution.
1218
1219 Outside of Emacs, on systems with job control, the ``stop character''
1220 (usually @kbd{C-z}) normally sends this signal. When
1221 @var{current-group} is non-@code{nil}, you can think of this function as
1222 ``typing @kbd{C-z}'' on the terminal Emacs uses to communicate with the
1223 subprocess.
1224 @end defun
1225
1226 @defun continue-process &optional process current-group
1227 This function resumes execution of the process @var{process} by sending
1228 it the signal @code{SIGCONT}. This presumes that @var{process} was
1229 stopped previously.
1230 @end defun
1231
1232 @deffn Command signal-process process signal
1233 This function sends a signal to process @var{process}. The argument
1234 @var{signal} specifies which signal to send; it should be an integer,
1235 or a symbol whose name is a signal.
1236
1237 The @var{process} argument can be a system process @acronym{ID} (an
1238 integer); that allows you to send signals to processes that are not
1239 children of Emacs. @xref{System Processes}.
1240 @end deffn
1241
1242 @node Output from Processes
1243 @section Receiving Output from Processes
1244 @cindex process output
1245 @cindex output from processes
1246
1247 The output that a subprocess writes to its standard output stream
1248 is passed to a function called the @dfn{filter function}. The default
1249 filter function simply inserts the output into a buffer, which is
1250 called the associated buffer of the process (@pxref{Process
1251 Buffers}). If the process has no buffer then the default filter
1252 discards the output.
1253
1254 When a subprocess terminates, Emacs reads any pending output,
1255 then stops reading output from that subprocess. Therefore, if the
1256 subprocess has children that are still live and still producing
1257 output, Emacs won't receive that output.
1258
1259 Output from a subprocess can arrive only while Emacs is waiting: when
1260 reading terminal input (see the function @code{waiting-for-user-input-p}),
1261 in @code{sit-for} and @code{sleep-for} (@pxref{Waiting}), and in
1262 @code{accept-process-output} (@pxref{Accepting Output}). This
1263 minimizes the problem of timing errors that usually plague parallel
1264 programming. For example, you can safely create a process and only
1265 then specify its buffer or filter function; no output can arrive
1266 before you finish, if the code in between does not call any primitive
1267 that waits.
1268
1269 @defvar process-adaptive-read-buffering
1270 On some systems, when Emacs reads the output from a subprocess, the
1271 output data is read in very small blocks, potentially resulting in
1272 very poor performance. This behavior can be remedied to some extent
1273 by setting the variable @code{process-adaptive-read-buffering} to a
1274 non-@code{nil} value (the default), as it will automatically delay reading
1275 from such processes, thus allowing them to produce more output before
1276 Emacs tries to read it.
1277 @end defvar
1278
1279 It is impossible to separate the standard output and standard error
1280 streams of the subprocess, because Emacs normally spawns the subprocess
1281 inside a pseudo-TTY, and a pseudo-TTY has only one output channel. If
1282 you want to keep the output to those streams separate, you should
1283 redirect one of them to a file---for example, by using an appropriate
1284 shell command.
1285
1286 @menu
1287 * Process Buffers:: By default, output is put in a buffer.
1288 * Filter Functions:: Filter functions accept output from the process.
1289 * Decoding Output:: Filters can get unibyte or multibyte strings.
1290 * Accepting Output:: How to wait until process output arrives.
1291 @end menu
1292
1293 @node Process Buffers
1294 @subsection Process Buffers
1295
1296 A process can (and usually does) have an @dfn{associated buffer},
1297 which is an ordinary Emacs buffer that is used for two purposes: storing
1298 the output from the process, and deciding when to kill the process. You
1299 can also use the buffer to identify a process to operate on, since in
1300 normal practice only one process is associated with any given buffer.
1301 Many applications of processes also use the buffer for editing input to
1302 be sent to the process, but this is not built into Emacs Lisp.
1303
1304 By default, process output is inserted in the associated buffer.
1305 (You can change this by defining a custom filter function,
1306 @pxref{Filter Functions}.) The position to insert the output is
1307 determined by the @code{process-mark}, which is then updated to point
1308 to the end of the text just inserted. Usually, but not always, the
1309 @code{process-mark} is at the end of the buffer.
1310
1311 @findex process-kill-buffer-query-function
1312 Killing the associated buffer of a process also kills the process.
1313 Emacs asks for confirmation first, if the process's
1314 @code{process-query-on-exit-flag} is non-@code{nil} (@pxref{Query
1315 Before Exit}). This confirmation is done by the function
1316 @code{process-kill-buffer-query-function}, which is run from
1317 @code{kill-buffer-query-functions} (@pxref{Killing Buffers}).
1318
1319 @defun process-buffer process
1320 This function returns the associated buffer of the process
1321 @var{process}.
1322
1323 @smallexample
1324 @group
1325 (process-buffer (get-process "shell"))
1326 @result{} #<buffer *shell*>
1327 @end group
1328 @end smallexample
1329 @end defun
1330
1331 @defun process-mark process
1332 This function returns the process marker for @var{process}, which is the
1333 marker that says where to insert output from the process.
1334
1335 If @var{process} does not have a buffer, @code{process-mark} returns a
1336 marker that points nowhere.
1337
1338 The default filter function uses this marker to decide where to
1339 insert process output, and updates it to point after the inserted text.
1340 That is why successive batches of output are inserted consecutively.
1341
1342 Custom filter functions normally should use this marker in the same fashion.
1343 For an example of a filter function that uses @code{process-mark},
1344 @pxref{Process Filter Example}.
1345
1346 When the user is expected to enter input in the process buffer for
1347 transmission to the process, the process marker separates the new input
1348 from previous output.
1349 @end defun
1350
1351 @defun set-process-buffer process buffer
1352 This function sets the buffer associated with @var{process} to
1353 @var{buffer}. If @var{buffer} is @code{nil}, the process becomes
1354 associated with no buffer.
1355 @end defun
1356
1357 @defun get-buffer-process buffer-or-name
1358 This function returns a nondeleted process associated with the buffer
1359 specified by @var{buffer-or-name}. If there are several processes
1360 associated with it, this function chooses one (currently, the one most
1361 recently created, but don't count on that). Deletion of a process
1362 (see @code{delete-process}) makes it ineligible for this function to
1363 return.
1364
1365 It is usually a bad idea to have more than one process associated with
1366 the same buffer.
1367
1368 @smallexample
1369 @group
1370 (get-buffer-process "*shell*")
1371 @result{} #<process shell>
1372 @end group
1373 @end smallexample
1374
1375 Killing the process's buffer deletes the process, which kills the
1376 subprocess with a @code{SIGHUP} signal (@pxref{Signals to Processes}).
1377 @end defun
1378
1379 @node Filter Functions
1380 @subsection Process Filter Functions
1381 @cindex filter function
1382 @cindex process filter
1383
1384 A process @dfn{filter function} is a function that receives the
1385 standard output from the associated process. @emph{All} output from
1386 that process is passed to the filter. The default filter simply
1387 outputs directly to the process buffer.
1388
1389 The filter function can only be called when Emacs is waiting for
1390 something, because process output arrives only at such times. Emacs
1391 waits when reading terminal input (see the function
1392 @code{waiting-for-user-input-p}), in @code{sit-for} and
1393 @code{sleep-for} (@pxref{Waiting}), and in
1394 @code{accept-process-output} (@pxref{Accepting Output}).
1395
1396 A filter function must accept two arguments: the associated process
1397 and a string, which is output just received from it. The function is
1398 then free to do whatever it chooses with the output.
1399
1400 @c Note this text is duplicated in the sentinels section.
1401 Quitting is normally inhibited within a filter function---otherwise,
1402 the effect of typing @kbd{C-g} at command level or to quit a user
1403 command would be unpredictable. If you want to permit quitting inside
1404 a filter function, bind @code{inhibit-quit} to @code{nil}. In most
1405 cases, the right way to do this is with the macro
1406 @code{with-local-quit}. @xref{Quitting}.
1407
1408 If an error happens during execution of a filter function, it is
1409 caught automatically, so that it doesn't stop the execution of whatever
1410 program was running when the filter function was started. However, if
1411 @code{debug-on-error} is non-@code{nil}, errors are not caught.
1412 This makes it possible to use the Lisp debugger to debug the
1413 filter function. @xref{Debugger}.
1414
1415 Many filter functions sometimes (or always) insert the output in the
1416 process's buffer, mimicking the actions of the default filter.
1417 Such filter functions need to make sure that they save the
1418 current buffer, select the correct buffer (if different) before
1419 inserting output, and then restore the original buffer.
1420 They should also check whether the buffer is still alive, update the
1421 process marker, and in some cases update the value of point. Here is
1422 how to do these things:
1423
1424 @anchor{Process Filter Example}
1425 @smallexample
1426 @group
1427 (defun ordinary-insertion-filter (proc string)
1428 (when (buffer-live-p (process-buffer proc))
1429 (with-current-buffer (process-buffer proc)
1430 (let ((moving (= (point) (process-mark proc))))
1431 @end group
1432 @group
1433 (save-excursion
1434 ;; @r{Insert the text, advancing the process marker.}
1435 (goto-char (process-mark proc))
1436 (insert string)
1437 (set-marker (process-mark proc) (point)))
1438 (if moving (goto-char (process-mark proc)))))))
1439 @end group
1440 @end smallexample
1441
1442 To make the filter force the process buffer to be visible whenever new
1443 text arrives, you could insert a line like the following just before the
1444 @code{with-current-buffer} construct:
1445
1446 @smallexample
1447 (display-buffer (process-buffer proc))
1448 @end smallexample
1449
1450 To force point to the end of the new output, no matter where it was
1451 previously, eliminate the variable @code{moving} and call
1452 @code{goto-char} unconditionally.
1453
1454 @ignore
1455 In earlier Emacs versions, every filter function that did regular
1456 expression searching or matching had to explicitly save and restore the
1457 match data. Now Emacs does this automatically for filter functions;
1458 they never need to do it explicitly.
1459 @end ignore
1460 Note that Emacs automatically saves and restores the match data
1461 while executing filter functions. @xref{Match Data}.
1462
1463 The output to the filter may come in chunks of any size. A program
1464 that produces the same output twice in a row may send it as one batch of
1465 200 characters one time, and five batches of 40 characters the next. If
1466 the filter looks for certain text strings in the subprocess output, make
1467 sure to handle the case where one of these strings is split across two
1468 or more batches of output; one way to do this is to insert the
1469 received text into a temporary buffer, which can then be searched.
1470
1471 @defun set-process-filter process filter
1472 This function gives @var{process} the filter function @var{filter}. If
1473 @var{filter} is @code{nil}, it gives the process the default filter,
1474 which inserts the process output into the process buffer.
1475 @end defun
1476
1477 @defun process-filter process
1478 This function returns the filter function of @var{process}.
1479 @end defun
1480
1481 In case the process's output needs to be passed to several filters, you can
1482 use @code{add-function} to combine an existing filter with a new one.
1483 @xref{Advising Functions}.
1484
1485 Here is an example of the use of a filter function:
1486
1487 @smallexample
1488 @group
1489 (defun keep-output (process output)
1490 (setq kept (cons output kept)))
1491 @result{} keep-output
1492 @end group
1493 @group
1494 (setq kept nil)
1495 @result{} nil
1496 @end group
1497 @group
1498 (set-process-filter (get-process "shell") 'keep-output)
1499 @result{} keep-output
1500 @end group
1501 @group
1502 (process-send-string "shell" "ls ~/other\n")
1503 @result{} nil
1504 kept
1505 @result{} ("lewis@@slug:$ "
1506 @end group
1507 @group
1508 "FINAL-W87-SHORT.MSS backup.otl kolstad.mss~
1509 address.txt backup.psf kolstad.psf
1510 backup.bib~ david.mss resume-Dec-86.mss~
1511 backup.err david.psf resume-Dec.psf
1512 backup.mss dland syllabus.mss
1513 "
1514 "#backups.mss# backup.mss~ kolstad.mss
1515 ")
1516 @end group
1517 @end smallexample
1518
1519 @ignore @c The code in this example doesn't show the right way to do things.
1520 Here is another, more realistic example, which demonstrates how to use
1521 the process mark to do insertion in the same fashion as the default filter:
1522
1523 @smallexample
1524 @group
1525 ;; @r{Insert input in the buffer specified by @code{my-shell-buffer}}
1526 ;; @r{and make sure that buffer is shown in some window.}
1527 (defun my-process-filter (proc str)
1528 (let ((cur (selected-window))
1529 (pop-up-windows t))
1530 (pop-to-buffer my-shell-buffer)
1531 @end group
1532 @group
1533 (goto-char (point-max))
1534 (insert str)
1535 (set-marker (process-mark proc) (point-max))
1536 (select-window cur)))
1537 @end group
1538 @end smallexample
1539 @end ignore
1540
1541 @node Decoding Output
1542 @subsection Decoding Process Output
1543 @cindex decode process output
1544
1545 When Emacs writes process output directly into a multibyte buffer,
1546 it decodes the output according to the process output coding system.
1547 If the coding system is @code{raw-text} or @code{no-conversion}, Emacs
1548 converts the unibyte output to multibyte using
1549 @code{string-to-multibyte}, and inserts the resulting multibyte text.
1550
1551 You can use @code{set-process-coding-system} to specify which coding
1552 system to use (@pxref{Process Information}). Otherwise, the coding
1553 system comes from @code{coding-system-for-read}, if that is
1554 non-@code{nil}; or else from the defaulting mechanism (@pxref{Default
1555 Coding Systems}). If the text output by a process contains null
1556 bytes, Emacs by default uses @code{no-conversion} for it; see
1557 @ref{Lisp and Coding Systems, inhibit-null-byte-detection}, for how to
1558 control this behavior.
1559
1560 @strong{Warning:} Coding systems such as @code{undecided}, which
1561 determine the coding system from the data, do not work entirely
1562 reliably with asynchronous subprocess output. This is because Emacs
1563 has to process asynchronous subprocess output in batches, as it
1564 arrives. Emacs must try to detect the proper coding system from one
1565 batch at a time, and this does not always work. Therefore, if at all
1566 possible, specify a coding system that determines both the character
1567 code conversion and the end of line conversion---that is, one like
1568 @code{latin-1-unix}, rather than @code{undecided} or @code{latin-1}.
1569
1570 @c Let's keep the index entries that were there for
1571 @c set-process-filter-multibyte and process-filter-multibyte-p,
1572 @cindex filter multibyte flag, of process
1573 @cindex process filter multibyte flag
1574 When Emacs calls a process filter function, it provides the process
1575 output as a multibyte string or as a unibyte string according to the
1576 process's filter coding system. Emacs
1577 decodes the output according to the process output coding system,
1578 which usually produces a multibyte string, except for coding systems
1579 such as @code{binary} and @code{raw-text}.
1580
1581 @node Accepting Output
1582 @subsection Accepting Output from Processes
1583 @cindex accept input from processes
1584
1585 Output from asynchronous subprocesses normally arrives only while
1586 Emacs is waiting for some sort of external event, such as elapsed time
1587 or terminal input. Occasionally it is useful in a Lisp program to
1588 explicitly permit output to arrive at a specific point, or even to wait
1589 until output arrives from a process.
1590
1591 @defun accept-process-output &optional process seconds millisec just-this-one
1592 This function allows Emacs to read pending output from processes. The
1593 output is given to their filter functions. If @var{process} is
1594 non-@code{nil} then this function does not return until some output
1595 has been received from @var{process}.
1596
1597 The arguments @var{seconds} and @var{millisec} let you specify timeout
1598 periods. The former specifies a period measured in seconds and the
1599 latter specifies one measured in milliseconds. The two time periods
1600 thus specified are added together, and @code{accept-process-output}
1601 returns after that much time, even if there is no
1602 subprocess output.
1603
1604 The argument @var{millisec} is obsolete (and should not be used),
1605 because @var{seconds} can be floating point to specify
1606 waiting a fractional number of seconds. If @var{seconds} is 0, the
1607 function accepts whatever output is pending but does not wait.
1608
1609 @c Emacs 22.1 feature
1610 If @var{process} is a process, and the argument @var{just-this-one} is
1611 non-@code{nil}, only output from that process is handled, suspending output
1612 from other processes until some output has been received from that
1613 process or the timeout expires. If @var{just-this-one} is an integer,
1614 also inhibit running timers. This feature is generally not
1615 recommended, but may be necessary for specific applications, such as
1616 speech synthesis.
1617
1618 The function @code{accept-process-output} returns non-@code{nil} if it
1619 got output from @var{process}, or from any process if @var{process} is
1620 @code{nil}. It returns @code{nil} if the timeout expired before output
1621 arrived.
1622 @end defun
1623
1624 @node Sentinels
1625 @section Sentinels: Detecting Process Status Changes
1626 @cindex process sentinel
1627 @cindex sentinel (of process)
1628
1629 A @dfn{process sentinel} is a function that is called whenever the
1630 associated process changes status for any reason, including signals
1631 (whether sent by Emacs or caused by the process's own actions) that
1632 terminate, stop, or continue the process. The process sentinel is
1633 also called if the process exits. The sentinel receives two
1634 arguments: the process for which the event occurred, and a string
1635 describing the type of event.
1636
1637 The string describing the event looks like one of the following:
1638
1639 @c FIXME? Also "killed\n" - see example below?
1640 @itemize @bullet
1641 @item
1642 @code{"finished\n"}.
1643
1644 @item
1645 @code{"exited abnormally with code @var{exitcode}\n"}.
1646
1647 @item
1648 @code{"@var{name-of-signal}\n"}.
1649
1650 @item
1651 @code{"@var{name-of-signal} (core dumped)\n"}.
1652 @end itemize
1653
1654 A sentinel runs only while Emacs is waiting (e.g., for terminal
1655 input, or for time to elapse, or for process output). This avoids the
1656 timing errors that could result from running sentinels at random places in
1657 the middle of other Lisp programs. A program can wait, so that
1658 sentinels will run, by calling @code{sit-for} or @code{sleep-for}
1659 (@pxref{Waiting}), or @code{accept-process-output} (@pxref{Accepting
1660 Output}). Emacs also allows sentinels to run when the command loop is
1661 reading input. @code{delete-process} calls the sentinel when it
1662 terminates a running process.
1663
1664 Emacs does not keep a queue of multiple reasons to call the sentinel
1665 of one process; it records just the current status and the fact that
1666 there has been a change. Therefore two changes in status, coming in
1667 quick succession, can call the sentinel just once. However, process
1668 termination will always run the sentinel exactly once. This is
1669 because the process status can't change again after termination.
1670
1671 Emacs explicitly checks for output from the process before running
1672 the process sentinel. Once the sentinel runs due to process
1673 termination, no further output can arrive from the process.
1674
1675 A sentinel that writes the output into the buffer of the process
1676 should check whether the buffer is still alive. If it tries to insert
1677 into a dead buffer, it will get an error. If the buffer is dead,
1678 @code{(buffer-name (process-buffer @var{process}))} returns @code{nil}.
1679
1680 @c Note this text is duplicated in the filter functions section.
1681 Quitting is normally inhibited within a sentinel---otherwise, the
1682 effect of typing @kbd{C-g} at command level or to quit a user command
1683 would be unpredictable. If you want to permit quitting inside a
1684 sentinel, bind @code{inhibit-quit} to @code{nil}. In most cases, the
1685 right way to do this is with the macro @code{with-local-quit}.
1686 @xref{Quitting}.
1687
1688 If an error happens during execution of a sentinel, it is caught
1689 automatically, so that it doesn't stop the execution of whatever
1690 programs was running when the sentinel was started. However, if
1691 @code{debug-on-error} is non-@code{nil}, errors are not caught.
1692 This makes it possible to use the Lisp debugger to debug the
1693 sentinel. @xref{Debugger}.
1694
1695 While a sentinel is running, the process sentinel is temporarily
1696 set to @code{nil} so that the sentinel won't run recursively.
1697 For this reason it is not possible for a sentinel to specify
1698 a new sentinel.
1699
1700 @ignore
1701 In earlier Emacs versions, every sentinel that did regular expression
1702 searching or matching had to explicitly save and restore the match data.
1703 Now Emacs does this automatically for sentinels; they never need to do
1704 it explicitly.
1705 @end ignore
1706 Note that Emacs automatically saves and restores the match data
1707 while executing sentinels. @xref{Match Data}.
1708
1709 @defun set-process-sentinel process sentinel
1710 This function associates @var{sentinel} with @var{process}. If
1711 @var{sentinel} is @code{nil}, then the process will have the default
1712 sentinel, which inserts a message in the process's buffer when the
1713 process status changes.
1714
1715 Changes in process sentinels take effect immediately---if the sentinel
1716 is slated to be run but has not been called yet, and you specify a new
1717 sentinel, the eventual call to the sentinel will use the new one.
1718
1719 @smallexample
1720 @group
1721 (defun msg-me (process event)
1722 (princ
1723 (format "Process: %s had the event '%s'" process event)))
1724 (set-process-sentinel (get-process "shell") 'msg-me)
1725 @result{} msg-me
1726 @end group
1727 @group
1728 (kill-process (get-process "shell"))
1729 @print{} Process: #<process shell> had the event 'killed'
1730 @result{} #<process shell>
1731 @end group
1732 @end smallexample
1733 @end defun
1734
1735 @defun process-sentinel process
1736 This function returns the sentinel of @var{process}.
1737 @end defun
1738
1739 In case a process status changes need to be passed to several sentinels, you
1740 can use @code{add-function} to combine an existing sentinel with a new one.
1741 @xref{Advising Functions}.
1742
1743 @defun waiting-for-user-input-p
1744 While a sentinel or filter function is running, this function returns
1745 non-@code{nil} if Emacs was waiting for keyboard input from the user at
1746 the time the sentinel or filter function was called, or @code{nil} if it
1747 was not.
1748 @end defun
1749
1750 @node Query Before Exit
1751 @section Querying Before Exit
1752
1753 When Emacs exits, it terminates all its subprocesses by sending them
1754 the @code{SIGHUP} signal. Because subprocesses may be doing
1755 valuable work, Emacs normally asks the user to confirm that it is ok
1756 to terminate them. Each process has a query flag, which, if
1757 non-@code{nil}, says that Emacs should ask for confirmation before
1758 exiting and thus killing that process. The default for the query flag
1759 is @code{t}, meaning @emph{do} query.
1760
1761 @defun process-query-on-exit-flag process
1762 This returns the query flag of @var{process}.
1763 @end defun
1764
1765 @defun set-process-query-on-exit-flag process flag
1766 This function sets the query flag of @var{process} to @var{flag}. It
1767 returns @var{flag}.
1768
1769 Here is an example of using @code{set-process-query-on-exit-flag} on a
1770 shell process to avoid querying:
1771
1772 @smallexample
1773 @group
1774 (set-process-query-on-exit-flag (get-process "shell") nil)
1775 @result{} nil
1776 @end group
1777 @end smallexample
1778 @end defun
1779
1780 @node System Processes
1781 @section Accessing Other Processes
1782 @cindex system processes
1783
1784 In addition to accessing and manipulating processes that are
1785 subprocesses of the current Emacs session, Emacs Lisp programs can
1786 also access other processes running on the same machine. We call
1787 these @dfn{system processes}, to distinguish them from Emacs
1788 subprocesses.
1789
1790 Emacs provides several primitives for accessing system processes.
1791 Not all platforms support these primitives; on those which don't,
1792 these primitives return @code{nil}.
1793
1794 @defun list-system-processes
1795 This function returns a list of all the processes running on the
1796 system. Each process is identified by its @acronym{PID}, a numerical
1797 process ID that is assigned by the OS and distinguishes the process
1798 from all the other processes running on the same machine at the same
1799 time.
1800 @end defun
1801
1802 @defun process-attributes pid
1803 This function returns an alist of attributes for the process specified
1804 by its process ID @var{pid}. Each association in the alist is of the
1805 form @code{(@var{key} . @var{value})}, where @var{key} designates the
1806 attribute and @var{value} is the value of that attribute. The various
1807 attribute @var{key}s that this function can return are listed below.
1808 Not all platforms support all of these attributes; if an attribute is
1809 not supported, its association will not appear in the returned alist.
1810 Values that are numbers can be either integer or floating point,
1811 depending on the magnitude of the value.
1812
1813 @table @code
1814 @item euid
1815 The effective user ID of the user who invoked the process. The
1816 corresponding @var{value} is a number. If the process was invoked by
1817 the same user who runs the current Emacs session, the value is
1818 identical to what @code{user-uid} returns (@pxref{User
1819 Identification}).
1820
1821 @item user
1822 User name corresponding to the process's effective user ID, a string.
1823
1824 @item egid
1825 The group ID of the effective user ID, a number.
1826
1827 @item group
1828 Group name corresponding to the effective user's group ID, a string.
1829
1830 @item comm
1831 The name of the command that runs in the process. This is a string
1832 that usually specifies the name of the executable file of the process,
1833 without the leading directories. However, some special system
1834 processes can report strings that do not correspond to an executable
1835 file of a program.
1836
1837 @item state
1838 The state code of the process. This is a short string that encodes
1839 the scheduling state of the process. Here's a list of the most
1840 frequently seen codes:
1841
1842 @table @code
1843 @item "D"
1844 uninterruptible sleep (usually I/O)
1845 @item "R"
1846 running
1847 @item "S"
1848 interruptible sleep (waiting for some event)
1849 @item "T"
1850 stopped, e.g., by a job control signal
1851 @item "Z"
1852 ``zombie'': a process that terminated, but was not reaped by its parent
1853 @end table
1854
1855 @noindent
1856 For the full list of the possible states, see the manual page of the
1857 @command{ps} command.
1858
1859 @item ppid
1860 The process ID of the parent process, a number.
1861
1862 @item pgrp
1863 The process group ID of the process, a number.
1864
1865 @item sess
1866 The session ID of the process. This is a number that is the process
1867 ID of the process's @dfn{session leader}.
1868
1869 @item ttname
1870 A string that is the name of the process's controlling terminal. On
1871 Unix and GNU systems, this is normally the file name of the
1872 corresponding terminal device, such as @file{/dev/pts65}.
1873
1874 @item tpgid
1875 The numerical process group ID of the foreground process group that
1876 uses the process's terminal.
1877
1878 @item minflt
1879 The number of minor page faults caused by the process since its
1880 beginning. (Minor page faults are those that don't involve reading
1881 from disk.)
1882
1883 @item majflt
1884 The number of major page faults caused by the process since its
1885 beginning. (Major page faults require a disk to be read, and are thus
1886 more expensive than minor page faults.)
1887
1888 @item cminflt
1889 @itemx cmajflt
1890 Like @code{minflt} and @code{majflt}, but include the number of page
1891 faults for all the child processes of the given process.
1892
1893 @item utime
1894 Time spent by the process in the user context, for running the
1895 application's code. The corresponding @var{value} is in the
1896 @w{@code{(@var{high} @var{low} @var{microsec} @var{picosec})}} format, the same
1897 format used by functions @code{current-time} (@pxref{Time of Day,
1898 current-time}) and @code{file-attributes} (@pxref{File Attributes}).
1899
1900 @item stime
1901 Time spent by the process in the system (kernel) context, for
1902 processing system calls. The corresponding @var{value} is in the same
1903 format as for @code{utime}.
1904
1905 @item time
1906 The sum of @code{utime} and @code{stime}. The corresponding
1907 @var{value} is in the same format as for @code{utime}.
1908
1909 @item cutime
1910 @itemx cstime
1911 @itemx ctime
1912 Like @code{utime}, @code{stime}, and @code{time}, but include the
1913 times of all the child processes of the given process.
1914
1915 @item pri
1916 The numerical priority of the process.
1917
1918 @item nice
1919 The @dfn{nice value} of the process, a number. (Processes with smaller
1920 nice values get scheduled more favorably.)
1921
1922 @item thcount
1923 The number of threads in the process.
1924
1925 @item start
1926 The time when the process was started, in the same
1927 @code{(@var{high} @var{low} @var{microsec} @var{picosec})} format used by
1928 @code{file-attributes} and @code{current-time}.
1929
1930 @item etime
1931 The time elapsed since the process started, in the format @code{(@var{high}
1932 @var{low} @var{microsec} @var{picosec})}.
1933
1934 @item vsize
1935 The virtual memory size of the process, measured in kilobytes.
1936
1937 @item rss
1938 The size of the process's @dfn{resident set}, the number of kilobytes
1939 occupied by the process in the machine's physical memory.
1940
1941 @item pcpu
1942 The percentage of the CPU time used by the process since it started.
1943 The corresponding @var{value} is a floating-point number between 0 and
1944 100.
1945
1946 @item pmem
1947 The percentage of the total physical memory installed on the machine
1948 used by the process's resident set. The value is a floating-point
1949 number between 0 and 100.
1950
1951 @item args
1952 The command-line with which the process was invoked. This is a string
1953 in which individual command-line arguments are separated by blanks;
1954 whitespace characters that are embedded in the arguments are quoted as
1955 appropriate for the system's shell: escaped by backslash characters on
1956 GNU and Unix, and enclosed in double quote characters on Windows.
1957 Thus, this command-line string can be directly used in primitives such
1958 as @code{shell-command}.
1959 @end table
1960
1961 @end defun
1962
1963
1964 @node Transaction Queues
1965 @section Transaction Queues
1966 @cindex transaction queue
1967
1968 @c That's not very informative. What is a transaction, and when might
1969 @c I want to use one?
1970 You can use a @dfn{transaction queue} to communicate with a subprocess
1971 using transactions. First use @code{tq-create} to create a transaction
1972 queue communicating with a specified process. Then you can call
1973 @code{tq-enqueue} to send a transaction.
1974
1975 @defun tq-create process
1976 This function creates and returns a transaction queue communicating with
1977 @var{process}. The argument @var{process} should be a subprocess
1978 capable of sending and receiving streams of bytes. It may be a child
1979 process, or it may be a TCP connection to a server, possibly on another
1980 machine.
1981 @end defun
1982
1983 @defun tq-enqueue queue question regexp closure fn &optional delay-question
1984 This function sends a transaction to queue @var{queue}. Specifying the
1985 queue has the effect of specifying the subprocess to talk to.
1986
1987 The argument @var{question} is the outgoing message that starts the
1988 transaction. The argument @var{fn} is the function to call when the
1989 corresponding answer comes back; it is called with two arguments:
1990 @var{closure}, and the answer received.
1991
1992 The argument @var{regexp} is a regular expression that should match
1993 text at the end of the entire answer, but nothing before; that's how
1994 @code{tq-enqueue} determines where the answer ends.
1995
1996 If the argument @var{delay-question} is non-@code{nil}, delay sending
1997 this question until the process has finished replying to any previous
1998 questions. This produces more reliable results with some processes.
1999 @ignore
2000
2001 @c Let's not mention it then.
2002 The return value of @code{tq-enqueue} itself is not meaningful.
2003 @end ignore
2004 @end defun
2005
2006 @defun tq-close queue
2007 Shut down transaction queue @var{queue}, waiting for all pending transactions
2008 to complete, and then terminate the connection or child process.
2009 @end defun
2010
2011 Transaction queues are implemented by means of a filter function.
2012 @xref{Filter Functions}.
2013
2014 @node Network
2015 @section Network Connections
2016 @cindex network connection
2017 @cindex TCP
2018 @cindex UDP
2019
2020 Emacs Lisp programs can open stream (TCP) and datagram (UDP) network
2021 connections (@pxref{Datagrams}) to other processes on the same machine
2022 or other machines.
2023 A network connection is handled by Lisp much like a subprocess, and is
2024 represented by a process object. However, the process you are
2025 communicating with is not a child of the Emacs process, has no
2026 process @acronym{ID}, and you can't kill it or send it signals. All you
2027 can do is send and receive data. @code{delete-process} closes the
2028 connection, but does not kill the program at the other end; that
2029 program must decide what to do about closure of the connection.
2030
2031 Lisp programs can listen for connections by creating network
2032 servers. A network server is also represented by a kind of process
2033 object, but unlike a network connection, the network server never
2034 transfers data itself. When it receives a connection request, it
2035 creates a new network connection to represent the connection just
2036 made. (The network connection inherits certain information, including
2037 the process plist, from the server.) The network server then goes
2038 back to listening for more connection requests.
2039
2040 Network connections and servers are created by calling
2041 @code{make-network-process} with an argument list consisting of
2042 keyword/argument pairs, for example @code{:server t} to create a
2043 server process, or @code{:type 'datagram} to create a datagram
2044 connection. @xref{Low-Level Network}, for details. You can also use
2045 the @code{open-network-stream} function described below.
2046
2047 To distinguish the different types of processes, the
2048 @code{process-type} function returns the symbol @code{network} for a
2049 network connection or server, @code{serial} for a serial port
2050 connection, or @code{real} for a real subprocess.
2051
2052 The @code{process-status} function returns @code{open},
2053 @code{closed}, @code{connect}, or @code{failed} for network
2054 connections. For a network server, the status is always
2055 @code{listen}. None of those values is possible for a real
2056 subprocess. @xref{Process Information}.
2057
2058 You can stop and resume operation of a network process by calling
2059 @code{stop-process} and @code{continue-process}. For a server
2060 process, being stopped means not accepting new connections. (Up to 5
2061 connection requests will be queued for when you resume the server; you
2062 can increase this limit, unless it is imposed by the operating
2063 system---see the @code{:server} keyword of @code{make-network-process},
2064 @ref{Network Processes}.) For a network stream connection, being
2065 stopped means not processing input (any arriving input waits until you
2066 resume the connection). For a datagram connection, some number of
2067 packets may be queued but input may be lost. You can use the function
2068 @code{process-command} to determine whether a network connection or
2069 server is stopped; a non-@code{nil} value means yes.
2070
2071 @cindex network connection, encrypted
2072 @cindex encrypted network connections
2073 @cindex @acronym{TLS} network connections
2074 @cindex @acronym{STARTTLS} network connections
2075 Emacs can create encrypted network connections, using either built-in
2076 or external support. The built-in support uses the GnuTLS
2077 (``Transport Layer Security'') library; see
2078 @uref{http://www.gnu.org/software/gnutls/, the GnuTLS project page}.
2079 If your Emacs was compiled with GnuTLS support, the function
2080 @code{gnutls-available-p} is defined and returns non-@code{nil}. For
2081 more details, @pxref{Top,, Overview, emacs-gnutls, The Emacs-GnuTLS manual}.
2082 The external support uses the @file{starttls.el} library, which
2083 requires a helper utility such as @command{gnutls-cli} to be installed
2084 on the system. The @code{open-network-stream} function can
2085 transparently handle the details of creating encrypted connections for
2086 you, using whatever support is available.
2087
2088 @defun open-network-stream name buffer host service &rest parameters
2089 This function opens a TCP connection, with optional encryption, and
2090 returns a process object that represents the connection.
2091
2092 The @var{name} argument specifies the name for the process object. It
2093 is modified as necessary to make it unique.
2094
2095 The @var{buffer} argument is the buffer to associate with the
2096 connection. Output from the connection is inserted in the buffer,
2097 unless you specify your own filter function to handle the output. If
2098 @var{buffer} is @code{nil}, it means that the connection is not
2099 associated with any buffer.
2100
2101 The arguments @var{host} and @var{service} specify where to connect to;
2102 @var{host} is the host name (a string), and @var{service} is the name of
2103 a defined network service (a string) or a port number (an integer).
2104
2105 The remaining arguments @var{parameters} are keyword/argument pairs
2106 that are mainly relevant to encrypted connections:
2107
2108 @table @code
2109
2110 @item :nowait @var{boolean}
2111 If non-@code{nil}, try to make an asynchronous connection.
2112
2113 @item :type @var{type}
2114 The type of connection. Options are:
2115
2116 @table @code
2117 @item plain
2118 An ordinary, unencrypted connection.
2119 @item tls
2120 @itemx ssl
2121 A @acronym{TLS} (``Transport Layer Security'') connection.
2122 @item nil
2123 @itemx network
2124 Start with a plain connection, and if parameters @samp{:success}
2125 and @samp{:capability-command} are supplied, try to upgrade to an encrypted
2126 connection via @acronym{STARTTLS}. If that fails, retain the
2127 unencrypted connection.
2128 @item starttls
2129 As for @code{nil}, but if @acronym{STARTTLS} fails drop the connection.
2130 @item shell
2131 A shell connection.
2132 @end table
2133
2134 @item :always-query-capabilities @var{boolean}
2135 If non-@code{nil}, always ask for the server's capabilities, even when
2136 doing a @samp{plain} connection.
2137
2138 @item :capability-command @var{capability-command}
2139 Command string to query the host capabilities.
2140
2141 @item :end-of-command @var{regexp}
2142 @itemx :end-of-capability @var{regexp}
2143 Regular expression matching the end of a command, or the end of the
2144 command @var{capability-command}. The latter defaults to the former.
2145
2146 @item :starttls-function @var{function}
2147 Function of one argument (the response to @var{capability-command}),
2148 which returns either @code{nil}, or the command to activate @acronym{STARTTLS}
2149 if supported.
2150
2151 @item :success @var{regexp}
2152 Regular expression matching a successful @acronym{STARTTLS} negotiation.
2153
2154 @item :use-starttls-if-possible @var{boolean}
2155 If non-@code{nil}, do opportunistic @acronym{STARTTLS} upgrades even if Emacs
2156 doesn't have built-in @acronym{TLS} support.
2157
2158 @item :warn-unless-encrypted @var{boolean}
2159 If non-@code{nil}, and @code{:return-value} is also non-@code{nil},
2160 Emacs will warn if the connection isn't encrypted. This is useful for
2161 protocols like @acronym{IMAP} and the like, where most users would
2162 expect the network traffic to be encrypted.
2163
2164 @item :client-certificate @var{list-or-t}
2165 Either a list of the form @code{(@var{key-file} @var{cert-file})},
2166 naming the certificate key file and certificate file itself, or
2167 @code{t}, meaning to query @code{auth-source} for this information
2168 (@pxref{Top,,Overview, auth, The Auth-Source Manual}).
2169 Only used for @acronym{TLS} or @acronym{STARTTLS}.
2170
2171 @item :return-list @var{cons-or-nil}
2172 The return value of this function. If omitted or @code{nil}, return a
2173 process object. Otherwise, a cons of the form @code{(@var{process-object}
2174 . @var{plist})}, where @var{plist} has keywords:
2175
2176 @table @code
2177 @item :greeting @var{string-or-nil}
2178 If non-@code{nil}, the greeting string returned by the host.
2179 @item :capabilities @var{string-or-nil}
2180 If non-@code{nil}, the host's capability string.
2181 @item :type @var{symbol}
2182 The connection type: @samp{plain} or @samp{tls}.
2183 @end table
2184
2185 @end table
2186
2187 @end defun
2188
2189
2190 @node Network Servers
2191 @section Network Servers
2192 @cindex network servers
2193
2194 You create a server by calling @code{make-network-process}
2195 (@pxref{Network Processes}) with @code{:server t}. The server will
2196 listen for connection requests from clients. When it accepts a client
2197 connection request, that creates a new network connection, itself a
2198 process object, with the following parameters:
2199
2200 @itemize @bullet
2201 @item
2202 The connection's process name is constructed by concatenating the
2203 server process's @var{name} with a client identification string. The
2204 @c FIXME? What about IPv6? Say briefly what the difference is?
2205 client identification string for an IPv4 connection looks like
2206 @samp{<@var{a}.@var{b}.@var{c}.@var{d}:@var{p}>}, which represents an
2207 address and port number. Otherwise, it is a
2208 unique number in brackets, as in @samp{<@var{nnn}>}. The number
2209 is unique for each connection in the Emacs session.
2210
2211 @item
2212 If the server has a non-default filter, the connection process does
2213 not get a separate process buffer; otherwise, Emacs creates a new
2214 buffer for the purpose. The buffer name is the server's buffer name
2215 or process name, concatenated with the client identification string.
2216
2217 The server's process buffer value is never used directly, but the log
2218 function can retrieve it and use it to log connections by inserting
2219 text there.
2220
2221 @item
2222 The communication type and the process filter and sentinel are
2223 inherited from those of the server. The server never directly
2224 uses its filter and sentinel; their sole purpose is to initialize
2225 connections made to the server.
2226
2227 @item
2228 The connection's process contact information is set according to the client's
2229 addressing information (typically an IP address and a port number).
2230 This information is associated with the @code{process-contact}
2231 keywords @code{:host}, @code{:service}, @code{:remote}.
2232
2233 @item
2234 The connection's local address is set up according to the port
2235 number used for the connection.
2236
2237 @item
2238 The client process's plist is initialized from the server's plist.
2239 @end itemize
2240
2241 @node Datagrams
2242 @section Datagrams
2243 @cindex datagrams
2244
2245 A @dfn{datagram} connection communicates with individual packets rather
2246 than streams of data. Each call to @code{process-send} sends one
2247 datagram packet (@pxref{Input to Processes}), and each datagram
2248 received results in one call to the filter function.
2249
2250 The datagram connection doesn't have to talk with the same remote
2251 peer all the time. It has a @dfn{remote peer address} which specifies
2252 where to send datagrams to. Each time an incoming datagram is passed
2253 to the filter function, the peer address is set to the address that
2254 datagram came from; that way, if the filter function sends a datagram,
2255 it will go back to that place. You can specify the remote peer
2256 address when you create the datagram connection using the
2257 @code{:remote} keyword. You can change it later on by calling
2258 @code{set-process-datagram-address}.
2259
2260 @defun process-datagram-address process
2261 If @var{process} is a datagram connection or server, this function
2262 returns its remote peer address.
2263 @end defun
2264
2265 @defun set-process-datagram-address process address
2266 If @var{process} is a datagram connection or server, this function
2267 sets its remote peer address to @var{address}.
2268 @end defun
2269
2270 @node Low-Level Network
2271 @section Low-Level Network Access
2272
2273 You can also create network connections by operating at a lower
2274 level than that of @code{open-network-stream}, using
2275 @code{make-network-process}.
2276
2277 @menu
2278 * Proc: Network Processes. Using @code{make-network-process}.
2279 * Options: Network Options. Further control over network connections.
2280 * Features: Network Feature Testing.
2281 Determining which network features work on
2282 the machine you are using.
2283 @end menu
2284
2285 @node Network Processes
2286 @subsection @code{make-network-process}
2287
2288 The basic function for creating network connections and network
2289 servers is @code{make-network-process}. It can do either of those
2290 jobs, depending on the arguments you give it.
2291
2292 @defun make-network-process &rest args
2293 This function creates a network connection or server and returns the
2294 process object that represents it. The arguments @var{args} are a
2295 list of keyword/argument pairs. Omitting a keyword is always
2296 equivalent to specifying it with value @code{nil}, except for
2297 @code{:coding}, @code{:filter-multibyte}, and @code{:reuseaddr}. Here
2298 are the meaningful keywords (those corresponding to network options
2299 are listed in the following section):
2300
2301 @table @asis
2302 @item :name @var{name}
2303 Use the string @var{name} as the process name. It is modified if
2304 necessary to make it unique.
2305
2306 @item :type @var{type}
2307 Specify the communication type. A value of @code{nil} specifies a
2308 stream connection (the default); @code{datagram} specifies a datagram
2309 connection; @code{seqpacket} specifies a ``sequenced packet stream''
2310 connection. Both connections and servers can be of these types.
2311
2312 @item :server @var{server-flag}
2313 If @var{server-flag} is non-@code{nil}, create a server. Otherwise,
2314 create a connection. For a stream type server, @var{server-flag} may
2315 be an integer, which then specifies the length of the queue of pending
2316 connections to the server. The default queue length is 5.
2317
2318 @item :host @var{host}
2319 Specify the host to connect to. @var{host} should be a host name or
2320 Internet address, as a string, or the symbol @code{local} to specify
2321 the local host. If you specify @var{host} for a server, it must
2322 specify a valid address for the local host, and only clients
2323 connecting to that address will be accepted.
2324
2325 @item :service @var{service}
2326 @var{service} specifies a port number to connect to; or, for a server,
2327 the port number to listen on. It should be a service name that
2328 translates to a port number, or an integer specifying the port number
2329 directly. For a server, it can also be @code{t}, which means to let
2330 the system select an unused port number.
2331
2332 @item :family @var{family}
2333 @var{family} specifies the address (and protocol) family for
2334 communication. @code{nil} means determine the proper address family
2335 automatically for the given @var{host} and @var{service}.
2336 @code{local} specifies a Unix socket, in which case @var{host} is
2337 ignored. @code{ipv4} and @code{ipv6} specify to use IPv4 and IPv6,
2338 respectively.
2339
2340 @item :local @var{local-address}
2341 For a server process, @var{local-address} is the address to listen on.
2342 It overrides @var{family}, @var{host} and @var{service}, so you
2343 might as well not specify them.
2344
2345 @item :remote @var{remote-address}
2346 For a connection, @var{remote-address} is the address to connect to.
2347 It overrides @var{family}, @var{host} and @var{service}, so you
2348 might as well not specify them.
2349
2350 For a datagram server, @var{remote-address} specifies the initial
2351 setting of the remote datagram address.
2352
2353 The format of @var{local-address} or @var{remote-address} depends on
2354 the address family:
2355
2356 @itemize -
2357 @item
2358 An IPv4 address is represented as a five-element vector of four 8-bit
2359 integers and one 16-bit integer
2360 @code{[@var{a} @var{b} @var{c} @var{d} @var{p}]} corresponding to
2361 numeric IPv4 address @var{a}.@var{b}.@var{c}.@var{d} and port number
2362 @var{p}.
2363
2364 @item
2365 An IPv6 address is represented as a nine-element vector of 16-bit
2366 integers @code{[@var{a} @var{b} @var{c} @var{d} @var{e} @var{f}
2367 @var{g} @var{h} @var{p}]} corresponding to numeric IPv6 address
2368 @var{a}:@var{b}:@var{c}:@var{d}:@var{e}:@var{f}:@var{g}:@var{h} and
2369 port number @var{p}.
2370
2371 @item
2372 A local address is represented as a string, which specifies the address
2373 in the local address space.
2374
2375 @item
2376 An ``unsupported family'' address is represented by a cons
2377 @code{(@var{f} . @var{av})}, where @var{f} is the family number and
2378 @var{av} is a vector specifying the socket address using one element
2379 per address data byte. Do not rely on this format in portable code,
2380 as it may depend on implementation defined constants, data sizes, and
2381 data structure alignment.
2382 @end itemize
2383
2384 @item :nowait @var{bool}
2385 If @var{bool} is non-@code{nil} for a stream connection, return
2386 without waiting for the connection to complete. When the connection
2387 succeeds or fails, Emacs will call the sentinel function, with a
2388 second argument matching @code{"open"} (if successful) or
2389 @code{"failed"}. The default is to block, so that
2390 @code{make-network-process} does not return until the connection
2391 has succeeded or failed.
2392
2393 @item :stop @var{stopped}
2394 If @var{stopped} is non-@code{nil}, start the network connection or
2395 server in the ``stopped'' state.
2396
2397 @item :buffer @var{buffer}
2398 Use @var{buffer} as the process buffer.
2399
2400 @item :coding @var{coding}
2401 Use @var{coding} as the coding system for this process. To specify
2402 different coding systems for decoding data from the connection and for
2403 encoding data sent to it, specify @code{(@var{decoding} .
2404 @var{encoding})} for @var{coding}.
2405
2406 If you don't specify this keyword at all, the default
2407 is to determine the coding systems from the data.
2408
2409 @item :noquery @var{query-flag}
2410 Initialize the process query flag to @var{query-flag}.
2411 @xref{Query Before Exit}.
2412
2413 @item :filter @var{filter}
2414 Initialize the process filter to @var{filter}.
2415
2416 @item :filter-multibyte @var{multibyte}
2417 If @var{multibyte} is non-@code{nil}, strings given to the process
2418 filter are multibyte, otherwise they are unibyte. The default is the
2419 default value of @code{enable-multibyte-characters}.
2420
2421 @item :sentinel @var{sentinel}
2422 Initialize the process sentinel to @var{sentinel}.
2423
2424 @item :log @var{log}
2425 Initialize the log function of a server process to @var{log}. The log
2426 function is called each time the server accepts a network connection
2427 from a client. The arguments passed to the log function are
2428 @var{server}, @var{connection}, and @var{message}; where @var{server}
2429 is the server process, @var{connection} is the new process for the
2430 connection, and @var{message} is a string describing what has
2431 happened.
2432
2433 @item :plist @var{plist}
2434 Initialize the process plist to @var{plist}.
2435 @end table
2436
2437 The original argument list, modified with the actual connection
2438 information, is available via the @code{process-contact} function.
2439 @end defun
2440
2441 @node Network Options
2442 @subsection Network Options
2443
2444 The following network options can be specified when you create a
2445 network process. Except for @code{:reuseaddr}, you can also set or
2446 modify these options later, using @code{set-network-process-option}.
2447
2448 For a server process, the options specified with
2449 @code{make-network-process} are not inherited by the client
2450 connections, so you will need to set the necessary options for each
2451 child connection as it is created.
2452
2453 @table @asis
2454 @item :bindtodevice @var{device-name}
2455 If @var{device-name} is a non-empty string identifying a network
2456 interface name (see @code{network-interface-list}), only handle
2457 packets received on that interface. If @var{device-name} is @code{nil}
2458 (the default), handle packets received on any interface.
2459
2460 Using this option may require special privileges on some systems.
2461
2462 @item :broadcast @var{broadcast-flag}
2463 If @var{broadcast-flag} is non-@code{nil} for a datagram process, the
2464 process will receive datagram packet sent to a broadcast address, and
2465 be able to send packets to a broadcast address. This is ignored for a stream
2466 connection.
2467
2468 @item :dontroute @var{dontroute-flag}
2469 If @var{dontroute-flag} is non-@code{nil}, the process can only send
2470 to hosts on the same network as the local host.
2471
2472 @item :keepalive @var{keepalive-flag}
2473 If @var{keepalive-flag} is non-@code{nil} for a stream connection,
2474 enable exchange of low-level keep-alive messages.
2475
2476 @item :linger @var{linger-arg}
2477 If @var{linger-arg} is non-@code{nil}, wait for successful
2478 transmission of all queued packets on the connection before it is
2479 deleted (see @code{delete-process}). If @var{linger-arg} is an
2480 integer, it specifies the maximum time in seconds to wait for queued
2481 packets to be sent before closing the connection. The default is
2482 @code{nil}, which means to discard unsent queued packets when the
2483 process is deleted.
2484
2485 @c FIXME Where out-of-band data is ...?
2486 @item :oobinline @var{oobinline-flag}
2487 If @var{oobinline-flag} is non-@code{nil} for a stream connection,
2488 receive out-of-band data in the normal data stream. Otherwise, ignore
2489 out-of-band data.
2490
2491 @item :priority @var{priority}
2492 Set the priority for packets sent on this connection to the integer
2493 @var{priority}. The interpretation of this number is protocol
2494 specific; such as setting the TOS (type of service) field on IP
2495 packets sent on this connection. It may also have system dependent
2496 effects, such as selecting a specific output queue on the network
2497 interface.
2498
2499 @item :reuseaddr @var{reuseaddr-flag}
2500 If @var{reuseaddr-flag} is non-@code{nil} (the default) for a stream
2501 server process, allow this server to reuse a specific port number (see
2502 @code{:service}), unless another process on this host is already
2503 listening on that port. If @var{reuseaddr-flag} is @code{nil}, there
2504 may be a period of time after the last use of that port (by any
2505 process on the host) where it is not possible to make a new server on
2506 that port.
2507 @end table
2508
2509 @defun set-network-process-option process option value &optional no-error
2510 This function sets or modifies a network option for network process
2511 @var{process}. The accepted options and values are as for
2512 @code{make-network-process}. If @var{no-error} is non-@code{nil},
2513 this function returns @code{nil} instead of signaling an error if
2514 @var{option} is not a supported option. If the function successfully
2515 completes, it returns @code{t}.
2516
2517 The current setting of an option is available via the
2518 @code{process-contact} function.
2519 @end defun
2520
2521 @node Network Feature Testing
2522 @subsection Testing Availability of Network Features
2523
2524 To test for the availability of a given network feature, use
2525 @code{featurep} like this:
2526
2527 @example
2528 (featurep 'make-network-process '(@var{keyword} @var{value}))
2529 @end example
2530
2531 @noindent
2532 The result of this form is @code{t} if it works to specify
2533 @var{keyword} with value @var{value} in @code{make-network-process}.
2534 Here are some of the @var{keyword}---@var{value} pairs you can test in
2535 this way.
2536
2537 @table @code
2538 @item (:nowait t)
2539 Non-@code{nil} if non-blocking connect is supported.
2540 @item (:type datagram)
2541 Non-@code{nil} if datagrams are supported.
2542 @item (:family local)
2543 Non-@code{nil} if local (a.k.a.@: ``UNIX domain'') sockets are supported.
2544 @item (:family ipv6)
2545 Non-@code{nil} if IPv6 is supported.
2546 @item (:service t)
2547 Non-@code{nil} if the system can select the port for a server.
2548 @end table
2549
2550 To test for the availability of a given network option, use
2551 @code{featurep} like this:
2552
2553 @example
2554 (featurep 'make-network-process '@var{keyword})
2555 @end example
2556
2557 @noindent
2558 The accepted @var{keyword} values are @code{:bindtodevice}, etc.
2559 For the complete list, @pxref{Network Options}. This form returns
2560 non-@code{nil} if that particular network option is supported by
2561 @code{make-network-process} (or @code{set-network-process-option}).
2562
2563 @node Misc Network
2564 @section Misc Network Facilities
2565
2566 These additional functions are useful for creating and operating
2567 on network connections. Note that they are supported only on some
2568 systems.
2569
2570 @defun network-interface-list
2571 This function returns a list describing the network interfaces
2572 of the machine you are using. The value is an alist whose
2573 elements have the form @code{(@var{name} . @var{address})}.
2574 @var{address} has the same form as the @var{local-address}
2575 and @var{remote-address} arguments to @code{make-network-process}.
2576 @end defun
2577
2578 @defun network-interface-info ifname
2579 This function returns information about the network interface named
2580 @var{ifname}. The value is a list of the form
2581 @code{(@var{addr} @var{bcast} @var{netmask} @var{hwaddr} @var{flags})}.
2582
2583 @table @var
2584 @item addr
2585 The Internet protocol address.
2586 @item bcast
2587 The broadcast address.
2588 @item netmask
2589 The network mask.
2590 @item hwaddr
2591 The layer 2 address (Ethernet MAC address, for instance).
2592 @item flags
2593 The current flags of the interface.
2594 @end table
2595 @end defun
2596
2597 @defun format-network-address address &optional omit-port
2598 This function converts the Lisp representation of a network address to
2599 a string.
2600
2601 A five-element vector @code{[@var{a} @var{b} @var{c} @var{d} @var{p}]}
2602 represents an IPv4 address @var{a}.@var{b}.@var{c}.@var{d} and port
2603 number @var{p}. @code{format-network-address} converts that to the
2604 string @code{"@var{a}.@var{b}.@var{c}.@var{d}:@var{p}"}.
2605
2606 A nine-element vector @code{[@var{a} @var{b} @var{c} @var{d} @var{e}
2607 @var{f} @var{g} @var{h} @var{p}]} represents an IPv6 address along
2608 with a port number. @code{format-network-address} converts that to
2609 the string
2610 @code{"[@var{a}:@var{b}:@var{c}:@var{d}:@var{e}:@var{f}:@var{g}:@var{h}]:@var{p}"}.
2611
2612 If the vector does not include the port number, @var{p}, or if
2613 @var{omit-port} is non-@code{nil}, the result does not include the
2614 @code{:@var{p}} suffix.
2615 @end defun
2616
2617 @node Serial Ports
2618 @section Communicating with Serial Ports
2619 @cindex @file{/dev/tty}
2620 @cindex @file{COM1}
2621 @cindex serial connections
2622
2623 Emacs can communicate with serial ports. For interactive use,
2624 @kbd{M-x serial-term} opens a terminal window. In a Lisp program,
2625 @code{make-serial-process} creates a process object.
2626
2627 The serial port can be configured at run-time, without having to
2628 close and re-open it. The function @code{serial-process-configure}
2629 lets you change the speed, bytesize, and other parameters. In a
2630 terminal window created by @code{serial-term}, you can click on the
2631 mode line for configuration.
2632
2633 A serial connection is represented by a process object, which can be
2634 used in a similar way to a subprocess or network process. You can send and
2635 receive data, and configure the serial port. A serial process object
2636 has no process ID, however, and you can't send signals to it, and the
2637 status codes are different from other types of processes.
2638 @code{delete-process} on the process object or @code{kill-buffer} on
2639 the process buffer close the connection, but this does not affect the
2640 device connected to the serial port.
2641
2642 The function @code{process-type} returns the symbol @code{serial}
2643 for a process object representing a serial port connection.
2644
2645 Serial ports are available on GNU/Linux, Unix, and MS Windows systems.
2646
2647 @deffn Command serial-term port speed
2648 Start a terminal-emulator for a serial port in a new buffer.
2649 @var{port} is the name of the serial port to connect to. For
2650 example, this could be @file{/dev/ttyS0} on Unix. On MS Windows, this
2651 could be @file{COM1}, or @file{\\.\COM10} (double the backslashes in
2652 Lisp strings).
2653
2654 @c FIXME is 9600 still the most common value, or is it 115200 now?
2655 @c (Same value, 9600, appears below as well.)
2656 @var{speed} is the speed of the serial port in bits per second. 9600
2657 is a common value. The buffer is in Term mode; see @ref{Term Mode,,,
2658 emacs, The GNU Emacs Manual}, for the commands to use in that buffer.
2659 You can change the speed and the configuration in the mode line menu.
2660 @end deffn
2661
2662 @defun make-serial-process &rest args
2663 This function creates a process and a buffer. Arguments are specified
2664 as keyword/argument pairs. Here's the list of the meaningful
2665 keywords, with the first two (@var{port} and @var{speed}) being mandatory:
2666
2667 @table @code
2668 @item :port @var{port}
2669 This is the name of the serial port. On Unix and GNU systems, this is
2670 a file name such as @file{/dev/ttyS0}. On Windows, this could be
2671 @file{COM1}, or @file{\\.\COM10} for ports higher than @file{COM9}
2672 (double the backslashes in Lisp strings).
2673
2674 @item :speed @var{speed}
2675 The speed of the serial port in bits per second. This function calls
2676 @code{serial-process-configure} to handle the speed; see the
2677 following documentation of that function for more details.
2678
2679 @item :name @var{name}
2680 The name of the process. If @var{name} is not given, @var{port} will
2681 serve as the process name as well.
2682
2683 @item :buffer @var{buffer}
2684 The buffer to associate with the process. The value can be either a
2685 buffer or a string that names a buffer. Process output goes at the
2686 end of that buffer, unless you specify an output stream or filter
2687 function to handle the output. If @var{buffer} is not given, the
2688 process buffer's name is taken from the value of the @code{:name}
2689 keyword.
2690
2691 @item :coding @var{coding}
2692 If @var{coding} is a symbol, it specifies the coding system used for
2693 both reading and writing for this process. If @var{coding} is a cons
2694 @code{(@var{decoding} . @var{encoding})}, @var{decoding} is used for
2695 reading, and @var{encoding} is used for writing. If not specified,
2696 the default is to determine the coding systems from the data itself.
2697
2698 @item :noquery @var{query-flag}
2699 Initialize the process query flag to @var{query-flag}. @xref{Query
2700 Before Exit}. The flags defaults to @code{nil} if unspecified.
2701
2702 @item :stop @var{bool}
2703 Start process in the ``stopped'' state if @var{bool} is
2704 non-@code{nil}. In the stopped state, a serial process does not
2705 accept incoming data, but you can send outgoing data. The stopped
2706 state is cleared by @code{continue-process} and set by
2707 @code{stop-process}.
2708
2709 @item :filter @var{filter}
2710 Install @var{filter} as the process filter.
2711
2712 @item :sentinel @var{sentinel}
2713 Install @var{sentinel} as the process sentinel.
2714
2715 @item :plist @var{plist}
2716 Install @var{plist} as the initial plist of the process.
2717
2718 @item :bytesize
2719 @itemx :parity
2720 @itemx :stopbits
2721 @itemx :flowcontrol
2722 These are handled by @code{serial-process-configure}, which is called
2723 by @code{make-serial-process}.
2724 @end table
2725
2726 The original argument list, possibly modified by later configuration,
2727 is available via the function @code{process-contact}.
2728
2729 Here is an example:
2730
2731 @example
2732 (make-serial-process :port "/dev/ttyS0" :speed 9600)
2733 @end example
2734 @end defun
2735
2736 @defun serial-process-configure &rest args
2737 @cindex baud, in serial connections
2738 @cindex bytesize, in serial connections
2739 @cindex parity, in serial connections
2740 @cindex stopbits, in serial connections
2741 @cindex flowcontrol, in serial connections
2742
2743 This function configures a serial port connection. Arguments are
2744 specified as keyword/argument pairs. Attributes that are not given
2745 are re-initialized from the process's current configuration (available
2746 via the function @code{process-contact}), or set to reasonable default
2747 values. The following arguments are defined:
2748
2749 @table @code
2750 @item :process @var{process}
2751 @itemx :name @var{name}
2752 @itemx :buffer @var{buffer}
2753 @itemx :port @var{port}
2754 Any of these arguments can be given to identify the process that is to
2755 be configured. If none of these arguments is given, the current
2756 buffer's process is used.
2757
2758 @item :speed @var{speed}
2759 The speed of the serial port in bits per second, a.k.a.@: @dfn{baud
2760 rate}. The value can be any number, but most serial ports work only
2761 at a few defined values between 1200 and 115200, with 9600 being the
2762 most common value. If @var{speed} is @code{nil}, the function ignores
2763 all other arguments and does not configure the port. This may be
2764 useful for special serial ports such as Bluetooth-to-serial converters,
2765 which can only be configured through @samp{AT} commands sent through the
2766 connection. The value of @code{nil} for @var{speed} is valid only for
2767 connections that were already opened by a previous call to
2768 @code{make-serial-process} or @code{serial-term}.
2769
2770 @item :bytesize @var{bytesize}
2771 The number of bits per byte, which can be 7 or 8. If @var{bytesize}
2772 is not given or @code{nil}, it defaults to 8.
2773
2774 @item :parity @var{parity}
2775 The value can be @code{nil} (don't use parity), the symbol
2776 @code{odd} (use odd parity), or the symbol @code{even} (use even
2777 parity). If @var{parity} is not given, it defaults to no parity.
2778
2779 @item :stopbits @var{stopbits}
2780 The number of stopbits used to terminate a transmission
2781 of each byte. @var{stopbits} can be 1 or 2. If @var{stopbits} is not
2782 given or @code{nil}, it defaults to 1.
2783
2784 @item :flowcontrol @var{flowcontrol}
2785 The type of flow control to use for this connection, which is either
2786 @code{nil} (don't use flow control), the symbol @code{hw} (use RTS/CTS
2787 hardware flow control), or the symbol @code{sw} (use XON/XOFF software
2788 flow control). If @var{flowcontrol} is not given, it defaults to no
2789 flow control.
2790 @end table
2791
2792 Internally, @code{make-serial-process} calls
2793 @code{serial-process-configure} for the initial configuration of the
2794 serial port.
2795 @end defun
2796
2797 @node Byte Packing
2798 @section Packing and Unpacking Byte Arrays
2799 @cindex byte packing and unpacking
2800
2801 This section describes how to pack and unpack arrays of bytes,
2802 usually for binary network protocols. These functions convert byte arrays
2803 to alists, and vice versa. The byte array can be represented as a
2804 @c FIXME? No multibyte?
2805 unibyte string or as a vector of integers, while the alist associates
2806 symbols either with fixed-size objects or with recursive sub-alists.
2807 To use the functions referred to in this section, load the
2808 @code{bindat} library.
2809 @c It doesn't have any autoloads.
2810
2811 @cindex serializing
2812 @cindex deserializing
2813 @cindex packing
2814 @cindex unpacking
2815 Conversion from byte arrays to nested alists is also known as
2816 @dfn{deserializing} or @dfn{unpacking}, while going in the opposite
2817 direction is also known as @dfn{serializing} or @dfn{packing}.
2818
2819 @menu
2820 * Bindat Spec:: Describing data layout.
2821 * Bindat Functions:: Doing the unpacking and packing.
2822 * Bindat Examples:: Samples of what bindat.el can do for you!
2823 @end menu
2824
2825 @node Bindat Spec
2826 @subsection Describing Data Layout
2827
2828 To control unpacking and packing, you write a @dfn{data layout
2829 specification}, a special nested list describing named and typed
2830 @dfn{fields}. This specification controls the length of each field to be
2831 processed, and how to pack or unpack it. We normally keep bindat specs
2832 in variables whose names end in @samp{-bindat-spec}; that kind of name
2833 is automatically recognized as ``risky''.
2834
2835 @cindex endianness
2836 @cindex big endian
2837 @cindex little endian
2838 @cindex network byte ordering
2839 A field's @dfn{type} describes the size (in bytes) of the object
2840 that the field represents and, in the case of multibyte fields, how
2841 the bytes are ordered within the field. The two possible orderings
2842 are ``big endian'' (also known as ``network byte ordering'') and
2843 ``little endian''. For instance, the number @code{#x23cd} (decimal
2844 9165) in big endian would be the two bytes @code{#x23} @code{#xcd};
2845 and in little endian, @code{#xcd} @code{#x23}. Here are the possible
2846 type values:
2847
2848 @table @code
2849 @item u8
2850 @itemx byte
2851 Unsigned byte, with length 1.
2852
2853 @item u16
2854 @itemx word
2855 @itemx short
2856 Unsigned integer in network byte order, with length 2.
2857
2858 @item u24
2859 Unsigned integer in network byte order, with length 3.
2860
2861 @item u32
2862 @itemx dword
2863 @itemx long
2864 Unsigned integer in network byte order, with length 4.
2865 Note: These values may be limited by Emacs's integer implementation limits.
2866
2867 @item u16r
2868 @itemx u24r
2869 @itemx u32r
2870 Unsigned integer in little endian order, with length 2, 3 and 4, respectively.
2871
2872 @item str @var{len}
2873 String of length @var{len}.
2874
2875 @item strz @var{len}
2876 Zero-terminated string, in a fixed-size field with length @var{len}.
2877
2878 @item vec @var{len} [@var{type}]
2879 Vector of @var{len} elements of type @var{type}, defaulting to bytes.
2880 The @var{type} is any of the simple types above, or another vector
2881 specified as a list of the form @code{(vec @var{len} [@var{type}])}.
2882
2883 @item ip
2884 @c FIXME? IPv6?
2885 Four-byte vector representing an Internet address. For example:
2886 @code{[127 0 0 1]} for localhost.
2887
2888 @item bits @var{len}
2889 List of set bits in @var{len} bytes. The bytes are taken in big
2890 endian order and the bits are numbered starting with @code{8 *
2891 @var{len} @minus{} 1} and ending with zero. For example: @code{bits
2892 2} unpacks @code{#x28} @code{#x1c} to @code{(2 3 4 11 13)} and
2893 @code{#x1c} @code{#x28} to @code{(3 5 10 11 12)}.
2894
2895 @item (eval @var{form})
2896 @var{form} is a Lisp expression evaluated at the moment the field is
2897 unpacked or packed. The result of the evaluation should be one of the
2898 above-listed type specifications.
2899 @end table
2900
2901 For a fixed-size field, the length @var{len} is given as an integer
2902 specifying the number of bytes in the field.
2903
2904 When the length of a field is not fixed, it typically depends on the
2905 value of a preceding field. In this case, the length @var{len} can be
2906 given either as a list @code{(@var{name} ...)} identifying a
2907 @dfn{field name} in the format specified for @code{bindat-get-field}
2908 below, or by an expression @code{(eval @var{form})} where @var{form}
2909 should evaluate to an integer, specifying the field length.
2910
2911 A field specification generally has the form @code{([@var{name}]
2912 @var{handler})}, where @var{name} is optional. Don't use names that
2913 are symbols meaningful as type specifications (above) or handler
2914 specifications (below), since that would be ambiguous. @var{name} can
2915 be a symbol or an expression @code{(eval @var{form})}, in which case
2916 @var{form} should evaluate to a symbol.
2917
2918 @var{handler} describes how to unpack or pack the field and can be one
2919 of the following:
2920
2921 @table @code
2922 @item @var{type}
2923 Unpack/pack this field according to the type specification @var{type}.
2924
2925 @item eval @var{form}
2926 Evaluate @var{form}, a Lisp expression, for side-effect only. If the
2927 field name is specified, the value is bound to that field name.
2928
2929 @item fill @var{len}
2930 Skip @var{len} bytes. In packing, this leaves them unchanged,
2931 which normally means they remain zero. In unpacking, this means
2932 they are ignored.
2933
2934 @item align @var{len}
2935 Skip to the next multiple of @var{len} bytes.
2936
2937 @item struct @var{spec-name}
2938 Process @var{spec-name} as a sub-specification. This describes a
2939 structure nested within another structure.
2940
2941 @item union @var{form} (@var{tag} @var{spec})@dots{}
2942 @c ??? I don't see how one would actually use this.
2943 @c ??? what kind of expression would be useful for @var{form}?
2944 Evaluate @var{form}, a Lisp expression, find the first @var{tag}
2945 that matches it, and process its associated data layout specification
2946 @var{spec}. Matching can occur in one of three ways:
2947
2948 @itemize
2949 @item
2950 If a @var{tag} has the form @code{(eval @var{expr})}, evaluate
2951 @var{expr} with the variable @code{tag} dynamically bound to the value
2952 of @var{form}. A non-@code{nil} result indicates a match.
2953
2954 @item
2955 @var{tag} matches if it is @code{equal} to the value of @var{form}.
2956
2957 @item
2958 @var{tag} matches unconditionally if it is @code{t}.
2959 @end itemize
2960
2961 @item repeat @var{count} @var{field-specs}@dots{}
2962 Process the @var{field-specs} recursively, in order, then repeat
2963 starting from the first one, processing all the specifications @var{count}
2964 times overall. The @var{count} is given using the same formats as a
2965 field length---if an @code{eval} form is used, it is evaluated just once.
2966 For correct operation, each specification in @var{field-specs} must
2967 include a name.
2968 @end table
2969
2970 For the @code{(eval @var{form})} forms used in a bindat specification,
2971 the @var{form} can access and update these dynamically bound variables
2972 during evaluation:
2973
2974 @table @code
2975 @item last
2976 Value of the last field processed.
2977
2978 @item bindat-raw
2979 The data as a byte array.
2980
2981 @item bindat-idx
2982 Current index (within @code{bindat-raw}) for unpacking or packing.
2983
2984 @item struct
2985 The alist containing the structured data that have been unpacked so
2986 far, or the entire structure being packed. You can use
2987 @code{bindat-get-field} to access specific fields of this structure.
2988
2989 @item count
2990 @itemx index
2991 Inside a @code{repeat} block, these contain the maximum number of
2992 repetitions (as specified by the @var{count} parameter), and the
2993 current repetition number (counting from 0). Setting @code{count} to
2994 zero will terminate the inner-most repeat block after the current
2995 repetition has completed.
2996 @end table
2997
2998 @node Bindat Functions
2999 @subsection Functions to Unpack and Pack Bytes
3000
3001 In the following documentation, @var{spec} refers to a data layout
3002 specification, @code{bindat-raw} to a byte array, and @var{struct} to an
3003 alist representing unpacked field data.
3004
3005 @defun bindat-unpack spec bindat-raw &optional bindat-idx
3006 @c FIXME? Again, no multibyte?
3007 This function unpacks data from the unibyte string or byte
3008 array @code{bindat-raw}
3009 according to @var{spec}. Normally, this starts unpacking at the
3010 beginning of the byte array, but if @var{bindat-idx} is non-@code{nil}, it
3011 specifies a zero-based starting position to use instead.
3012
3013 The value is an alist or nested alist in which each element describes
3014 one unpacked field.
3015 @end defun
3016
3017 @defun bindat-get-field struct &rest name
3018 This function selects a field's data from the nested alist
3019 @var{struct}. Usually @var{struct} was returned by
3020 @code{bindat-unpack}. If @var{name} corresponds to just one argument,
3021 that means to extract a top-level field value. Multiple @var{name}
3022 arguments specify repeated lookup of sub-structures. An integer name
3023 acts as an array index.
3024
3025 For example, if @var{name} is @code{(a b 2 c)}, that means to find
3026 field @code{c} in the third element of subfield @code{b} of field
3027 @code{a}. (This corresponds to @code{struct.a.b[2].c} in C.)
3028 @end defun
3029
3030 Although packing and unpacking operations change the organization of
3031 data (in memory), they preserve the data's @dfn{total length}, which is
3032 the sum of all the fields' lengths, in bytes. This value is not
3033 generally inherent in either the specification or alist alone; instead,
3034 both pieces of information contribute to its calculation. Likewise, the
3035 length of a string or array being unpacked may be longer than the data's
3036 total length as described by the specification.
3037
3038 @defun bindat-length spec struct
3039 This function returns the total length of the data in @var{struct},
3040 according to @var{spec}.
3041 @end defun
3042
3043 @defun bindat-pack spec struct &optional bindat-raw bindat-idx
3044 This function returns a byte array packed according to @var{spec} from
3045 the data in the alist @var{struct}. It normally creates and fills a
3046 new byte array starting at the beginning. However, if @var{bindat-raw}
3047 is non-@code{nil}, it specifies a pre-allocated unibyte string or vector to
3048 pack into. If @var{bindat-idx} is non-@code{nil}, it specifies the starting
3049 offset for packing into @code{bindat-raw}.
3050
3051 When pre-allocating, you should make sure @code{(length @var{bindat-raw})}
3052 meets or exceeds the total length to avoid an out-of-range error.
3053 @end defun
3054
3055 @defun bindat-ip-to-string ip
3056 Convert the Internet address vector @var{ip} to a string in the usual
3057 dotted notation.
3058 @c FIXME? Does it do IPv6?
3059
3060 @example
3061 (bindat-ip-to-string [127 0 0 1])
3062 @result{} "127.0.0.1"
3063 @end example
3064 @end defun
3065
3066 @node Bindat Examples
3067 @subsection Examples of Byte Unpacking and Packing
3068 @c FIXME? This seems a very long example for something that is not used
3069 @c very often. As of 24.1, gdb-mi.el is the only user of bindat.el in Emacs.
3070 @c Maybe one or both of these examples should just be moved to the
3071 @c commentary of bindat.el.
3072
3073 Here is a complete example of byte unpacking and packing:
3074
3075 @lisp
3076 (require 'bindat)
3077
3078 (defvar fcookie-index-spec
3079 '((:version u32)
3080 (:count u32)
3081 (:longest u32)
3082 (:shortest u32)
3083 (:flags u32)
3084 (:delim u8)
3085 (:ignored fill 3)
3086 (:offset repeat (:count) (:foo u32)))
3087 "Description of a fortune cookie index file's contents.")
3088
3089 (defun fcookie (cookies &optional index)
3090 "Display a random fortune cookie from file COOKIES.
3091 Optional second arg INDEX specifies the associated index
3092 filename, by default \"COOKIES.dat\". Display cookie text
3093 in buffer \"*Fortune Cookie: BASENAME*\", where BASENAME
3094 is COOKIES without the directory part."
3095 (interactive "fCookies file: ")
3096 (let* ((info (with-temp-buffer
3097 (insert-file-contents-literally
3098 (or index (concat cookies ".dat")))
3099 (bindat-unpack fcookie-index-spec
3100 (buffer-string))))
3101 (sel (random (bindat-get-field info :count)))
3102 (beg (cdar (bindat-get-field info :offset sel)))
3103 (end (or (cdar (bindat-get-field info
3104 :offset (1+ sel)))
3105 (nth 7 (file-attributes cookies)))))
3106 (switch-to-buffer
3107 (get-buffer-create
3108 (format "*Fortune Cookie: %s*"
3109 (file-name-nondirectory cookies))))
3110 (erase-buffer)
3111 (insert-file-contents-literally
3112 cookies nil beg (- end 3))))
3113
3114 (defun fcookie-create-index (cookies &optional index delim)
3115 "Scan file COOKIES, and write out its index file.
3116 Optional arg INDEX specifies the index filename, which by
3117 default is \"COOKIES.dat\". Optional arg DELIM specifies the
3118 unibyte character that, when found on a line of its own in
3119 COOKIES, indicates the border between entries."
3120 (interactive "fCookies file: ")
3121 (setq delim (or delim ?%))
3122 (let ((delim-line (format "\n%c\n" delim))
3123 (count 0)
3124 (max 0)
3125 min p q len offsets)
3126 (unless (= 3 (string-bytes delim-line))
3127 (error "Delimiter cannot be represented in one byte"))
3128 (with-temp-buffer
3129 (insert-file-contents-literally cookies)
3130 (while (and (setq p (point))
3131 (search-forward delim-line (point-max) t)
3132 (setq len (- (point) 3 p)))
3133 (setq count (1+ count)
3134 max (max max len)
3135 min (min (or min max) len)
3136 offsets (cons (1- p) offsets))))
3137 (with-temp-buffer
3138 (set-buffer-multibyte nil)
3139 (insert
3140 (bindat-pack
3141 fcookie-index-spec
3142 `((:version . 2)
3143 (:count . ,count)
3144 (:longest . ,max)
3145 (:shortest . ,min)
3146 (:flags . 0)
3147 (:delim . ,delim)
3148 (:offset . ,(mapcar (lambda (o)
3149 (list (cons :foo o)))
3150 (nreverse offsets))))))
3151 (let ((coding-system-for-write 'raw-text-unix))
3152 (write-file (or index (concat cookies ".dat")))))))
3153 @end lisp
3154
3155 The following is an example of defining and unpacking a complex
3156 structure. Consider the following C structures:
3157
3158 @example
3159 struct header @{
3160 unsigned long dest_ip;
3161 unsigned long src_ip;
3162 unsigned short dest_port;
3163 unsigned short src_port;
3164 @};
3165
3166 struct data @{
3167 unsigned char type;
3168 unsigned char opcode;
3169 unsigned short length; /* in network byte order */
3170 unsigned char id[8]; /* null-terminated string */
3171 unsigned char data[/* (length + 3) & ~3 */];
3172 @};
3173
3174 struct packet @{
3175 struct header header;
3176 unsigned long counters[2]; /* in little endian order */
3177 unsigned char items;
3178 unsigned char filler[3];
3179 struct data item[/* items */];
3180
3181 @};
3182 @end example
3183
3184 The corresponding data layout specification is:
3185
3186 @lisp
3187 (setq header-spec
3188 '((dest-ip ip)
3189 (src-ip ip)
3190 (dest-port u16)
3191 (src-port u16)))
3192
3193 (setq data-spec
3194 '((type u8)
3195 (opcode u8)
3196 (length u16) ; network byte order
3197 (id strz 8)
3198 (data vec (length))
3199 (align 4)))
3200
3201 (setq packet-spec
3202 '((header struct header-spec)
3203 (counters vec 2 u32r) ; little endian order
3204 (items u8)
3205 (fill 3)
3206 (item repeat (items)
3207 (struct data-spec))))
3208 @end lisp
3209
3210 A binary data representation is:
3211
3212 @lisp
3213 (setq binary-data
3214 [ 192 168 1 100 192 168 1 101 01 28 21 32
3215 160 134 1 0 5 1 0 0 2 0 0 0
3216 2 3 0 5 ?A ?B ?C ?D ?E ?F 0 0 1 2 3 4 5 0 0 0
3217 1 4 0 7 ?B ?C ?D ?E ?F ?G 0 0 6 7 8 9 10 11 12 0 ])
3218 @end lisp
3219
3220 The corresponding decoded structure is:
3221
3222 @lisp
3223 (setq decoded (bindat-unpack packet-spec binary-data))
3224 @result{}
3225 ((header
3226 (dest-ip . [192 168 1 100])
3227 (src-ip . [192 168 1 101])
3228 (dest-port . 284)
3229 (src-port . 5408))
3230 (counters . [100000 261])
3231 (items . 2)
3232 (item ((data . [1 2 3 4 5])
3233 (id . "ABCDEF")
3234 (length . 5)
3235 (opcode . 3)
3236 (type . 2))
3237 ((data . [6 7 8 9 10 11 12])
3238 (id . "BCDEFG")
3239 (length . 7)
3240 (opcode . 4)
3241 (type . 1))))
3242 @end lisp
3243
3244 An example of fetching data from this structure:
3245
3246 @lisp
3247 (bindat-get-field decoded 'item 1 'id)
3248 @result{} "BCDEFG"
3249 @end lisp