ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/ptytty.C
Revision: 1.22
Committed: Tue Jan 11 04:44:57 2005 UTC (19 years, 4 months ago) by root
Content type: text/plain
Branch: MAIN
CVS Tags: rel-5_1, rel-5_0, rel-4_8, rel-4_9
Changes since 1.18: +30 -0 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 rxvt_privileges (RESTORE);
340
341 if (action == SAVE)
342 {
343 //next_tty_action = RESTORE;
344 # ifndef RESET_TTY_TO_COMMON_DEFAULTS
345 /* store original tty status for restoration rxvt_clean_exit () -- rgg 04/12/95 */
346 if (lstat (name, &savestat) < 0) /* you lose out */
347 ;//next_tty_action = IGNORE;
348 else
349 # endif
350
351 {
352 chown (name, getuid (), ttyconf.gid); /* fail silently */
353 chmod (name, ttyconf.mode);
354 # ifdef HAVE_REVOKE
355 revoke (name);
356 # endif
357
358 }
359 }
360 else
361 { /* action == RESTORE */
362 //next_tty_action = IGNORE;
363 # ifndef RESET_TTY_TO_COMMON_DEFAULTS
364 chmod (name, savestat.st_mode);
365 chown (name, savestat.st_uid, savestat.st_gid);
366 # else
367 chmod (name, (S_IRUSR | S_IWUSR | S_IRGRP | S_IWGRP | S_IROTH | S_IWOTH));
368 chown (name, 0, 0);
369 # endif
370
371 }
372
373 rxvt_privileges (IGNORE);
374 }
375 #endif
376
377 rxvt_ptytty::rxvt_ptytty ()
378 {
379 pty = tty = -1;
380 name = 0;
381 }
382
383 rxvt_ptytty::~rxvt_ptytty ()
384 {
385 put ();
386 }
387
388 void
389
390 rxvt_ptytty::close_tty ()
391 {
392 if (tty >= 0) close (tty);
393 tty = -1;
394 }
395
396 void
397 rxvt_ptytty::put ()
398 {
399 #ifndef NO_SETOWNER_TTYDEV
400 if (tty >= 0)
401 privileges (RESTORE);
402 #endif
403
404 if (pty >= 0) close (pty);
405 close_tty ();
406 free (name);
407
408 pty = tty = -1;
409 name = 0;
410 }
411
412 bool
413 rxvt_ptytty::make_controlling_tty ()
414 {
415 return control_tty (tty, name) >= 0;
416 }
417
418 bool
419 rxvt_ptytty::get ()
420 {
421 /* get master (pty) */
422 if ((pty = get_pty (&tty, &name)) < 0)
423 return false;
424
425 fcntl (pty, F_SETFL, O_NONBLOCK);
426
427 /* get slave (tty) */
428 if (tty < 0)
429 {
430 #ifndef NO_SETOWNER_TTYDEV
431 privileges (SAVE);
432 #endif
433
434 if ((tty = get_tty (name)) < 0)
435 {
436 put ();
437 return false;
438 }
439 }
440
441 return true;
442 }
443
444 void
445 rxvt_ptytty::set_utf8_mode (bool on)
446 {
447 #ifdef IUTF8
448 if (pty != -1)
449 {
450 struct termios tio;
451
452 if (tcgetattr (pty, &tio) != -1)
453 {
454 tcflag_t new_cflag = tio.c_iflag;
455
456 if (on)
457 new_cflag |= IUTF8;
458 else
459 new_cflag &= ~IUTF8;
460
461 if (new_cflag != tio.c_iflag)
462 {
463 tio.c_iflag = new_cflag;
464 tcsetattr (pty, TCSANOW, &tio);
465 }
466 }
467 }
468 #endif
469 }
470
471 /*----------------------- end-of-file (C source) -----------------------*/
472