ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/ptytty.C
Revision: 1.40
Committed: Tue Jan 17 15:17:39 2006 UTC (18 years, 4 months ago) by root
Content type: text/plain
Branch: MAIN
Changes since 1.39: +185 -13 lines
Log Message:
logging.C

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-2006 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 #include <cstdlib>
28 #include <cstring>
29
30 #include <sys/types.h>
31 #include <sys/socket.h>
32 #include <unistd.h>
33 #include <fcntl.h>
34
35 #ifdef HAVE_SYS_IOCTL_H
36 # include <sys/ioctl.h>
37 #endif
38 #if defined(PTYS_ARE_PTMX) && defined(HAVE_SYS_STROPTS_H)
39 # include <sys/stropts.h> /* for I_PUSH */
40 #endif
41 #ifdef HAVE_ISASTREAM
42 # include <stropts.h>
43 #endif
44 #if defined(HAVE_PTY_H)
45 # include <pty.h>
46 #elif defined(HAVE_LIBUTIL_H)
47 # include <libutil.h>
48 #elif defined(HAVE_UTIL_H)
49 # include <util.h>
50 #endif
51
52 #include <cstdio>
53 #include <grp.h>
54
55 #include "rxvtutil.h"
56 #include "fdpass.h"
57 #include "ptytty.h"
58
59 /////////////////////////////////////////////////////////////////////////////
60
61 /* ------------------------------------------------------------------------- *
62 * GET PSEUDO TELETYPE - MASTER AND SLAVE *
63 * ------------------------------------------------------------------------- */
64 /*
65 * Returns pty file descriptor, or -1 on failure
66 * If successful, ttydev is set to the name of the slave device.
67 * fd_tty _may_ also be set to an open fd to the slave device
68 */
69 static int
70 get_pty (int *fd_tty, char **ttydev)
71 {
72 int pfd;
73
74 #ifdef PTYS_ARE_OPENPTY
75 char tty_name[sizeof "/dev/pts/????\0"];
76
77 rxvt_privileges(RESTORE);
78 int res = openpty (&pfd, fd_tty, tty_name, NULL, NULL);
79 rxvt_privileges(IGNORE);
80
81 if (res != -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 #if defined(HAVE_GRANTPT) && defined(HAVE_UNLOCKPT)
95 # if defined(PTYS_ARE_GETPT) || defined(PTYS_ARE_POSIX) || defined(PTYS_ARE_PTMX)
96
97 {
98 # ifdef PTYS_ARE_GETPT
99 pfd = getpt();
100 # else
101 # ifdef PTYS_ARE_POSIX
102 pfd = posix_openpt (O_RDWR);
103 # else
104 pfd = open ("/dev/ptmx", O_RDWR | O_NOCTTY, 0);
105 # endif
106 # endif
107
108 if (pfd >= 0)
109 {
110 if (grantpt (pfd) == 0 /* change slave permissions */
111 && unlockpt (pfd) == 0)
112 { /* slave now unlocked */
113 *ttydev = strdup (ptsname (pfd)); /* get slave's name */
114 return pfd;
115 }
116 close (pfd);
117 }
118 }
119 # endif
120 #endif
121
122 #ifdef PTYS_ARE_PTC
123 if ((pfd = open ("/dev/ptc", O_RDWR | O_NOCTTY, 0)) >= 0)
124 {
125 *ttydev = strdup (ttyname (pfd));
126 return pfd;
127 }
128 #endif
129
130 #ifdef PTYS_ARE_CLONE
131 if ((pfd = open ("/dev/ptym/clone", O_RDWR | O_NOCTTY, 0)) >= 0)
132 {
133 *ttydev = strdup (ptsname (pfd));
134 return pfd;
135 }
136 #endif
137
138 #ifdef PTYS_ARE_NUMERIC
139 {
140 int idx;
141 char *c1, *c2;
142 char pty_name[] = "/dev/ptyp???";
143 char tty_name[] = "/dev/ttyp???";
144
145 c1 = &(pty_name[sizeof (pty_name) - 4]);
146 c2 = &(tty_name[sizeof (tty_name) - 4]);
147 for (idx = 0; idx < 256; idx++)
148 {
149 sprintf (c1, "%d", idx);
150 sprintf (c2, "%d", idx);
151 if (access (tty_name, F_OK) < 0)
152 {
153 idx = 256;
154 break;
155 }
156
157 if ((pfd = open (pty_name, O_RDWR | O_NOCTTY, 0)) >= 0)
158 {
159 if (access (tty_name, R_OK | W_OK) == 0)
160 {
161 *ttydev = strdup (tty_name);
162 return pfd;
163 }
164
165 close (pfd);
166 }
167 }
168 }
169 #endif
170
171 #ifdef PTYS_ARE_SEARCHED
172 {
173 const char *c1, *c2;
174 char pty_name[] = "/dev/pty??";
175 char tty_name[] = "/dev/tty??";
176
177 # ifndef PTYCHAR1
178 # define PTYCHAR1 "pqrstuvwxyz"
179 # endif
180 # ifndef PTYCHAR2
181 # define PTYCHAR2 "0123456789abcdef"
182 # endif
183
184 for (c1 = PTYCHAR1; *c1; c1++)
185 {
186 pty_name[ (sizeof (pty_name) - 3)] =
187 tty_name[ (sizeof (pty_name) - 3)] = *c1;
188 for (c2 = PTYCHAR2; *c2; c2++)
189 {
190 pty_name[ (sizeof (pty_name) - 2)] =
191 tty_name[ (sizeof (pty_name) - 2)] = *c2;
192 if ((pfd = open (pty_name, O_RDWR | O_NOCTTY, 0)) >= 0)
193 {
194 if (access (tty_name, R_OK | W_OK) == 0)
195 {
196 *ttydev = strdup (tty_name);
197 return pfd;
198 }
199
200 close (pfd);
201 }
202 }
203 }
204 }
205 #endif
206
207 return -1;
208 }
209
210 /*----------------------------------------------------------------------*/
211 /*
212 * Returns tty file descriptor, or -1 on failure
213 */
214 static int
215 get_tty (char *ttydev)
216 {
217 return open (ttydev, O_RDWR | O_NOCTTY, 0);
218 }
219
220 /*----------------------------------------------------------------------*/
221 /*
222 * Make our tty a controlling tty so that /dev/tty points to us
223 */
224 static int
225 control_tty (int fd_tty)
226 {
227 int fd;
228
229 /* ---------------------------------------- */
230 setsid ();
231
232 /* ---------------------------------------- */
233 # if defined(PTYS_ARE_PTMX) && defined(I_PUSH)
234 /*
235 * Push STREAMS modules:
236 * ptem: pseudo-terminal hardware emulation module.
237 * ldterm: standard terminal line discipline.
238 * ttcompat: V7, 4BSD and XENIX STREAMS compatibility module.
239 *
240 * After we push the STREAMS modules, the first open () on the slave side
241 * (i.e. the next section between the dashes giving us "tty opened OK")
242 * should make the "ptem" (or "ldterm" depending upon either which OS
243 * version or which set of manual pages you have) module give us a
244 * controlling terminal. We must already have close ()d the master side
245 * fd in this child process before we push STREAMS modules on because the
246 * documentation is really unclear about whether it is any close () on
247 * the master side or the last close () - i.e. a proper STREAMS dismantling
248 * close () - on the master side which causes a hang up to be sent
249 * through - Geoff Wing
250 */
251 # ifdef HAVE_ISASTREAM
252 if (isastream (fd_tty) == 1)
253 # endif
254 {
255 ioctl (fd_tty, I_PUSH, "ptem");
256 ioctl (fd_tty, I_PUSH, "ldterm");
257 ioctl (fd_tty, I_PUSH, "ttcompat");
258 }
259 # endif
260 /* ---------------------------------------- */
261 fd = ioctl (fd_tty, TIOCSCTTY, NULL);
262 /* ---------------------------------------- */
263 fd = open ("/dev/tty", O_WRONLY);
264 if (fd < 0)
265 return -1; /* fatal */
266 close (fd);
267 /* ---------------------------------------- */
268
269 return 0;
270 }
271
272 void
273 rxvt_ptytty::close_tty ()
274 {
275 if (tty < 0)
276 return;
277
278 close (tty);
279 tty = -1;
280 }
281
282 bool
283 rxvt_ptytty::make_controlling_tty ()
284 {
285 return control_tty (tty) >= 0;
286 }
287
288 void
289 rxvt_ptytty::set_utf8_mode (bool on)
290 {
291 #ifdef IUTF8
292 if (pty < 0)
293 return;
294
295 struct termios tio;
296
297 if (tcgetattr (pty, &tio) != -1)
298 {
299 tcflag_t new_cflag = tio.c_iflag;
300
301 if (on)
302 new_cflag |= IUTF8;
303 else
304 new_cflag &= ~IUTF8;
305
306 if (new_cflag != tio.c_iflag)
307 {
308 tio.c_iflag = new_cflag;
309 tcsetattr (pty, TCSANOW, &tio);
310 }
311 }
312 #endif
313 }
314
315 /////////////////////////////////////////////////////////////////////////////
316
317 #ifndef NO_SETOWNER_TTYDEV
318 static struct ttyconf {
319 gid_t gid;
320 mode_t mode;
321
322 ttyconf ()
323 {
324 #ifdef TTY_GID_SUPPORT
325 struct group *gr = getgrnam ("tty");
326
327 if (gr)
328 { /* change group ownership of tty to "tty" */
329 mode = S_IRUSR | S_IWUSR | S_IWGRP;
330 gid = gr->gr_gid;
331 }
332 else
333 #endif /* TTY_GID_SUPPORT */
334 {
335 mode = S_IRUSR | S_IWUSR | S_IWGRP | S_IWOTH;
336 gid = getgid ();
337 }
338 }
339 } ttyconf;
340
341 /////////////////////////////////////////////////////////////////////////////
342
343 void
344 rxvt_ptytty_unix::privileges (rxvt_privaction action)
345 {
346 if (!name || !*name)
347 return;
348
349 rxvt_privileges (RESTORE);
350
351 if (action == SAVE)
352 {
353 # ifndef RESET_TTY_TO_COMMON_DEFAULTS
354 /* store original tty status for restoration rxvt_clean_exit () -- rgg 04/12/95 */
355 if (lstat (name, &savestat) < 0) /* you lose out */
356 ;
357 else
358 # endif
359 {
360 saved = true;
361 chown (name, getuid (), ttyconf.gid); /* fail silently */
362 chmod (name, ttyconf.mode);
363 # ifdef HAVE_REVOKE
364 revoke (name);
365 # endif
366 }
367 }
368 else
369 { /* action == RESTORE */
370 # ifndef RESET_TTY_TO_COMMON_DEFAULTS
371 if (saved)
372 {
373 chmod (name, savestat.st_mode);
374 chown (name, savestat.st_uid, savestat.st_gid);
375 }
376 # else
377 chmod (name, (S_IRUSR | S_IWUSR | S_IRGRP | S_IWGRP | S_IROTH | S_IWOTH));
378 chown (name, 0, 0);
379 # endif
380
381 }
382
383 rxvt_privileges (IGNORE);
384 }
385 #endif
386
387 rxvt_ptytty_unix::rxvt_ptytty_unix ()
388 {
389 pty = tty = -1;
390 name = 0;
391 #ifndef NO_SETOWNER_TTYDEV
392 saved = false;
393 #endif
394 #if UTMP_SUPPORT
395 cmd_pid = 0;
396 #endif
397 }
398
399 rxvt_ptytty_unix::~rxvt_ptytty_unix ()
400 {
401 logout ();
402 put ();
403 }
404
405 void
406 rxvt_ptytty_unix::put ()
407 {
408 #ifndef NO_SETOWNER_TTYDEV
409 privileges (RESTORE);
410 #endif
411
412 if (pty >= 0) close (pty);
413 close_tty ();
414 free (name);
415
416 pty = tty = -1;
417 name = 0;
418 }
419
420 bool
421 rxvt_ptytty_unix::get ()
422 {
423 /* get master (pty) */
424 if ((pty = get_pty (&tty, &name)) < 0)
425 return false;
426
427 fcntl (pty, F_SETFL, O_NONBLOCK);
428
429 /* get slave (tty) */
430 if (tty < 0)
431 {
432 #ifndef NO_SETOWNER_TTYDEV
433 privileges (SAVE);
434 #endif
435
436 if ((tty = get_tty (name)) < 0)
437 {
438 put ();
439 return false;
440 }
441 }
442
443 return true;
444 }
445
446 #if PTYTTY_HELPER
447
448 static int sock_fd;
449 static int pid;
450
451 struct command
452 {
453 enum { get, login, destroy } type;
454
455 rxvt_ptytty *id;
456
457 bool login_shell;
458 int cmd_pid;
459 char hostname[512]; // arbitrary, but should be plenty
460 };
461
462 struct rxvt_ptytty_proxy : zero_initialized, rxvt_ptytty
463 {
464 rxvt_ptytty *id;
465
466 rxvt_ptytty_proxy ();
467 ~rxvt_ptytty_proxy ();
468
469 bool get ();
470 void login (int cmd_pid, bool login_shell, const char *hostname);
471 };
472
473 bool
474 rxvt_ptytty_proxy::get ()
475 {
476 command cmd;
477
478 cmd.type = command::get;
479
480 write (sock_fd, &cmd, sizeof (cmd));
481
482 if (read (sock_fd, &id, sizeof (id)) != sizeof (id))
483 rxvt_fatal ("protocol error while creating pty using helper process, aborting.\n");
484
485 if (!id)
486 return false;
487
488 if ((pty = rxvt_recv_fd (sock_fd)) < 0
489 || (tty = rxvt_recv_fd (sock_fd)) < 0)
490 rxvt_fatal ("protocol error while reading pty/tty fds from helper process, aborting.\n");
491
492 return true;
493 }
494
495 void
496 rxvt_ptytty_proxy::login (int cmd_pid, bool login_shell, const char *hostname)
497 {
498 command cmd;
499
500 cmd.type = command::login;
501 cmd.id = id;
502 cmd.cmd_pid = cmd_pid;
503 cmd.login_shell = login_shell;
504 strncpy (cmd.hostname, hostname, sizeof (cmd.hostname));
505
506 write (sock_fd, &cmd, sizeof (cmd));
507 }
508
509 rxvt_ptytty_proxy::~rxvt_ptytty_proxy ()
510 {
511 command cmd;
512
513 cmd.type = command::destroy;
514 cmd.id = id;
515
516 write (sock_fd, &cmd, sizeof (cmd));
517 }
518
519 static
520 void serve ()
521 {
522 command cmd;
523 vector<rxvt_ptytty *> ptys;
524
525 while (read (sock_fd, &cmd, sizeof (command)) == sizeof (command))
526 {
527 if (cmd.type == command::get)
528 {
529 // -> id ptyfd ttyfd
530 cmd.id = new rxvt_ptytty_unix;
531
532 if (cmd.id->get ())
533 {
534 write (sock_fd, &cmd.id, sizeof (cmd.id));
535 ptys.push_back (cmd.id);
536
537 rxvt_send_fd (sock_fd, cmd.id->pty);
538 rxvt_send_fd (sock_fd, cmd.id->tty);
539 }
540 else
541 {
542 delete cmd.id;
543 cmd.id = 0;
544 write (sock_fd, &cmd.id, sizeof (cmd.id));
545 }
546 }
547 else if (cmd.type == command::login)
548 {
549 if (find (ptys.begin (), ptys.end (), cmd.id))
550 {
551 cmd.hostname[sizeof (cmd.hostname) - 1] = 0;
552 cmd.id->login (cmd.cmd_pid, cmd.login_shell, cmd.hostname);
553 }
554 else printf ("xxx hiya login no match %p\n", cmd.id);
555 }
556 else if (cmd.type == command::destroy)
557 {
558 rxvt_ptytty **pty = find (ptys.begin (), ptys.end (), cmd.id);
559
560 if (*pty)
561 {
562 ptys.erase (pty);
563 delete *pty;
564 }
565 else printf ("xxx hiya destroy no match %p\n", cmd.id);
566 }
567 else
568 break;
569 }
570
571 // destroy all ptys
572 for (rxvt_ptytty **i = ptys.end (); i-- > ptys.begin (); )
573 delete *i;
574 }
575
576 void rxvt_ptytty_server ()
577 {
578 int sv[2];
579
580 if (socketpair (AF_UNIX, SOCK_STREAM, 0, sv))
581 rxvt_fatal ("could not create socket to communicate with pty/sessiondb helper, aborting.\n");
582
583 pid = fork ();
584
585 if (pid < 0)
586 rxvt_fatal ("could not create pty/sessiondb helper process, aborting.\n");
587
588 if (pid)
589 {
590 // client, urxvt
591 sock_fd = sv[0];
592 close (sv[1]);
593 fcntl (sock_fd, F_SETFD, FD_CLOEXEC);
594 }
595 else
596 {
597 // server, pty-helper
598 sock_fd = sv[1];
599
600 close (sv[0]);//D
601 // for (int fd = 0; fd < 1023; fd++)
602 // if (fd != sock_fd)
603 // close (fd);
604
605 serve ();
606 _exit (EXIT_SUCCESS);
607 }
608 }
609 #endif
610
611 // a "factory" *g*
612 rxvt_ptytty *
613 rxvt_new_ptytty ()
614 {
615 #if PTYTTY_HELPER
616 if (pid > 0)
617 {
618 // use helper process
619 return new rxvt_ptytty_proxy;
620 }
621 else
622 #endif
623 return new rxvt_ptytty_unix;
624 }
625
626 /*----------------------- end-of-file (C source) -----------------------*/
627