annotate src/process.h @ 112360:3215a5cff4dd

Declare some DEFVARs globally, not locally * gtkutil.h (x_gtk_use_old_file_dialog, x_gtk_show_hidden_files) (x_gtk_file_dialog_help_text, x_gtk_whole_detached_tool_bar): Declare. * gtkutil.c (xg_uses_old_file_dialog): (xg_get_file_with_chooser): (xg_tool_bar_detach_callback): Don't redeclare globals.
author Tom Tromey <tromey@redhat.com>
date Tue, 18 Jan 2011 10:28:28 -0700
parents 56d3e9c28eb0
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
365
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
1 /* Definitions for asynchronous process control in GNU Emacs.
75227
e90d04cd455a Update copyright for years from Emacs 21 to present (mainly adding
Glenn Morris <rgm@gnu.org>
parents: 72726
diff changeset
2 Copyright (C) 1985, 1994, 2001, 2002, 2003, 2004,
112218
376148b31b5e Add 2011 to FSF/AIST copyright years.
Glenn Morris <rgm@gnu.org>
parents: 109164
diff changeset
3 2005, 2006, 2007, 2008, 2009, 2010, 2011 Free Software Foundation, Inc.
365
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
4
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
5 This file is part of GNU Emacs.
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
6
94994
29adfc9354e7 Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 93201
diff changeset
7 GNU Emacs is free software: you can redistribute it and/or modify
365
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
8 it under the terms of the GNU General Public License as published by
94994
29adfc9354e7 Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 93201
diff changeset
9 the Free Software Foundation, either version 3 of the License, or
29adfc9354e7 Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 93201
diff changeset
10 (at your option) any later version.
365
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
11
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
12 GNU Emacs is distributed in the hope that it will be useful,
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
15 GNU General Public License for more details.
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
16
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
17 You should have received a copy of the GNU General Public License
94994
29adfc9354e7 Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents: 93201
diff changeset
18 along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
365
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
19
70209
7077caf6dc5a Include headers for pid_t.
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 69873
diff changeset
20 #ifdef HAVE_SYS_TYPES_H
7077caf6dc5a Include headers for pid_t.
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 69873
diff changeset
21 #include <sys/types.h>
7077caf6dc5a Include headers for pid_t.
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 69873
diff changeset
22 #endif
112317
7df2e30d72ec Include <unistd.h> unilaterally.
Paul Eggert <eggert@cs.ucla.edu>
parents: 110648
diff changeset
23
70209
7077caf6dc5a Include headers for pid_t.
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 69873
diff changeset
24 #include <unistd.h>
365
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
25
110584
9d94d76ce611 Set up GnuTLS support.
Ted Zlatanov <tzz@lifelogs.com>
parents: 109748
diff changeset
26 #ifdef HAVE_GNUTLS
9d94d76ce611 Set up GnuTLS support.
Ted Zlatanov <tzz@lifelogs.com>
parents: 109748
diff changeset
27 #include "gnutls.h"
9d94d76ce611 Set up GnuTLS support.
Ted Zlatanov <tzz@lifelogs.com>
parents: 109748
diff changeset
28 #endif
9d94d76ce611 Set up GnuTLS support.
Ted Zlatanov <tzz@lifelogs.com>
parents: 109748
diff changeset
29
21849
96fd475a324d (struct process): Make inherit_coding_system_flag a Lisp_Object.
Richard M. Stallman <rms@gnu.org>
parents: 21657
diff changeset
30 /* This structure records information about a subprocess
96fd475a324d (struct process): Make inherit_coding_system_flag a Lisp_Object.
Richard M. Stallman <rms@gnu.org>
parents: 21657
diff changeset
31 or network connection.
96fd475a324d (struct process): Make inherit_coding_system_flag a Lisp_Object.
Richard M. Stallman <rms@gnu.org>
parents: 21657
diff changeset
32
96fd475a324d (struct process): Make inherit_coding_system_flag a Lisp_Object.
Richard M. Stallman <rms@gnu.org>
parents: 21657
diff changeset
33 Every field in this structure except for the first two
96fd475a324d (struct process): Make inherit_coding_system_flag a Lisp_Object.
Richard M. Stallman <rms@gnu.org>
parents: 21657
diff changeset
34 must be a Lisp_Object, for GC's sake. */
365
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
35
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
36 struct Lisp_Process
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
37 {
85022
96eb42c9e0e3 * window.h (struct window):
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 82365
diff changeset
38 EMACS_UINT size;
365
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
39 struct Lisp_Vector *v_next;
8888
84527c2d9f75 (struct process): New field tty_name.
Richard M. Stallman <rms@gnu.org>
parents: 7307
diff changeset
40 /* Name of subprocess terminal. */
84527c2d9f75 (struct process): New field tty_name.
Richard M. Stallman <rms@gnu.org>
parents: 7307
diff changeset
41 Lisp_Object tty_name;
365
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
42 /* Name of this process */
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
43 Lisp_Object name;
43967
7e0389460d9d (struct Lisp_Process): New member log.
Kim F. Storm <storm@cua.dk>
parents: 39935
diff changeset
44 /* List of command arguments that this process was run with.
7e0389460d9d (struct Lisp_Process): New member log.
Kim F. Storm <storm@cua.dk>
parents: 39935
diff changeset
45 Is set to t for a stopped network process; nil otherwise. */
365
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
46 Lisp_Object command;
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
47 /* (funcall FILTER PROC STRING) (if FILTER is non-nil)
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
48 to dispose of a bunch of chars from the process all at once */
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
49 Lisp_Object filter;
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
50 /* (funcall SENTINEL PROCESS) when process state changes */
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
51 Lisp_Object sentinel;
43967
7e0389460d9d (struct Lisp_Process): New member log.
Kim F. Storm <storm@cua.dk>
parents: 39935
diff changeset
52 /* (funcall LOG SERVER CLIENT MESSAGE) when a server process
7e0389460d9d (struct Lisp_Process): New member log.
Kim F. Storm <storm@cua.dk>
parents: 39935
diff changeset
53 accepts a connection from a client. */
7e0389460d9d (struct Lisp_Process): New member log.
Kim F. Storm <storm@cua.dk>
parents: 39935
diff changeset
54 Lisp_Object log;
365
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
55 /* Buffer that output is going to */
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
56 Lisp_Object buffer;
95884
d6a4488883dc Daniel Engeler <engeler at gmail.com>
Glenn Morris <rgm@gnu.org>
parents: 94994
diff changeset
57 /* t if this is a real child process. For a network or serial
d6a4488883dc Daniel Engeler <engeler at gmail.com>
Glenn Morris <rgm@gnu.org>
parents: 94994
diff changeset
58 connection, it is a plist based on the arguments to
d6a4488883dc Daniel Engeler <engeler at gmail.com>
Glenn Morris <rgm@gnu.org>
parents: 94994
diff changeset
59 make-network-process or make-serial-process. */
365
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
60 Lisp_Object childp;
49222
bfa7cad7b524 (struct Lisp_Process): New member plist replaces old
Kim F. Storm <storm@cua.dk>
parents: 49163
diff changeset
61 /* Plist for programs to keep per-process state information, parameters, etc. */
bfa7cad7b524 (struct Lisp_Process): New member plist replaces old
Kim F. Storm <storm@cua.dk>
parents: 49163
diff changeset
62 Lisp_Object plist;
95884
d6a4488883dc Daniel Engeler <engeler at gmail.com>
Glenn Morris <rgm@gnu.org>
parents: 94994
diff changeset
63 /* Symbol indicating the type of process: real, network, serial */
d6a4488883dc Daniel Engeler <engeler at gmail.com>
Glenn Morris <rgm@gnu.org>
parents: 94994
diff changeset
64 Lisp_Object type;
365
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
65 /* Marker set to end of last buffer-inserted output from this process */
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
66 Lisp_Object mark;
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
67 /* Symbol indicating status of process.
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
68 This may be a symbol: run, open, or closed.
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
69 Or it may be a list, whose car is stop, exit or signal
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
70 and whose cdr is a pair (EXIT_CODE . COREDUMP_FLAG)
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
71 or (SIGNAL_NUMBER . COREDUMP_FLAG). */
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
72 Lisp_Object status;
17042
00b923d54108 (struct Lisp_Process): New members
Karl Heuer <kwzh@gnu.org>
parents: 16059
diff changeset
73 /* Coding-system for decoding the input from this process. */
00b923d54108 (struct Lisp_Process): New members
Karl Heuer <kwzh@gnu.org>
parents: 16059
diff changeset
74 Lisp_Object decode_coding_system;
00b923d54108 (struct Lisp_Process): New members
Karl Heuer <kwzh@gnu.org>
parents: 16059
diff changeset
75 /* Working buffer for decoding. */
00b923d54108 (struct Lisp_Process): New members
Karl Heuer <kwzh@gnu.org>
parents: 16059
diff changeset
76 Lisp_Object decoding_buf;
00b923d54108 (struct Lisp_Process): New members
Karl Heuer <kwzh@gnu.org>
parents: 16059
diff changeset
77 /* Coding-system for encoding the output to this process. */
00b923d54108 (struct Lisp_Process): New members
Karl Heuer <kwzh@gnu.org>
parents: 16059
diff changeset
78 Lisp_Object encode_coding_system;
00b923d54108 (struct Lisp_Process): New members
Karl Heuer <kwzh@gnu.org>
parents: 16059
diff changeset
79 /* Working buffer for encoding. */
00b923d54108 (struct Lisp_Process): New members
Karl Heuer <kwzh@gnu.org>
parents: 16059
diff changeset
80 Lisp_Object encoding_buf;
69873
2d844bbbccd4 * process.h (struct Lisp_Process): Replace Lisp_Objects `pid',
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 68651
diff changeset
81
110584
9d94d76ce611 Set up GnuTLS support.
Ted Zlatanov <tzz@lifelogs.com>
parents: 109748
diff changeset
82 #ifdef HAVE_GNUTLS
9d94d76ce611 Set up GnuTLS support.
Ted Zlatanov <tzz@lifelogs.com>
parents: 109748
diff changeset
83 Lisp_Object gnutls_cred_type;
9d94d76ce611 Set up GnuTLS support.
Ted Zlatanov <tzz@lifelogs.com>
parents: 109748
diff changeset
84 #endif
9d94d76ce611 Set up GnuTLS support.
Ted Zlatanov <tzz@lifelogs.com>
parents: 109748
diff changeset
85
69873
2d844bbbccd4 * process.h (struct Lisp_Process): Replace Lisp_Objects `pid',
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 68651
diff changeset
86 /* After this point, there are no Lisp_Objects any more. */
81826
077a1e6fd3f2 (struct Lisp_Process): Turn slots infd, outfd, kill_without_query, pty_flag,
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 75227
diff changeset
87 /* alloc.c assumes that `pid' is the first such non-Lisp slot. */
69873
2d844bbbccd4 * process.h (struct Lisp_Process): Replace Lisp_Objects `pid',
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 68651
diff changeset
88
2d844bbbccd4 * process.h (struct Lisp_Process): Replace Lisp_Objects `pid',
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 68651
diff changeset
89 /* Number of this process.
2d844bbbccd4 * process.h (struct Lisp_Process): Replace Lisp_Objects `pid',
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 68651
diff changeset
90 allocate_process assumes this is the first non-Lisp_Object field.
95884
d6a4488883dc Daniel Engeler <engeler at gmail.com>
Glenn Morris <rgm@gnu.org>
parents: 94994
diff changeset
91 A value 0 is used for pseudo-processes such as network or serial
d6a4488883dc Daniel Engeler <engeler at gmail.com>
Glenn Morris <rgm@gnu.org>
parents: 94994
diff changeset
92 connections. */
69873
2d844bbbccd4 * process.h (struct Lisp_Process): Replace Lisp_Objects `pid',
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 68651
diff changeset
93 pid_t pid;
81826
077a1e6fd3f2 (struct Lisp_Process): Turn slots infd, outfd, kill_without_query, pty_flag,
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 75227
diff changeset
94 /* Descriptor by which we read from this process */
077a1e6fd3f2 (struct Lisp_Process): Turn slots infd, outfd, kill_without_query, pty_flag,
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 75227
diff changeset
95 int infd;
077a1e6fd3f2 (struct Lisp_Process): Turn slots infd, outfd, kill_without_query, pty_flag,
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 75227
diff changeset
96 /* Descriptor by which we write to this process */
077a1e6fd3f2 (struct Lisp_Process): Turn slots infd, outfd, kill_without_query, pty_flag,
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 75227
diff changeset
97 int outfd;
077a1e6fd3f2 (struct Lisp_Process): Turn slots infd, outfd, kill_without_query, pty_flag,
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 75227
diff changeset
98 /* Event-count of last event in which this process changed status. */
077a1e6fd3f2 (struct Lisp_Process): Turn slots infd, outfd, kill_without_query, pty_flag,
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 75227
diff changeset
99 int tick;
077a1e6fd3f2 (struct Lisp_Process): Turn slots infd, outfd, kill_without_query, pty_flag,
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 75227
diff changeset
100 /* Event-count of last such event reported. */
077a1e6fd3f2 (struct Lisp_Process): Turn slots infd, outfd, kill_without_query, pty_flag,
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 75227
diff changeset
101 int update_tick;
077a1e6fd3f2 (struct Lisp_Process): Turn slots infd, outfd, kill_without_query, pty_flag,
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 75227
diff changeset
102 /* Size of carryover in decoding. */
077a1e6fd3f2 (struct Lisp_Process): Turn slots infd, outfd, kill_without_query, pty_flag,
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 75227
diff changeset
103 int decoding_carryover;
077a1e6fd3f2 (struct Lisp_Process): Turn slots infd, outfd, kill_without_query, pty_flag,
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 75227
diff changeset
104 /* Hysteresis to try to read process output in larger blocks.
077a1e6fd3f2 (struct Lisp_Process): Turn slots infd, outfd, kill_without_query, pty_flag,
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 75227
diff changeset
105 On some systems, e.g. GNU/Linux, Emacs is seen as
077a1e6fd3f2 (struct Lisp_Process): Turn slots infd, outfd, kill_without_query, pty_flag,
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 75227
diff changeset
106 an interactive app also when reading process output, meaning
077a1e6fd3f2 (struct Lisp_Process): Turn slots infd, outfd, kill_without_query, pty_flag,
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 75227
diff changeset
107 that process output can be read in as little as 1 byte at a
077a1e6fd3f2 (struct Lisp_Process): Turn slots infd, outfd, kill_without_query, pty_flag,
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 75227
diff changeset
108 time. Value is micro-seconds to delay reading output from
077a1e6fd3f2 (struct Lisp_Process): Turn slots infd, outfd, kill_without_query, pty_flag,
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 75227
diff changeset
109 this process. Range is 0 .. 50000. */
077a1e6fd3f2 (struct Lisp_Process): Turn slots infd, outfd, kill_without_query, pty_flag,
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 75227
diff changeset
110 int read_output_delay;
077a1e6fd3f2 (struct Lisp_Process): Turn slots infd, outfd, kill_without_query, pty_flag,
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 75227
diff changeset
111 /* Should we delay reading output from this process.
077a1e6fd3f2 (struct Lisp_Process): Turn slots infd, outfd, kill_without_query, pty_flag,
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 75227
diff changeset
112 Initialized from `Vprocess_adaptive_read_buffering'.
077a1e6fd3f2 (struct Lisp_Process): Turn slots infd, outfd, kill_without_query, pty_flag,
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 75227
diff changeset
113 0 = nil, 1 = t, 2 = other. */
92619
6c9be1557979 (struct Lisp_Process): Declare bit fields as unsigned.
Andreas Schwab <schwab@suse.de>
parents: 87649
diff changeset
114 unsigned int adaptive_read_buffering : 2;
81826
077a1e6fd3f2 (struct Lisp_Process): Turn slots infd, outfd, kill_without_query, pty_flag,
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 75227
diff changeset
115 /* Skip reading this process on next read. */
92619
6c9be1557979 (struct Lisp_Process): Declare bit fields as unsigned.
Andreas Schwab <schwab@suse.de>
parents: 87649
diff changeset
116 unsigned int read_output_skip : 1;
81826
077a1e6fd3f2 (struct Lisp_Process): Turn slots infd, outfd, kill_without_query, pty_flag,
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 75227
diff changeset
117 /* Non-nil means kill silently if Emacs is exited.
077a1e6fd3f2 (struct Lisp_Process): Turn slots infd, outfd, kill_without_query, pty_flag,
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 75227
diff changeset
118 This is the inverse of the `query-on-exit' flag. */
92619
6c9be1557979 (struct Lisp_Process): Declare bit fields as unsigned.
Andreas Schwab <schwab@suse.de>
parents: 87649
diff changeset
119 unsigned int kill_without_query : 1;
81826
077a1e6fd3f2 (struct Lisp_Process): Turn slots infd, outfd, kill_without_query, pty_flag,
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 75227
diff changeset
120 /* Non-nil if communicating through a pty. */
92619
6c9be1557979 (struct Lisp_Process): Declare bit fields as unsigned.
Andreas Schwab <schwab@suse.de>
parents: 87649
diff changeset
121 unsigned int pty_flag : 1;
81826
077a1e6fd3f2 (struct Lisp_Process): Turn slots infd, outfd, kill_without_query, pty_flag,
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 75227
diff changeset
122 /* Flag to set coding-system of the process buffer from the
077a1e6fd3f2 (struct Lisp_Process): Turn slots infd, outfd, kill_without_query, pty_flag,
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 75227
diff changeset
123 coding_system used to decode process output. */
92619
6c9be1557979 (struct Lisp_Process): Declare bit fields as unsigned.
Andreas Schwab <schwab@suse.de>
parents: 87649
diff changeset
124 unsigned int inherit_coding_system_flag : 1;
69873
2d844bbbccd4 * process.h (struct Lisp_Process): Replace Lisp_Objects `pid',
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 68651
diff changeset
125 /* Record the process status in the raw form in which it comes from `wait'.
2d844bbbccd4 * process.h (struct Lisp_Process): Replace Lisp_Objects `pid',
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 68651
diff changeset
126 This is to avoid consing in a signal handler. The `raw_status_new'
2d844bbbccd4 * process.h (struct Lisp_Process): Replace Lisp_Objects `pid',
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 68651
diff changeset
127 flag indicates that `raw_status' contains a new status that still
2d844bbbccd4 * process.h (struct Lisp_Process): Replace Lisp_Objects `pid',
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 68651
diff changeset
128 needs to be synced to `status'. */
92619
6c9be1557979 (struct Lisp_Process): Declare bit fields as unsigned.
Andreas Schwab <schwab@suse.de>
parents: 87649
diff changeset
129 unsigned int raw_status_new : 1;
69873
2d844bbbccd4 * process.h (struct Lisp_Process): Replace Lisp_Objects `pid',
Stefan Monnier <monnier@iro.umontreal.ca>
parents: 68651
diff changeset
130 int raw_status;
110584
9d94d76ce611 Set up GnuTLS support.
Ted Zlatanov <tzz@lifelogs.com>
parents: 109748
diff changeset
131
9d94d76ce611 Set up GnuTLS support.
Ted Zlatanov <tzz@lifelogs.com>
parents: 109748
diff changeset
132 #ifdef HAVE_GNUTLS
9d94d76ce611 Set up GnuTLS support.
Ted Zlatanov <tzz@lifelogs.com>
parents: 109748
diff changeset
133 gnutls_initstage_t gnutls_initstage;
9d94d76ce611 Set up GnuTLS support.
Ted Zlatanov <tzz@lifelogs.com>
parents: 109748
diff changeset
134 gnutls_session_t gnutls_state;
110611
6c735824d0c1 Add gnutls logging and clean up various gnutls bits.
Lars Magne Ingebrigtsen <larsi@gnus.org>
parents: 110592
diff changeset
135 gnutls_certificate_client_credentials gnutls_x509_cred;
6c735824d0c1 Add gnutls logging and clean up various gnutls bits.
Lars Magne Ingebrigtsen <larsi@gnus.org>
parents: 110592
diff changeset
136 gnutls_anon_client_credentials_t gnutls_anon_cred;
6c735824d0c1 Add gnutls logging and clean up various gnutls bits.
Lars Magne Ingebrigtsen <larsi@gnus.org>
parents: 110592
diff changeset
137 int gnutls_log_level;
110648
256dd50b2a63 Make sure all reads/writes to gnutls streams go via the gnutls functions.
Lars Magne Ingebrigtsen <larsi@gnus.org>
parents: 110611
diff changeset
138 int gnutls_p;
110584
9d94d76ce611 Set up GnuTLS support.
Ted Zlatanov <tzz@lifelogs.com>
parents: 109748
diff changeset
139 #endif
365
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
140 };
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
141
21849
96fd475a324d (struct process): Make inherit_coding_system_flag a Lisp_Object.
Richard M. Stallman <rms@gnu.org>
parents: 21657
diff changeset
142 /* Every field in the preceding structure except for the first two
96fd475a324d (struct process): Make inherit_coding_system_flag a Lisp_Object.
Richard M. Stallman <rms@gnu.org>
parents: 21657
diff changeset
143 must be a Lisp_Object, for GC's sake. */
96fd475a324d (struct process): Make inherit_coding_system_flag a Lisp_Object.
Richard M. Stallman <rms@gnu.org>
parents: 21657
diff changeset
144
365
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
145 #define ChannelMask(n) (1<<(n))
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
146
6165
9c0cc4128da8 (chan_process, Vprocess_alist): Declared.
Richard M. Stallman <rms@gnu.org>
parents: 2432
diff changeset
147 /* Indexed by descriptor, gives the process (if any) for that descriptor. */
6191
84fc456177e2 (chan_process): Don't specify size.
Karl Heuer <kwzh@gnu.org>
parents: 6165
diff changeset
148 extern Lisp_Object chan_process[];
6165
9c0cc4128da8 (chan_process, Vprocess_alist): Declared.
Richard M. Stallman <rms@gnu.org>
parents: 2432
diff changeset
149
9c0cc4128da8 (chan_process, Vprocess_alist): Declared.
Richard M. Stallman <rms@gnu.org>
parents: 2432
diff changeset
150 /* Alist of elements (NAME . PROCESS). */
9c0cc4128da8 (chan_process, Vprocess_alist): Declared.
Richard M. Stallman <rms@gnu.org>
parents: 2432
diff changeset
151 extern Lisp_Object Vprocess_alist;
9c0cc4128da8 (chan_process, Vprocess_alist): Declared.
Richard M. Stallman <rms@gnu.org>
parents: 2432
diff changeset
152
78501
1677cf1c2509 Replace `iff' in comments.
Glenn Morris <rgm@gnu.org>
parents: 78260
diff changeset
153 /* True if we are about to fork off a synchronous process or if we
365
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
154 are waiting for it. */
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
155 extern int synch_process_alive;
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
156
14036
621a575db6f7 Comment fixes.
Karl Heuer <kwzh@gnu.org>
parents: 12244
diff changeset
157 /* Communicate exit status of sync process to from sigchld_handler
546
c10a468c6203 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 365
diff changeset
158 to Fcall_process. */
c10a468c6203 entered into RCS
Jim Blandy <jimb@redhat.com>
parents: 365
diff changeset
159
365
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
160 /* Nonzero => this is a string explaining death of synchronous subprocess. */
109748
e2f8226efb99 Fix -Wwrite_strings in general and for Gtk+ specific code.
Jan D <jan.h.d@swipnet.se>
parents: 109670
diff changeset
161 extern const char *synch_process_death;
365
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
162
53714
77ad9650fc55 synch_process_termsig new variable.
Jan Djärv <jan.h.d@swipnet.se>
parents: 53471
diff changeset
163 /* Nonzero => this is the signal number that terminated the subprocess. */
53726
f37373c2902a * process.h: Add extern to synch_process_termsig.
Jan Djärv <jan.h.d@swipnet.se>
parents: 53714
diff changeset
164 extern int synch_process_termsig;
53714
77ad9650fc55 synch_process_termsig new variable.
Jan Djärv <jan.h.d@swipnet.se>
parents: 53471
diff changeset
165
365
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
166 /* If synch_process_death is zero,
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
167 this is exit code of synchronous subprocess. */
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
168 extern int synch_process_retcode;
cba0546ba47c Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
169
2432
17a84e60603b New macros NULL_DEVICE and EXEC_SUFFIXES, to give the name of the
Jim Blandy <jimb@redhat.com>
parents: 546
diff changeset
170 /* The name of the file open to get a null file, or a data sink.
97142
c3512b2085a0 * bitmaps/README:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 95884
diff changeset
171 MS-DOS, and OS/2 redefine this. */
2432
17a84e60603b New macros NULL_DEVICE and EXEC_SUFFIXES, to give the name of the
Jim Blandy <jimb@redhat.com>
parents: 546
diff changeset
172 #ifndef NULL_DEVICE
17a84e60603b New macros NULL_DEVICE and EXEC_SUFFIXES, to give the name of the
Jim Blandy <jimb@redhat.com>
parents: 546
diff changeset
173 #define NULL_DEVICE "/dev/null"
17a84e60603b New macros NULL_DEVICE and EXEC_SUFFIXES, to give the name of the
Jim Blandy <jimb@redhat.com>
parents: 546
diff changeset
174 #endif
52401
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 49903
diff changeset
175
72726
c7ba95ddeb1d (inhibit_sentinels): Add decl.
Richard M. Stallman <rms@gnu.org>
parents: 70209
diff changeset
176 /* Nonzero means don't run process sentinels. This is used
c7ba95ddeb1d (inhibit_sentinels): Add decl.
Richard M. Stallman <rms@gnu.org>
parents: 70209
diff changeset
177 when exiting. */
c7ba95ddeb1d (inhibit_sentinels): Add decl.
Richard M. Stallman <rms@gnu.org>
parents: 70209
diff changeset
178 extern int inhibit_sentinels;
c7ba95ddeb1d (inhibit_sentinels): Add decl.
Richard M. Stallman <rms@gnu.org>
parents: 70209
diff changeset
179
97366
d2c211c8ceda (w32_list_system_processes, w32_system_process_attributes): Add prototypes.
Eli Zaretskii <eliz@gnu.org>
parents: 97142
diff changeset
180 extern Lisp_Object Qeuid, Qegid, Qcomm, Qstate, Qppid, Qpgrp, Qsess, Qttname;
d2c211c8ceda (w32_list_system_processes, w32_system_process_attributes): Add prototypes.
Eli Zaretskii <eliz@gnu.org>
parents: 97142
diff changeset
181 extern Lisp_Object Qminflt, Qmajflt, Qcminflt, Qcmajflt, Qutime, Qstime;
d2c211c8ceda (w32_list_system_processes, w32_system_process_attributes): Add prototypes.
Eli Zaretskii <eliz@gnu.org>
parents: 97142
diff changeset
182 extern Lisp_Object Qcutime, Qpri, Qnice, Qthcount, Qstart, Qvsize, Qrss, Qargs;
d2c211c8ceda (w32_list_system_processes, w32_system_process_attributes): Add prototypes.
Eli Zaretskii <eliz@gnu.org>
parents: 97142
diff changeset
183 extern Lisp_Object Quser, Qgroup, Qetime, Qpcpu, Qpmem, Qtpgid, Qcstime;
100829
b14d829e1272 Declare Qtime and Qctime.
Eli Zaretskii <eliz@gnu.org>
parents: 100565
diff changeset
184 extern Lisp_Object Qtime, Qctime;
109670
7b41c068528a Move declarations to header files.
Dan Nicolaescu <dann@ics.uci.edu>
parents: 109164
diff changeset
185 extern Lisp_Object QCport, QCspeed, QCprocess;
7b41c068528a Move declarations to header files.
Dan Nicolaescu <dann@ics.uci.edu>
parents: 109164
diff changeset
186 extern Lisp_Object QCbytesize, QCstopbits, QCparity, Qodd, Qeven;
7b41c068528a Move declarations to header files.
Dan Nicolaescu <dann@ics.uci.edu>
parents: 109164
diff changeset
187 extern Lisp_Object QCflowcontrol, Qhw, Qsw, QCsummary;
97366
d2c211c8ceda (w32_list_system_processes, w32_system_process_attributes): Add prototypes.
Eli Zaretskii <eliz@gnu.org>
parents: 97142
diff changeset
188
100565
dcc7f5970d5c Reorganize implementation of Flist_system_processes and
Dan Nicolaescu <dann@ics.uci.edu>
parents: 97366
diff changeset
189 extern Lisp_Object list_system_processes (void);
dcc7f5970d5c Reorganize implementation of Flist_system_processes and
Dan Nicolaescu <dann@ics.uci.edu>
parents: 97366
diff changeset
190 extern Lisp_Object system_process_attributes (Lisp_Object);
dcc7f5970d5c Reorganize implementation of Flist_system_processes and
Dan Nicolaescu <dann@ics.uci.edu>
parents: 97366
diff changeset
191
109164
a7b09b567d58 If kbd_buffer is becoming full, stop reading until it drains (Bug#6571).
Jan D <jan.h.d@swipnet.se>
parents: 106815
diff changeset
192 extern void hold_keyboard_input (void);
a7b09b567d58 If kbd_buffer is becoming full, stop reading until it drains (Bug#6571).
Jan D <jan.h.d@swipnet.se>
parents: 106815
diff changeset
193 extern void unhold_keyboard_input (void);
a7b09b567d58 If kbd_buffer is becoming full, stop reading until it drains (Bug#6571).
Jan D <jan.h.d@swipnet.se>
parents: 106815
diff changeset
194 extern int kbd_on_hold_p (void);
a7b09b567d58 If kbd_buffer is becoming full, stop reading until it drains (Bug#6571).
Jan D <jan.h.d@swipnet.se>
parents: 106815
diff changeset
195
110592
c06958da83b5 Add fd handling with callbacks to select, dbus needs it for async operation.
Jan D <jan.h.d@swipnet.se>
parents: 110584
diff changeset
196 typedef void (*fd_callback)(int fd, void *data, int for_read);
c06958da83b5 Add fd handling with callbacks to select, dbus needs it for async operation.
Jan D <jan.h.d@swipnet.se>
parents: 110584
diff changeset
197
c06958da83b5 Add fd handling with callbacks to select, dbus needs it for async operation.
Jan D <jan.h.d@swipnet.se>
parents: 110584
diff changeset
198 extern void add_read_fd (int fd, fd_callback func, void *data);
c06958da83b5 Add fd handling with callbacks to select, dbus needs it for async operation.
Jan D <jan.h.d@swipnet.se>
parents: 110584
diff changeset
199 extern void delete_read_fd (int fd);
c06958da83b5 Add fd handling with callbacks to select, dbus needs it for async operation.
Jan D <jan.h.d@swipnet.se>
parents: 110584
diff changeset
200 extern void add_write_fd (int fd, fd_callback func, void *data);
c06958da83b5 Add fd handling with callbacks to select, dbus needs it for async operation.
Jan D <jan.h.d@swipnet.se>
parents: 110584
diff changeset
201 extern void delete_write_fd (int fd);
c06958da83b5 Add fd handling with callbacks to select, dbus needs it for async operation.
Jan D <jan.h.d@swipnet.se>
parents: 110584
diff changeset
202