ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/ptytty.C
Revision: 1.24
Committed: Sat Dec 31 16:06:48 2005 UTC (18 years, 5 months ago) by root
Content type: text/plain
Branch: MAIN
Changes since 1.23: +6 -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 rxvt_privileges (RESTORE);
82 int res = openpty (&pfd, fd_tty, tty_name, NULL, NULL);
83 rxvt_privileges (IGNORE);
84
85 if (res != -1)
86 {
87 *ttydev = strdup (tty_name);
88 return pfd;
89 }
90 #endif
91
92 #ifdef PTYS_ARE__GETPTY
93 *ttydev = _getpty (&pfd, O_RDWR | O_NONBLOCK | O_NOCTTY, 0622, 0);
94 if (*ttydev != NULL)
95 return pfd;
96 #endif
97
98 #ifdef PTYS_ARE_GETPTY
99
100 char *ptydev;
101
102 while ((ptydev = getpty ()) != NULL)
103 if ((pfd = open (ptydev, O_RDWR | O_NOCTTY, 0)) >= 0)
104 {
105 *ttydev = ptydev;
106 return pfd;
107 }
108 #endif
109
110 #if defined(HAVE_GRANTPT) && defined(HAVE_UNLOCKPT)
111 # if defined(PTYS_ARE_GETPT) || defined(PTYS_ARE_PTMX)
112
113 {
114 # ifdef PTYS_ARE_GETPT
115 pfd = getpt ();
116 # else
117 pfd = open ("/dev/ptmx", O_RDWR | O_NOCTTY, 0);
118 # endif
119
120 if (pfd >= 0)
121 {
122 if (grantpt (pfd) == 0 /* change slave permissions */
123 && unlockpt (pfd) == 0)
124 { /* slave now unlocked */
125 *ttydev = strdup (ptsname (pfd)); /* get slave's name */
126 return pfd;
127 }
128 close (pfd);
129 }
130 }
131 # endif
132 #endif
133
134 #ifdef PTYS_ARE_PTC
135 if ((pfd = open ("/dev/ptc", O_RDWR | O_NOCTTY, 0)) >= 0)
136 {
137 *ttydev = strdup (ttyname (pfd));
138 return pfd;
139 }
140 #endif
141
142 #ifdef PTYS_ARE_CLONE
143 if ((pfd = open ("/dev/ptym/clone", O_RDWR | O_NOCTTY, 0)) >= 0)
144 {
145 *ttydev = strdup (ptsname (pfd));
146 return pfd;
147 }
148 #endif
149
150 #ifdef PTYS_ARE_NUMERIC
151 {
152 int idx;
153 char *c1, *c2;
154 char pty_name[] = "/dev/ptyp???";
155 char tty_name[] = "/dev/ttyp???";
156
157 c1 = &(pty_name[sizeof (pty_name) - 4]);
158 c2 = &(tty_name[sizeof (tty_name) - 4]);
159 for (idx = 0; idx < 256; idx++)
160 {
161 sprintf (c1, "%d", idx);
162 sprintf (c2, "%d", idx);
163 if (access (tty_name, F_OK) < 0)
164 {
165 idx = 256;
166 break;
167 }
168
169 if ((pfd = open (pty_name, O_RDWR | O_NOCTTY, 0)) >= 0)
170 {
171 if (access (tty_name, R_OK | W_OK) == 0)
172 {
173 *ttydev = strdup (tty_name);
174 return pfd;
175 }
176
177 close (pfd);
178 }
179 }
180 }
181 #endif
182
183 #ifdef PTYS_ARE_SEARCHED
184 {
185 const char *c1, *c2;
186 char pty_name[] = "/dev/pty??";
187 char tty_name[] = "/dev/tty??";
188
189 # ifndef PTYCHAR1
190 # define PTYCHAR1 "pqrstuvwxyz"
191 # endif
192 # ifndef PTYCHAR2
193 # define PTYCHAR2 "0123456789abcdef"
194 # endif
195
196 for (c1 = PTYCHAR1; *c1; c1++)
197 {
198 pty_name[ (sizeof (pty_name) - 3)] =
199 tty_name[ (sizeof (pty_name) - 3)] = *c1;
200 for (c2 = PTYCHAR2; *c2; c2++)
201 {
202 pty_name[ (sizeof (pty_name) - 2)] =
203 tty_name[ (sizeof (pty_name) - 2)] = *c2;
204 if ((pfd = open (pty_name, O_RDWR | O_NOCTTY, 0)) >= 0)
205 {
206 if (access (tty_name, R_OK | W_OK) == 0)
207 {
208 *ttydev = strdup (tty_name);
209 return pfd;
210 }
211
212 close (pfd);
213 }
214 }
215 }
216 }
217 #endif
218
219 return -1;
220 }
221
222 /*----------------------------------------------------------------------*/
223 /*
224 * Returns tty file descriptor, or -1 on failure
225 */
226 static int
227 get_tty (char *ttydev)
228 {
229 return open (ttydev, O_RDWR | O_NOCTTY, 0);
230 }
231
232 /*----------------------------------------------------------------------*/
233 /*
234 * Make our tty a controlling tty so that /dev/tty points to us
235 */
236 static int
237 control_tty (int fd_tty, const char *ttydev)
238 {
239 #ifndef __QNX__
240 int fd;
241
242 /* ---------------------------------------- */
243 # ifdef HAVE_SETSID
244 setsid ();
245 # endif
246 # if defined(HAVE_SETPGID)
247 setpgid (0, 0);
248 # elif defined(HAVE_SETPGRP)
249 setpgrp (0, 0);
250 # endif
251
252 /* ---------------------------------------- */
253 # ifdef TIOCNOTTY
254 fd = open ("/dev/tty", O_RDWR | O_NOCTTY);
255 if (fd >= 0)
256 {
257 ioctl (fd, TIOCNOTTY, NULL); /* void tty associations */
258 close (fd);
259 }
260 # endif
261
262 /* ---------------------------------------- */
263 fd = open ("/dev/tty", O_RDWR | O_NOCTTY);
264 if (fd >= 0)
265 close (fd); /* ouch: still have controlling tty */
266
267 /* ---------------------------------------- */
268 #if defined(PTYS_ARE_PTMX) && defined(I_PUSH)
269 /*
270 * Push STREAMS modules:
271 * ptem: pseudo-terminal hardware emulation module.
272 * ldterm: standard terminal line discipline.
273 * ttcompat: V7, 4BSD and XENIX STREAMS compatibility module.
274 *
275 * After we push the STREAMS modules, the first open () on the slave side
276 * (i.e. the next section between the dashes giving us "tty opened OK")
277 * should make the "ptem" (or "ldterm" depending upon either which OS
278 * version or which set of manual pages you have) module give us a
279 * controlling terminal. We must already have close ()d the master side
280 * fd in this child process before we push STREAMS modules on because the
281 * documentation is really unclear about whether it is any close () on
282 * the master side or the last close () - i.e. a proper STREAMS dismantling
283 * close () - on the master side which causes a hang up to be sent
284 * through - Geoff Wing
285 */
286 # ifdef HAVE_ISASTREAM
287 if (isastream (fd_tty) == 1)
288 # endif
289 {
290 ioctl (fd_tty, I_PUSH, "ptem");
291 ioctl (fd_tty, I_PUSH, "ldterm");
292 ioctl (fd_tty, I_PUSH, "ttcompat");
293 }
294 #endif
295 /* ---------------------------------------- */
296 # if defined(TIOCSCTTY)
297 fd = ioctl (fd_tty, TIOCSCTTY, NULL);
298 # elif defined(TIOCSETCTTY)
299 fd = ioctl (fd_tty, TIOCSETCTTY, NULL);
300 # else
301 fd = open (ttydev, O_RDWR);
302 if (fd >= 0)
303 close (fd);
304 # endif
305 /* ---------------------------------------- */
306 fd = open ("/dev/tty", O_WRONLY);
307 if (fd < 0)
308 return -1; /* fatal */
309 close (fd);
310 /* ---------------------------------------- */
311 #endif /* ! __QNX__ */
312
313 return 0;
314 }
315
316 #ifndef NO_SETOWNER_TTYDEV
317 static struct ttyconf {
318 gid_t gid;
319 mode_t mode;
320
321 ttyconf ()
322 {
323 #ifdef TTY_GID_SUPPORT
324 struct group *gr = getgrnam ("tty");
325
326 if (gr)
327 { /* change group ownership of tty to "tty" */
328 mode = S_IRUSR | S_IWUSR | S_IWGRP;
329 gid = gr->gr_gid;
330 }
331 else
332 #endif /* TTY_GID_SUPPORT */
333 {
334 mode = S_IRUSR | S_IWUSR | S_IWGRP | S_IWOTH;
335 gid = getgid ();
336 }
337 }
338 } ttyconf;
339
340 void
341 rxvt_ptytty::privileges (rxvt_privaction action)
342 {
343 if (tty < 0)
344 return;
345
346 rxvt_privileges (RESTORE);
347
348 if (action == SAVE)
349 {
350 //next_tty_action = RESTORE;
351 # ifndef RESET_TTY_TO_COMMON_DEFAULTS
352 /* store original tty status for restoration rxvt_clean_exit () -- rgg 04/12/95 */
353 if (lstat (name, &savestat) < 0) /* you lose out */
354 ;//next_tty_action = IGNORE;
355 else
356 # endif
357 {
358 chown (name, getuid (), ttyconf.gid); /* fail silently */
359 chmod (name, ttyconf.mode);
360 # ifdef HAVE_REVOKE
361 revoke (name);
362 # endif
363 }
364 }
365 else
366 { /* action == RESTORE */
367 //next_tty_action = IGNORE;
368 # ifndef RESET_TTY_TO_COMMON_DEFAULTS
369 chmod (name, savestat.st_mode);
370 chown (name, savestat.st_uid, savestat.st_gid);
371 # else
372 chmod (name, (S_IRUSR | S_IWUSR | S_IRGRP | S_IWGRP | S_IROTH | S_IWOTH));
373 chown (name, 0, 0);
374 # endif
375
376 }
377
378 rxvt_privileges (IGNORE);
379 }
380 #endif
381
382 rxvt_ptytty::rxvt_ptytty ()
383 {
384 pty = tty = -1;
385 name = 0;
386 }
387
388 rxvt_ptytty::~rxvt_ptytty ()
389 {
390 put ();
391 }
392
393 void
394
395 rxvt_ptytty::close_tty ()
396 {
397 if (tty >= 0) close (tty);
398 tty = -1;
399 }
400
401 void
402 rxvt_ptytty::put ()
403 {
404 #ifndef NO_SETOWNER_TTYDEV
405 if (tty >= 0)
406 privileges (RESTORE);
407 #endif
408
409 if (pty >= 0) close (pty);
410 close_tty ();
411 free (name);
412
413 pty = tty = -1;
414 name = 0;
415 }
416
417 bool
418 rxvt_ptytty::make_controlling_tty ()
419 {
420 return control_tty (tty, name) >= 0;
421 }
422
423 bool
424 rxvt_ptytty::get ()
425 {
426 /* get master (pty) */
427 if ((pty = get_pty (&tty, &name)) < 0)
428 return false;
429
430 fcntl (pty, F_SETFL, O_NONBLOCK);
431
432 /* get slave (tty) */
433 if (tty < 0)
434 {
435 #ifndef NO_SETOWNER_TTYDEV
436 privileges (SAVE);
437 #endif
438
439 if ((tty = get_tty (name)) < 0)
440 {
441 put ();
442 return false;
443 }
444 }
445
446 return true;
447 }
448
449 void
450 rxvt_ptytty::set_utf8_mode (bool on)
451 {
452 #ifdef IUTF8
453 if (pty != -1)
454 {
455 struct termios tio;
456
457 if (tcgetattr (pty, &tio) != -1)
458 {
459 tcflag_t new_cflag = tio.c_iflag;
460
461 if (on)
462 new_cflag |= IUTF8;
463 else
464 new_cflag &= ~IUTF8;
465
466 if (new_cflag != tio.c_iflag)
467 {
468 tio.c_iflag = new_cflag;
469 tcsetattr (pty, TCSANOW, &tio);
470 }
471 }
472 }
473 #endif
474 }
475
476 /*----------------------- end-of-file (C source) -----------------------*/
477