ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/ptytty.C
Revision: 1.23
Committed: Thu Feb 17 15:07:48 2005 UTC (19 years, 3 months ago) by root
Content type: text/plain
Branch: MAIN
CVS Tags: rel-5_5, rel-5_4, rel-5_7, rel-5_3, rel-5_2, rel-5_9, rel-5_8, rel-6_0, rel-6_1
Changes since 1.22: +3 -2 lines
Log Message:
*** empty log message ***

File Contents

# Content
1 /*--------------------------------*-C-*---------------------------------*
2 * File: ptytty.C
3 *----------------------------------------------------------------------*
4 *
5 * All portions of code are copyright by their respective author/s.
6 * Copyright (c) 1999-2001 Geoff Wing <gcw@pobox.com>
7 * Copyright (c) 2004 Marc Lehmann <pcg@goof.com>
8 *
9 * This program is free software; you can redistribute it and/or modify
10 * it under the terms of the GNU General Public License as published by
11 * the Free Software Foundation; either version 2 of the License, or
12 * (at your option) any later version.
13 *
14 * This program is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 * GNU General Public License for more details.
18 *
19 * You should have received a copy of the GNU General Public License
20 * along with this program; if not, write to the Free Software
21 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
22 *---------------------------------------------------------------------*/
23
24 #include "../config.h" /* NECESSARY */
25 #include "rxvt.h"
26
27 #ifdef HAVE_STDLIB_H
28 # include <cstdlib>
29 #endif
30 #ifdef HAVE_SYS_TYPES_H
31 # include <sys/types.h>
32 #endif
33 #ifdef HAVE_UNISTD_H
34 # include <unistd.h>
35 #endif
36 #if defined(HAVE_STRING_H)
37 # include <cstring>
38 #endif
39 #ifdef HAVE_FCNTL_H
40 # include <fcntl.h>
41 #endif
42 #ifdef HAVE_SYS_IOCTL_H
43 # include <sys/ioctl.h>
44 #endif
45 #if defined(PTYS_ARE_PTMX) && defined(HAVE_SYS_STROPTS_H)
46 # include <sys/stropts.h> /* for I_PUSH */
47 #endif
48 #ifdef HAVE_ISASTREAM
49 # include <stropts.h>
50 #endif
51 #ifdef HAVE_PTY_H
52 # include <pty.h>
53 #endif
54
55 // better do this via configure, but....
56 #if defined(__FreeBSD__)
57 # include <libutil.h>
58 #elif defined(__DARWIN__) || (defined (__MACH__) && defined (__APPLE__))
59 # include <util.h>
60 #endif
61
62 #include <cstdio>
63 #include <grp.h>
64
65 /* ------------------------------------------------------------------------- *
66 * GET PSEUDO TELETYPE - MASTER AND SLAVE *
67 * ------------------------------------------------------------------------- */
68 /*
69 * Returns pty file descriptor, or -1 on failure
70 * If successful, ttydev is set to the name of the slave device.
71 * fd_tty _may_ also be set to an open fd to the slave device
72 */
73 static int
74 get_pty (int *fd_tty, char **ttydev)
75 {
76 int pfd;
77
78 #ifdef PTYS_ARE_OPENPTY
79 char tty_name[sizeof "/dev/pts/????\0"];
80
81 if (openpty (&pfd, fd_tty, tty_name, NULL, NULL) != -1)
82 {
83 *ttydev = strdup (tty_name);
84 return pfd;
85 }
86 #endif
87
88 #ifdef PTYS_ARE__GETPTY
89 *ttydev = _getpty (&pfd, O_RDWR | O_NONBLOCK | O_NOCTTY, 0622, 0);
90 if (*ttydev != NULL)
91 return pfd;
92 #endif
93
94 #ifdef PTYS_ARE_GETPTY
95
96 char *ptydev;
97
98 while ((ptydev = getpty ()) != NULL)
99 if ((pfd = open (ptydev, O_RDWR | O_NOCTTY, 0)) >= 0)
100 {
101 *ttydev = ptydev;
102 return pfd;
103 }
104 #endif
105
106 #if defined(HAVE_GRANTPT) && defined(HAVE_UNLOCKPT)
107 # if defined(PTYS_ARE_GETPT) || defined(PTYS_ARE_PTMX)
108
109 {
110 # ifdef PTYS_ARE_GETPT
111 pfd = getpt ();
112 # else
113 pfd = open ("/dev/ptmx", O_RDWR | O_NOCTTY, 0);
114 # endif
115
116 if (pfd >= 0)
117 {
118 if (grantpt (pfd) == 0 /* change slave permissions */
119 && unlockpt (pfd) == 0)
120 { /* slave now unlocked */
121 *ttydev = strdup (ptsname (pfd)); /* get slave's name */
122 return pfd;
123 }
124 close (pfd);
125 }
126 }
127 # endif
128 #endif
129
130 #ifdef PTYS_ARE_PTC
131 if ((pfd = open ("/dev/ptc", O_RDWR | O_NOCTTY, 0)) >= 0)
132 {
133 *ttydev = strdup (ttyname (pfd));
134 return pfd;
135 }
136 #endif
137
138 #ifdef PTYS_ARE_CLONE
139 if ((pfd = open ("/dev/ptym/clone", O_RDWR | O_NOCTTY, 0)) >= 0)
140 {
141 *ttydev = strdup (ptsname (pfd));
142 return pfd;
143 }
144 #endif
145
146 #ifdef PTYS_ARE_NUMERIC
147 {
148 int idx;
149 char *c1, *c2;
150 char pty_name[] = "/dev/ptyp???";
151 char tty_name[] = "/dev/ttyp???";
152
153 c1 = &(pty_name[sizeof (pty_name) - 4]);
154 c2 = &(tty_name[sizeof (tty_name) - 4]);
155 for (idx = 0; idx < 256; idx++)
156 {
157 sprintf (c1, "%d", idx);
158 sprintf (c2, "%d", idx);
159 if (access (tty_name, F_OK) < 0)
160 {
161 idx = 256;
162 break;
163 }
164
165 if ((pfd = open (pty_name, O_RDWR | O_NOCTTY, 0)) >= 0)
166 {
167 if (access (tty_name, R_OK | W_OK) == 0)
168 {
169 *ttydev = strdup (tty_name);
170 return pfd;
171 }
172
173 close (pfd);
174 }
175 }
176 }
177 #endif
178
179 #ifdef PTYS_ARE_SEARCHED
180 {
181 const char *c1, *c2;
182 char pty_name[] = "/dev/pty??";
183 char tty_name[] = "/dev/tty??";
184
185 # ifndef PTYCHAR1
186 # define PTYCHAR1 "pqrstuvwxyz"
187 # endif
188 # ifndef PTYCHAR2
189 # define PTYCHAR2 "0123456789abcdef"
190 # endif
191
192 for (c1 = PTYCHAR1; *c1; c1++)
193 {
194 pty_name[ (sizeof (pty_name) - 3)] =
195 tty_name[ (sizeof (pty_name) - 3)] = *c1;
196 for (c2 = PTYCHAR2; *c2; c2++)
197 {
198 pty_name[ (sizeof (pty_name) - 2)] =
199 tty_name[ (sizeof (pty_name) - 2)] = *c2;
200 if ((pfd = open (pty_name, O_RDWR | O_NOCTTY, 0)) >= 0)
201 {
202 if (access (tty_name, R_OK | W_OK) == 0)
203 {
204 *ttydev = strdup (tty_name);
205 return pfd;
206 }
207
208 close (pfd);
209 }
210 }
211 }
212 }
213 #endif
214
215 return -1;
216 }
217
218 /*----------------------------------------------------------------------*/
219 /*
220 * Returns tty file descriptor, or -1 on failure
221 */
222 static int
223 get_tty (char *ttydev)
224 {
225 return open (ttydev, O_RDWR | O_NOCTTY, 0);
226 }
227
228 /*----------------------------------------------------------------------*/
229 /*
230 * Make our tty a controlling tty so that /dev/tty points to us
231 */
232 static int
233 control_tty (int fd_tty, const char *ttydev)
234 {
235 #ifndef __QNX__
236 int fd;
237
238 /* ---------------------------------------- */
239 # ifdef HAVE_SETSID
240 setsid ();
241 # endif
242 # if defined(HAVE_SETPGID)
243 setpgid (0, 0);
244 # elif defined(HAVE_SETPGRP)
245 setpgrp (0, 0);
246 # endif
247
248 /* ---------------------------------------- */
249 # ifdef TIOCNOTTY
250 fd = open ("/dev/tty", O_RDWR | O_NOCTTY);
251 if (fd >= 0)
252 {
253 ioctl (fd, TIOCNOTTY, NULL); /* void tty associations */
254 close (fd);
255 }
256 # endif
257
258 /* ---------------------------------------- */
259 fd = open ("/dev/tty", O_RDWR | O_NOCTTY);
260 if (fd >= 0)
261 close (fd); /* ouch: still have controlling tty */
262
263 /* ---------------------------------------- */
264 #if defined(PTYS_ARE_PTMX) && defined(I_PUSH)
265 /*
266 * Push STREAMS modules:
267 * ptem: pseudo-terminal hardware emulation module.
268 * ldterm: standard terminal line discipline.
269 * ttcompat: V7, 4BSD and XENIX STREAMS compatibility module.
270 *
271 * After we push the STREAMS modules, the first open () on the slave side
272 * (i.e. the next section between the dashes giving us "tty opened OK")
273 * should make the "ptem" (or "ldterm" depending upon either which OS
274 * version or which set of manual pages you have) module give us a
275 * controlling terminal. We must already have close ()d the master side
276 * fd in this child process before we push STREAMS modules on because the
277 * documentation is really unclear about whether it is any close () on
278 * the master side or the last close () - i.e. a proper STREAMS dismantling
279 * close () - on the master side which causes a hang up to be sent
280 * through - Geoff Wing
281 */
282 # ifdef HAVE_ISASTREAM
283 if (isastream (fd_tty) == 1)
284 # endif
285 {
286 ioctl (fd_tty, I_PUSH, "ptem");
287 ioctl (fd_tty, I_PUSH, "ldterm");
288 ioctl (fd_tty, I_PUSH, "ttcompat");
289 }
290 #endif
291 /* ---------------------------------------- */
292 # if defined(TIOCSCTTY)
293 fd = ioctl (fd_tty, TIOCSCTTY, NULL);
294 # elif defined(TIOCSETCTTY)
295 fd = ioctl (fd_tty, TIOCSETCTTY, NULL);
296 # else
297 fd = open (ttydev, O_RDWR);
298 if (fd >= 0)
299 close (fd);
300 # endif
301 /* ---------------------------------------- */
302 fd = open ("/dev/tty", O_WRONLY);
303 if (fd < 0)
304 return -1; /* fatal */
305 close (fd);
306 /* ---------------------------------------- */
307 #endif /* ! __QNX__ */
308
309 return 0;
310 }
311
312 #ifndef NO_SETOWNER_TTYDEV
313 static struct ttyconf {
314 gid_t gid;
315 mode_t mode;
316
317 ttyconf ()
318 {
319 #ifdef TTY_GID_SUPPORT
320 struct group *gr = getgrnam ("tty");
321
322 if (gr)
323 { /* change group ownership of tty to "tty" */
324 mode = S_IRUSR | S_IWUSR | S_IWGRP;
325 gid = gr->gr_gid;
326 }
327 else
328 #endif /* TTY_GID_SUPPORT */
329 {
330 mode = S_IRUSR | S_IWUSR | S_IWGRP | S_IWOTH;
331 gid = getgid ();
332 }
333 }
334 } ttyconf;
335
336 void
337 rxvt_ptytty::privileges (rxvt_privaction action)
338 {
339 if (tty < 0)
340 return;
341
342 rxvt_privileges (RESTORE);
343
344 if (action == SAVE)
345 {
346 //next_tty_action = RESTORE;
347 # ifndef RESET_TTY_TO_COMMON_DEFAULTS
348 /* store original tty status for restoration rxvt_clean_exit () -- rgg 04/12/95 */
349 if (lstat (name, &savestat) < 0) /* you lose out */
350 ;//next_tty_action = IGNORE;
351 else
352 # endif
353 {
354 chown (name, getuid (), ttyconf.gid); /* fail silently */
355 chmod (name, ttyconf.mode);
356 # ifdef HAVE_REVOKE
357 revoke (name);
358 # endif
359 }
360 }
361 else
362 { /* action == RESTORE */
363 //next_tty_action = IGNORE;
364 # ifndef RESET_TTY_TO_COMMON_DEFAULTS
365 chmod (name, savestat.st_mode);
366 chown (name, savestat.st_uid, savestat.st_gid);
367 # else
368 chmod (name, (S_IRUSR | S_IWUSR | S_IRGRP | S_IWGRP | S_IROTH | S_IWOTH));
369 chown (name, 0, 0);
370 # endif
371
372 }
373
374 rxvt_privileges (IGNORE);
375 }
376 #endif
377
378 rxvt_ptytty::rxvt_ptytty ()
379 {
380 pty = tty = -1;
381 name = 0;
382 }
383
384 rxvt_ptytty::~rxvt_ptytty ()
385 {
386 put ();
387 }
388
389 void
390
391 rxvt_ptytty::close_tty ()
392 {
393 if (tty >= 0) close (tty);
394 tty = -1;
395 }
396
397 void
398 rxvt_ptytty::put ()
399 {
400 #ifndef NO_SETOWNER_TTYDEV
401 if (tty >= 0)
402 privileges (RESTORE);
403 #endif
404
405 if (pty >= 0) close (pty);
406 close_tty ();
407 free (name);
408
409 pty = tty = -1;
410 name = 0;
411 }
412
413 bool
414 rxvt_ptytty::make_controlling_tty ()
415 {
416 return control_tty (tty, name) >= 0;
417 }
418
419 bool
420 rxvt_ptytty::get ()
421 {
422 /* get master (pty) */
423 if ((pty = get_pty (&tty, &name)) < 0)
424 return false;
425
426 fcntl (pty, F_SETFL, O_NONBLOCK);
427
428 /* get slave (tty) */
429 if (tty < 0)
430 {
431 #ifndef NO_SETOWNER_TTYDEV
432 privileges (SAVE);
433 #endif
434
435 if ((tty = get_tty (name)) < 0)
436 {
437 put ();
438 return false;
439 }
440 }
441
442 return true;
443 }
444
445 void
446 rxvt_ptytty::set_utf8_mode (bool on)
447 {
448 #ifdef IUTF8
449 if (pty != -1)
450 {
451 struct termios tio;
452
453 if (tcgetattr (pty, &tio) != -1)
454 {
455 tcflag_t new_cflag = tio.c_iflag;
456
457 if (on)
458 new_cflag |= IUTF8;
459 else
460 new_cflag &= ~IUTF8;
461
462 if (new_cflag != tio.c_iflag)
463 {
464 tio.c_iflag = new_cflag;
465 tcsetattr (pty, TCSANOW, &tio);
466 }
467 }
468 }
469 #endif
470 }
471
472 /*----------------------- end-of-file (C source) -----------------------*/
473