Mercurial > vim
annotate src/pty.c @ 27140:a9eeb18e749c v8.2.4099
patch 8.2.4099: Vim9: cannot use Vim9 syntax in mapping
Commit: https://github.com/vim/vim/commit/e32c3c462ce9b3163a4a4bffd985897910885d29
Author: Bram Moolenaar <Bram@vim.org>
Date: Sat Jan 15 18:26:04 2022 +0000
patch 8.2.4099: Vim9: cannot use Vim9 syntax in mapping
Problem: Vim9: cannot use Vim9 syntax in mapping.
Solution: Add <ScriptCmd> to use the script context for a command.
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Sat, 15 Jan 2022 19:30:04 +0100 |
parents | 4411c2b96af9 |
children | 41a61dbb46d2 |
rev | line source |
---|---|
10042
4aead6a9b7a9
commit https://github.com/vim/vim/commit/edf3f97ae2af024708ebb4ac614227327033ca47
Christian Brabandt <cb@256bit.org>
parents:
9387
diff
changeset
|
1 /* vi:set ts=8 sts=4 sw=4 noet: |
7 | 2 * |
3 * VIM - Vi IMproved by Bram Moolenaar | |
4 * | |
5 * Do ":help uganda" in Vim to read copying and usage conditions. | |
6 * Do ":help credits" in Vim to see a list of people who contributed. | |
7 * See README.txt for an overview of the Vim source code. | |
8 */ | |
9 /* | |
10 * The stuff in this file mostly comes from the "screen" program. | |
11 * Included with permission from Juergen Weigert. | |
12 * Copied from "pty.c". "putenv.c" was used for putenv() in misc2.c. | |
13 * | |
14 * It has been modified to work better with Vim. | |
15 * The parts that are not used in Vim have been deleted. | |
16 * See the "screen" sources for the complete stuff. | |
3282 | 17 * |
18498
9e6d5a4abb1c
patch 8.1.2243: typos in comments
Bram Moolenaar <Bram@vim.org>
parents:
18051
diff
changeset
|
18 * This specific version is distributed under the Vim license (attribution by |
3282 | 19 * Juergen Weigert), the GPL applies to the original version, see the |
20 * copyright notice below. | |
7 | 21 */ |
22 | |
18812
d34ec6fe207d
patch 8.1.2394: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
23 // Copyright (c) 1993 |
d34ec6fe207d
patch 8.1.2394: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
24 // Juergen Weigert (jnweiger@immd4.informatik.uni-erlangen.de) |
d34ec6fe207d
patch 8.1.2394: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
25 // Michael Schroeder (mlschroe@immd4.informatik.uni-erlangen.de) |
d34ec6fe207d
patch 8.1.2394: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
26 // Copyright (c) 1987 Oliver Laumann |
d34ec6fe207d
patch 8.1.2394: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
27 // |
d34ec6fe207d
patch 8.1.2394: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
28 // This program is free software; you can redistribute it and/or modify |
d34ec6fe207d
patch 8.1.2394: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
29 // it under the terms of the GNU General Public License as published by |
d34ec6fe207d
patch 8.1.2394: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
30 // the Free Software Foundation; either version 2, or (at your option) |
d34ec6fe207d
patch 8.1.2394: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
31 // any later version. |
d34ec6fe207d
patch 8.1.2394: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
32 // |
d34ec6fe207d
patch 8.1.2394: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
33 // This program is distributed in the hope that it will be useful, |
d34ec6fe207d
patch 8.1.2394: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
34 // but WITHOUT ANY WARRANTY; without even the implied warranty of |
d34ec6fe207d
patch 8.1.2394: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
35 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
d34ec6fe207d
patch 8.1.2394: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
36 // GNU General Public License for more details. |
d34ec6fe207d
patch 8.1.2394: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
37 // |
d34ec6fe207d
patch 8.1.2394: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
38 // You should have received a copy of the GNU General Public License |
d34ec6fe207d
patch 8.1.2394: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
39 // along with this program (see the file COPYING); if not, write to the |
d34ec6fe207d
patch 8.1.2394: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
40 // Free Software Foundation, Inc., |
d34ec6fe207d
patch 8.1.2394: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
41 // 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA |
7 | 42 |
43 #include "vim.h" | |
44 | |
11737
7791a15353dc
patch 8.0.0751: OpenPTY missing with some combination of features
Christian Brabandt <cb@256bit.org>
parents:
11735
diff
changeset
|
45 #if defined(FEAT_GUI) || defined(FEAT_JOB_CHANNEL) |
11735
21354977aa7b
patch 8.0.0750: OpenPTY missing in non-GUI build
Christian Brabandt <cb@256bit.org>
parents:
10460
diff
changeset
|
46 |
7 | 47 #include <signal.h> |
48 | |
49 #ifdef __CYGWIN32__ | |
50 # include <sys/termios.h> | |
51 #endif | |
52 | |
1030 | 53 #ifdef HAVE_SYS_IOCTL_H |
7 | 54 # include <sys/ioctl.h> |
55 #endif | |
56 | |
57 #if HAVE_STROPTS_H | |
15632
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
58 # include <sys/types.h> |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
59 # ifdef sinix |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
60 # define buf_T __system_buf_t__ |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
61 # endif |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
62 # include <stropts.h> |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
63 # ifdef sinix |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
64 # undef buf_T |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
65 # endif |
10460
7fd589f46801
commit https://github.com/vim/vim/commit/a899e6ecc4523c7e411eaf6fbaa4197d70f6f39e
Christian Brabandt <cb@256bit.org>
parents:
10042
diff
changeset
|
66 # ifdef SUN_SYSTEM |
7 | 67 # include <sys/conf.h> |
15632
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
68 # if defined(HAVE_SYS_PTMS_H) && defined(HAVE_SVR4_PTYS) |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
69 # include <sys/ptms.h> |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
70 # endif |
7 | 71 # endif |
72 #endif | |
73 | |
1030 | 74 #ifdef HAVE_UNISTD_H |
7 | 75 # include <unistd.h> |
76 #endif | |
77 | |
78 #if HAVE_TERMIO_H | |
79 # include <termio.h> | |
80 #else | |
1030 | 81 # ifdef HAVE_TERMIOS_H |
7 | 82 # include <termios.h> |
83 # endif | |
84 #endif | |
85 | |
86 #if HAVE_SYS_STREAM_H | |
87 # include <sys/stream.h> | |
88 #endif | |
89 | |
90 #if HAVE_SYS_PTEM_H | |
91 # include <sys/ptem.h> | |
92 #endif | |
93 | |
12716
351cf7c67bbe
patch 8.0.1236: Mac features are confusing
Christian Brabandt <cb@256bit.org>
parents:
12576
diff
changeset
|
94 #if !defined(SUN_SYSTEM) && !defined(VMS) |
7 | 95 # include <sys/ioctl.h> |
96 #endif | |
97 | |
10460
7fd589f46801
commit https://github.com/vim/vim/commit/a899e6ecc4523c7e411eaf6fbaa4197d70f6f39e
Christian Brabandt <cb@256bit.org>
parents:
10042
diff
changeset
|
98 #if defined(SUN_SYSTEM) && defined(LOCKPTY) && !defined(TIOCEXCL) |
7 | 99 # include <sys/ttold.h> |
100 #endif | |
101 | |
102 #ifdef ISC | |
103 # include <sys/tty.h> | |
104 # include <sys/sioctl.h> | |
105 # include <sys/pty.h> | |
106 #endif | |
107 | |
108 #ifdef sgi | |
109 # include <sys/sysmacros.h> | |
110 #endif | |
111 | |
112 #if defined(_INCLUDE_HPUX_SOURCE) && !defined(hpux) | |
113 # define hpux | |
114 #endif | |
115 | |
116 /* | |
117 * if no PTYRANGE[01] is in the config file, we pick a default | |
118 */ | |
119 #ifndef PTYRANGE0 | |
120 # define PTYRANGE0 "qprs" | |
121 #endif | |
122 #ifndef PTYRANGE1 | |
123 # define PTYRANGE1 "0123456789abcdef" | |
124 #endif | |
125 | |
18812
d34ec6fe207d
patch 8.1.2394: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
126 // SVR4 pseudo ttys don't seem to work with SCO-5 |
7 | 127 #ifdef M_UNIX |
128 # undef HAVE_SVR4_PTYS | |
129 #endif | |
130 | |
131 /* | |
2834 | 132 * Open all ptys with O_NOCTTY, just to be on the safe side. |
7 | 133 */ |
134 #ifndef O_NOCTTY | |
135 # define O_NOCTTY 0 | |
136 #endif | |
137 | |
16441
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
138 #if defined(HAVE_SVR4_PTYS) || defined(HAVE_POSIX_OPENPT) |
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
139 // These should be in stdlib.h, but it depends on _XOPEN_SOURCE. |
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
140 char *ptsname(int); |
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
141 int unlockpt(int); |
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
142 int grantpt(int); |
16449
fd57da82dd5d
patch 8.1.1229: warning for posix_openpt() not declared
Bram Moolenaar <Bram@vim.org>
parents:
16441
diff
changeset
|
143 int posix_openpt(int flags); |
16441
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
144 #endif |
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
145 |
7 | 146 static void |
7833
c079097365f3
commit https://github.com/vim/vim/commit/055409764ca5f7978d4c399d2c440af0ce971c4f
Christian Brabandt <cb@256bit.org>
parents:
7807
diff
changeset
|
147 initmaster(int f UNUSED) |
7 | 148 { |
149 #ifndef VMS | |
150 # ifdef POSIX | |
151 tcflush(f, TCIOFLUSH); | |
152 # else | |
153 # ifdef TIOCFLUSH | |
154 (void)ioctl(f, TIOCFLUSH, (char *) 0); | |
155 # endif | |
156 # endif | |
157 # ifdef LOCKPTY | |
158 (void)ioctl(f, TIOCEXCL, (char *) 0); | |
159 # endif | |
160 #endif | |
161 } | |
162 | |
163 /* | |
164 * This causes a hang on some systems, but is required for a properly working | |
165 * pty on others. Needs to be tuned... | |
166 */ | |
167 int | |
15632
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
168 setup_slavepty(int fd) |
7 | 169 { |
170 if (fd < 0) | |
171 return 0; | |
15632
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
172 #if defined(I_PUSH) && defined(HAVE_SVR4_PTYS) && !defined(sgi) \ |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
173 && !defined(linux) && !defined(__osf__) && !defined(M_UNIX) |
7 | 174 # if defined(HAVE_SYS_PTEM_H) || defined(hpux) |
175 if (ioctl(fd, I_PUSH, "ptem") != 0) | |
176 return -1; | |
177 # endif | |
178 if (ioctl(fd, I_PUSH, "ldterm") != 0) | |
179 return -1; | |
10460
7fd589f46801
commit https://github.com/vim/vim/commit/a899e6ecc4523c7e411eaf6fbaa4197d70f6f39e
Christian Brabandt <cb@256bit.org>
parents:
10042
diff
changeset
|
180 # ifdef SUN_SYSTEM |
7 | 181 if (ioctl(fd, I_PUSH, "ttcompat") != 0) |
182 return -1; | |
183 # endif | |
184 #endif | |
185 return 0; | |
186 } | |
187 | |
16441
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
188 #if defined(HAVE_POSIX_OPENPT) && !defined(PTY_DONE) |
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
189 #define PTY_DONE |
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
190 int |
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
191 mch_openpty(char **ttyn) |
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
192 { |
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
193 int f; |
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
194 char *m; |
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
195 RETSIGTYPE (*sigcld) SIGPROTOARG; |
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
196 static char TtyName[32]; // used for opening a new pty-pair |
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
197 |
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
198 if ((f = posix_openpt(O_RDWR | O_NOCTTY | O_EXTRA)) == -1) |
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
199 return -1; |
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
200 |
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
201 // SIGCHLD set to SIG_DFL for grantpt() because it fork()s and |
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
202 // exec()s pt_chmod |
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
203 sigcld = signal(SIGCHLD, SIG_DFL); |
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
204 if ((m = ptsname(f)) == NULL || grantpt(f) || unlockpt(f)) |
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
205 { |
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
206 signal(SIGCHLD, sigcld); |
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
207 close(f); |
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
208 return -1; |
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
209 } |
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
210 signal(SIGCHLD, sigcld); |
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
211 vim_strncpy((char_u *)TtyName, (char_u *)m, sizeof(TtyName) - 1); |
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
212 initmaster(f); |
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
213 *ttyn = TtyName; |
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
214 return f; |
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
215 } |
c1dca26a6949
patch 8.1.1225: cannot create a pty to use with :terminal on FreeBSD
Bram Moolenaar <Bram@vim.org>
parents:
15632
diff
changeset
|
216 #endif |
7 | 217 |
218 #if defined(OSX) && !defined(PTY_DONE) | |
219 #define PTY_DONE | |
220 int | |
15632
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
221 mch_openpty(char **ttyn) |
7 | 222 { |
223 int f; | |
224 static char TtyName[32]; | |
225 | |
226 if ((f = open_controlling_pty(TtyName)) < 0) | |
227 return -1; | |
228 initmaster(f); | |
229 *ttyn = TtyName; | |
230 return f; | |
231 } | |
232 #endif | |
233 | |
234 #if (defined(sequent) || defined(_SEQUENT_)) && defined(HAVE_GETPSEUDOTTY) \ | |
235 && !defined(PTY_DONE) | |
236 #define PTY_DONE | |
237 int | |
15632
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
238 mch_openpty(char **ttyn) |
7 | 239 { |
240 char *m, *s; | |
241 int f; | |
18812
d34ec6fe207d
patch 8.1.2394: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
242 // used for opening a new pty-pair: |
7 | 243 static char PtyName[32]; |
244 static char TtyName[32]; | |
245 | |
246 if ((f = getpseudotty(&s, &m)) < 0) | |
247 return -1; | |
248 #ifdef _SEQUENT_ | |
249 fvhangup(s); | |
250 #endif | |
2760 | 251 vim_strncpy((char_u *)PtyName, (char_u *)m, sizeof(PtyName) - 1); |
252 vim_strncpy((char_u *)TtyName, (char_u *)s, sizeof(TtyName) - 1); | |
7 | 253 initmaster(f); |
254 *ttyn = TtyName; | |
255 return f; | |
256 } | |
257 #endif | |
258 | |
259 #if defined(__sgi) && !defined(PTY_DONE) | |
260 #define PTY_DONE | |
261 int | |
15632
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
262 mch_openpty(char **ttyn) |
7 | 263 { |
264 int f; | |
265 char *name; | |
7807
1a5d34492798
commit https://github.com/vim/vim/commit/d99df423c559d85c17779b3685426c489554908c
Christian Brabandt <cb@256bit.org>
parents:
7805
diff
changeset
|
266 RETSIGTYPE (*sigcld) SIGPROTOARG; |
7 | 267 |
268 /* | |
269 * SIGCHLD set to SIG_DFL for _getpty() because it may fork() and | |
270 * exec() /usr/adm/mkpts | |
271 */ | |
272 sigcld = signal(SIGCHLD, SIG_DFL); | |
273 name = _getpty(&f, O_RDWR | O_NONBLOCK | O_EXTRA, 0600, 0); | |
274 signal(SIGCHLD, sigcld); | |
275 | |
276 if (name == 0) | |
277 return -1; | |
278 initmaster(f); | |
279 *ttyn = name; | |
280 return f; | |
281 } | |
282 #endif | |
283 | |
284 #if defined(MIPS) && defined(HAVE_DEV_PTC) && !defined(PTY_DONE) | |
285 #define PTY_DONE | |
286 int | |
15632
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
287 mch_openpty(char **ttyn) |
7 | 288 { |
289 int f; | |
9387
f094d4085014
commit https://github.com/vim/vim/commit/8767f52fbfd4f053ce00a978227c95f1d7d323fe
Christian Brabandt <cb@256bit.org>
parents:
7856
diff
changeset
|
290 stat_T buf; |
18812
d34ec6fe207d
patch 8.1.2394: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
291 // used for opening a new pty-pair: |
7 | 292 static char TtyName[32]; |
293 | |
294 if ((f = open("/dev/ptc", O_RDWR | O_NOCTTY | O_NONBLOCK | O_EXTRA, 0)) < 0) | |
295 return -1; | |
296 if (mch_fstat(f, &buf) < 0) | |
297 { | |
298 close(f); | |
299 return -1; | |
300 } | |
301 sprintf(TtyName, "/dev/ttyq%d", minor(buf.st_rdev)); | |
302 initmaster(f); | |
303 *ttyn = TtyName; | |
304 return f; | |
305 } | |
306 #endif | |
307 | |
12576
b74f5036a434
patch 8.0.1166: :terminal doesn't work on Mac High Sierra
Christian Brabandt <cb@256bit.org>
parents:
11737
diff
changeset
|
308 #if defined(HAVE_SVR4_PTYS) && !defined(PTY_DONE) && !defined(hpux) \ |
13353
8412df1479a3
patch 8.0.1550: various small problems in source files
Christian Brabandt <cb@256bit.org>
parents:
12716
diff
changeset
|
309 && !(defined(MACOS_X) && !defined(MAC_OS_X_VERSION_10_6)) |
7 | 310 |
18812
d34ec6fe207d
patch 8.1.2394: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
311 // NOTE: Even though HPUX can have /dev/ptmx, the code below doesn't work! |
d34ec6fe207d
patch 8.1.2394: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
312 // Same for Mac OS X Leopard (10.5). |
7 | 313 #define PTY_DONE |
314 int | |
15632
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
315 mch_openpty(char **ttyn) |
7 | 316 { |
317 int f; | |
2397
d5976fe4349d
Fix for compiler warning about function prototype in pty.c.
Bram Moolenaar <bram@vim.org>
parents:
2154
diff
changeset
|
318 char *m; |
7805
0b6c37dd858d
commit https://github.com/vim/vim/commit/baaa7e9ec7398a813e21285c272fa99792642077
Christian Brabandt <cb@256bit.org>
parents:
3282
diff
changeset
|
319 RETSIGTYPE (*sigcld) SIGPROTOARG; |
18812
d34ec6fe207d
patch 8.1.2394: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
320 // used for opening a new pty-pair: |
7 | 321 static char TtyName[32]; |
322 | |
323 if ((f = open("/dev/ptmx", O_RDWR | O_NOCTTY | O_EXTRA, 0)) == -1) | |
324 return -1; | |
325 | |
326 /* | |
327 * SIGCHLD set to SIG_DFL for grantpt() because it fork()s and | |
328 * exec()s pt_chmod | |
329 */ | |
330 sigcld = signal(SIGCHLD, SIG_DFL); | |
331 if ((m = ptsname(f)) == NULL || grantpt(f) || unlockpt(f)) | |
332 { | |
333 signal(SIGCHLD, sigcld); | |
334 close(f); | |
335 return -1; | |
336 } | |
337 signal(SIGCHLD, sigcld); | |
2760 | 338 vim_strncpy((char_u *)TtyName, (char_u *)m, sizeof(TtyName) - 1); |
7 | 339 initmaster(f); |
340 *ttyn = TtyName; | |
341 return f; | |
342 } | |
343 #endif | |
344 | |
345 #if defined(_AIX) && defined(HAVE_DEV_PTC) && !defined(PTY_DONE) | |
346 #define PTY_DONE | |
347 | |
348 #ifdef _IBMR2 | |
18051
d1e77015f60b
patch 8.1.2021: some global functions can be local to the file
Bram Moolenaar <Bram@vim.org>
parents:
16449
diff
changeset
|
349 static int aixhack = -1; |
7 | 350 #endif |
351 | |
352 int | |
15632
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
353 mch_openpty(char **ttyn) |
7 | 354 { |
355 int f; | |
18812
d34ec6fe207d
patch 8.1.2394: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
356 // used for opening a new pty-pair: |
7 | 357 static char TtyName[32]; |
358 | |
18812
d34ec6fe207d
patch 8.1.2394: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
359 // a dumb looking loop replaced by mycrofts code: |
7 | 360 if ((f = open("/dev/ptc", O_RDWR | O_NOCTTY | O_EXTRA)) < 0) |
361 return -1; | |
2760 | 362 vim_strncpy((char_u *)TtyName, (char_u *)ttyname(f), sizeof(TtyName) - 1); |
1076 | 363 if (geteuid() != ROOT_UID && mch_access(TtyName, R_OK | W_OK)) |
7 | 364 { |
365 close(f); | |
366 return -1; | |
367 } | |
368 initmaster(f); | |
369 # ifdef _IBMR2 | |
370 if (aixhack >= 0) | |
371 close(aixhack); | |
372 if ((aixhack = open(TtyName, O_RDWR | O_NOCTTY | O_EXTRA, 0)) < 0) | |
373 { | |
374 close(f); | |
375 return -1; | |
376 } | |
377 # endif | |
378 *ttyn = TtyName; | |
379 return f; | |
380 } | |
381 #endif | |
382 | |
383 #ifndef PTY_DONE | |
384 | |
385 # ifdef hpux | |
386 static char PtyProto[] = "/dev/ptym/ptyXY"; | |
387 static char TtyProto[] = "/dev/pty/ttyXY"; | |
388 # else | |
20591
4411c2b96af9
patch 8.2.0849: BeOS code is not maintained and probably unused
Bram Moolenaar <Bram@vim.org>
parents:
19526
diff
changeset
|
389 # ifdef(__HAIKU__) |
7 | 390 static char PtyProto[] = "/dev/pt/XY"; |
391 static char TtyProto[] = "/dev/tt/XY"; | |
392 # else | |
393 static char PtyProto[] = "/dev/ptyXY"; | |
394 static char TtyProto[] = "/dev/ttyXY"; | |
395 # endif | |
396 # endif | |
397 | |
398 int | |
15632
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
399 mch_openpty(char **ttyn) |
7 | 400 { |
401 char *p, *q, *l, *d; | |
402 int f; | |
18812
d34ec6fe207d
patch 8.1.2394: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
403 // used for opening a new pty-pair: |
7 | 404 static char PtyName[32]; |
405 static char TtyName[32]; | |
406 | |
407 strcpy(PtyName, PtyProto); | |
408 strcpy(TtyName, TtyProto); | |
409 for (p = PtyName; *p != 'X'; p++) | |
410 ; | |
411 for (q = TtyName; *q != 'X'; q++) | |
412 ; | |
413 for (l = PTYRANGE0; (*p = *l) != '\0'; l++) | |
414 { | |
415 for (d = PTYRANGE1; (p[1] = *d) != '\0'; d++) | |
416 { | |
417 if ((f = open(PtyName, O_RDWR | O_NOCTTY | O_EXTRA, 0)) == -1) | |
418 continue; | |
419 q[0] = *l; | |
420 q[1] = *d; | |
1076 | 421 if (geteuid() != ROOT_UID && mch_access(TtyName, R_OK | W_OK)) |
7 | 422 { |
423 close(f); | |
424 continue; | |
425 } | |
10460
7fd589f46801
commit https://github.com/vim/vim/commit/a899e6ecc4523c7e411eaf6fbaa4197d70f6f39e
Christian Brabandt <cb@256bit.org>
parents:
10042
diff
changeset
|
426 #if defined(SUN_SYSTEM) && defined(TIOCGPGRP) && !defined(SUNOS3) |
18812
d34ec6fe207d
patch 8.1.2394: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
427 // Hack to ensure that the slave side of the pty is |
d34ec6fe207d
patch 8.1.2394: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
428 // unused. May not work in anything other than SunOS4.1 |
7 | 429 { |
430 int pgrp; | |
431 | |
18812
d34ec6fe207d
patch 8.1.2394: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
432 // tcgetpgrp does not work (uses TIOCGETPGRP)! |
7 | 433 if (ioctl(f, TIOCGPGRP, (char *)&pgrp) != -1 || errno != EIO) |
434 { | |
435 close(f); | |
436 continue; | |
437 } | |
438 } | |
439 #endif | |
440 initmaster(f); | |
441 *ttyn = TtyName; | |
442 return f; | |
443 } | |
444 } | |
445 return -1; | |
446 } | |
447 #endif | |
11735
21354977aa7b
patch 8.0.0750: OpenPTY missing in non-GUI build
Christian Brabandt <cb@256bit.org>
parents:
10460
diff
changeset
|
448 |
15632
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
449 /* |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
450 * Call isatty(fd), except for SunOS where it's done differently. |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
451 */ |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
452 int |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
453 mch_isatty(int fd) |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
454 { |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
455 # if defined(I_STR) && defined(HAVE_SYS_PTMS_H) && defined(HAVE_SVR4_PTYS) \ |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
456 && defined(SUN_SYSTEM) |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
457 // On SunOS, isatty() for /dev/ptmx returns false or sometimes can hang up |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
458 // in the inner ioctl(), and therefore first determine whether "fd" is a |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
459 // master device. |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
460 struct strioctl istr; |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
461 |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
462 istr.ic_cmd = ISPTM; |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
463 istr.ic_timout = 0; |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
464 istr.ic_dp = NULL; |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
465 istr.ic_len = 0; |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
466 |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
467 if (ioctl(fd, I_STR, &istr) == 0) |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
468 // Trick: return 2 in order to advice the caller that "fd" is a master |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
469 // device. cf. src/os_unix.c:get_tty_fd() |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
470 return 2; |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
471 # endif |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
472 return isatty(fd); |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
473 } |
d4a6d575e910
patch 8.1.0824: SunOS/Solaris has a problem with ttys
Bram Moolenaar <Bram@vim.org>
parents:
14862
diff
changeset
|
474 |
18812
d34ec6fe207d
patch 8.1.2394: using old C style comments
Bram Moolenaar <Bram@vim.org>
parents:
18498
diff
changeset
|
475 #endif // FEAT_GUI || FEAT_JOB_CHANNEL |