ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/libptytty/src/ptytty.C
(Generate patch)

Comparing libptytty/src/ptytty.C (file contents):
Revision 1.3 by root, Sat Jan 21 22:06:16 2006 UTC vs.
Revision 1.37 by sf-exg, Sun Mar 28 08:39:34 2010 UTC

1// This file is part of libptytty. Do not make local modifications.
2// http://software.schmorp.de/pkg/libptytty
3
1/*--------------------------------*-C-*---------------------------------* 4/*----------------------------------------------------------------------*
2 * File: ptytty.C 5 * File: ptytty.C
3 *----------------------------------------------------------------------* 6 *----------------------------------------------------------------------*
4 * 7 *
5 * All portions of code are copyright by their respective author/s. 8 * All portions of code are copyright by their respective author/s.
6 * Copyright (c) 1999-2001 Geoff Wing <gcw@pobox.com> 9 * Copyright (c) 1999-2001 Geoff Wing <gcw@pobox.com>
7 * Copyright (c) 2004-2006 Marc Lehmann <pcg@goof.com> 10 * Copyright (c) 2004-2006 Marc Lehmann <pcg@goof.com>
11 * Copyright (c) 2006 Emanuele Giaquinta <e.giaquinta@glauco.it>
8 * 12 *
9 * This program is free software; you can redistribute it and/or modify 13 * 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 14 * 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 15 * the Free Software Foundation; either version 2 of the License, or
12 * (at your option) any later version. 16 * (at your option) any later version.
19 * You should have received a copy of the GNU General Public License 23 * You should have received a copy of the GNU General Public License
20 * along with this program; if not, write to the Free Software 24 * along with this program; if not, write to the Free Software
21 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. 25 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
22 *---------------------------------------------------------------------*/ 26 *---------------------------------------------------------------------*/
23 27
24#include "../config.h" /* NECESSARY */ 28#include "config.h"
25 29
26#include "fdpass.h"
27#include "ptytty.h" 30#include "ptytty.h"
28 31
29#include <cstdlib> 32#include <cstdlib>
30#include <cstring> 33#include <cstring>
34#include <csignal>
31 35
32#include <sys/types.h> 36#include <sys/types.h>
33#include <sys/socket.h> 37#include <sys/stat.h>
34#include <unistd.h> 38#include <unistd.h>
35#include <fcntl.h> 39#include <fcntl.h>
36 40
37#ifdef HAVE_SYS_IOCTL_H 41#ifdef HAVE_SYS_IOCTL_H
38# include <sys/ioctl.h> 42# include <sys/ioctl.h>
39#endif 43#endif
40#if defined(HAVE_DEV_PTMX) && defined(HAVE_SYS_STROPTS_H) 44#if defined(HAVE_DEV_PTMX) && defined(HAVE_SYS_STROPTS_H)
41# include <sys/stropts.h> /* for I_PUSH */ 45# include <sys/stropts.h> /* for I_PUSH */
42#endif 46#endif
43#ifdef HAVE_ISASTREAM 47#if defined(HAVE_ISASTREAM) && defined(HAVE_STROPTS_H)
44# include <stropts.h> 48# include <stropts.h>
45#endif 49#endif
46#if defined(HAVE_PTY_H) 50#if defined(HAVE_PTY_H)
47# include <pty.h> 51# include <pty.h>
48#elif defined(HAVE_LIBUTIL_H) 52#elif defined(HAVE_LIBUTIL_H)
60 64
61/* ------------------------------------------------------------------------- * 65/* ------------------------------------------------------------------------- *
62 * GET PSEUDO TELETYPE - MASTER AND SLAVE * 66 * GET PSEUDO TELETYPE - MASTER AND SLAVE *
63 * ------------------------------------------------------------------------- */ 67 * ------------------------------------------------------------------------- */
64/* 68/*
65 * Returns pty file descriptor, or -1 on failure 69 * Returns pty file descriptor, or -1 on failure
66 * If successful, ttydev is set to the name of the slave device. 70 * 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 71 * fd_tty _may_ also be set to an open fd to the slave device
68 */ 72 */
69#if defined(UNIX98_PTY) 73#if defined(UNIX98_PTY)
74
70static int 75 static int
71get_pty (int *fd_tty, char **ttydev) 76 get_pty (int *fd_tty, char **ttydev)
72{ 77 {
73 int pfd; 78 int pfd;
74 79
75# if defined(HAVE_GETPT) 80# if defined(HAVE_GETPT)
76 pfd = getpt(); 81 pfd = getpt();
77# elif defined(HAVE_POSIX_OPENPT) 82# elif defined(HAVE_POSIX_OPENPT)
78 pfd = posix_openpt (O_RDWR); 83 pfd = posix_openpt (O_RDWR);
79# else 84# else
80 pfd = open (CLONE_DEVICE, O_RDWR | O_NOCTTY, 0); 85 pfd = open (CLONE_DEVICE, O_RDWR | O_NOCTTY, 0);
81# endif 86# endif
87
82 if (pfd >= 0) 88 if (pfd >= 0)
83 { 89 {
84 if (grantpt (pfd) == 0 /* change slave permissions */ 90 if (grantpt (pfd) == 0 /* change slave permissions */
85 && unlockpt (pfd) == 0) 91 && unlockpt (pfd) == 0)
92 {
86 { /* slave now unlocked */ 93 /* slave now unlocked */
87 *ttydev = strdup (ptsname (pfd)); /* get slave's name */ 94 *ttydev = strdup (ptsname (pfd)); /* get slave's name */
88 return pfd; 95 return pfd;
89 } 96 }
90 97
91 close (pfd); 98 close (pfd);
92 } 99 }
93 100
94 return -1; 101 return -1;
95} 102 }
103
96#elif defined(HAVE_OPENPTY) 104#elif defined(HAVE_OPENPTY)
105
97static int 106 static int
98get_pty (int *fd_tty, char **ttydev) 107 get_pty (int *fd_tty, char **ttydev)
99{ 108 {
100 int pfd; 109 int pfd;
101 int res; 110 int res;
102 char tty_name[32]; 111
103
104 res = openpty (&pfd, fd_tty, tty_name, NULL, NULL); 112 res = openpty (&pfd, fd_tty, NULL, NULL, NULL);
113
105 if (res != -1) 114 if (res != -1)
106 { 115 {
107 *ttydev = strdup (tty_name); 116 *ttydev = strdup (ttyname (*fd_tty));
108 return pfd; 117 return pfd;
109 } 118 }
110 119
111 return -1; 120 return -1;
112} 121 }
122
113#elif defined(HAVE__GETPTY) 123#elif defined(HAVE__GETPTY)
124
114static int 125 static int
115get_pty (int *fd_tty, char **ttydev) 126 get_pty (int *fd_tty, char **ttydev)
116{ 127 {
117 int pfd; 128 int pfd;
129 char *slave;
118 130
119 *ttydev = _getpty (&pfd, O_RDWR | O_NONBLOCK | O_NOCTTY, 0622, 0); 131 slave = _getpty (&pfd, O_RDWR | O_NONBLOCK | O_NOCTTY, 0622, 0);
120 if (*ttydev != NULL)
121 return pfd;
122 132
123 return -1; 133 if (slave != NULL)
124}
125#elif defined(HAVE_DEV_PTC)
126static int
127get_pty (int *fd_tty, char **ttydev)
128{
129 int pfd;
130
131 if ((pfd = open ("/dev/ptc", O_RDWR | O_NOCTTY, 0)) >= 0)
132 { 134 {
133 *ttydev = strdup (ttyname (pfd)); 135 *ttydev = strdup (slave);
134 return pfd; 136 return pfd;
135 } 137 }
136 138
137 return -1; 139 return -1;
138}
139#elif defined(HAVE_DEV_CLONE)
140static int
141get_pty (int *fd_tty, char **ttydev)
142{
143 int pfd;
144
145 if ((pfd = open ("/dev/ptym/clone", O_RDWR | O_NOCTTY, 0)) >= 0)
146 {
147 *ttydev = strdup (ptsname (pfd));
148 return pfd;
149 } 140 }
150 141
151 return -1;
152}
153#else 142#else
143
154/* Based on the code in openssh/openbsd-compat/bsd-openpty.c */ 144 /* Based on the code in openssh/openbsd-compat/bsd-openpty.c */
155static int 145 static int
156get_pty (int *fd_tty, char **ttydev) 146 get_pty (int *fd_tty, char **ttydev)
157{ 147 {
158 int pfd; 148 int pfd;
159 int i; 149 int i;
160 char pty_name[32]; 150 char pty_name[32];
161 char tty_name[32]; 151 char tty_name[32];
162 const char *majors = "pqrstuvwxyzabcde"; 152 const char *majors = "pqrstuvwxyzabcde";
163 const char *minors = "0123456789abcdef"; 153 const char *minors = "0123456789abcdef";
154
164 for (i = 0; i < 256; i++) 155 for (i = 0; i < 256; i++)
165 { 156 {
166 snprintf(pty_name, 32, "/dev/pty%c%c", majors[i / 16], minors[i % 16]); 157 snprintf(pty_name, 32, "/dev/pty%c%c", majors[i / 16], minors[i % 16]);
167 snprintf(tty_name, 32, "/dev/tty%c%c", majors[i / 16], minors[i % 16]); 158 snprintf(tty_name, 32, "/dev/tty%c%c", majors[i / 16], minors[i % 16]);
159
168 if ((pfd = open (pty_name, O_RDWR | O_NOCTTY, 0)) == -1) 160 if ((pfd = open (pty_name, O_RDWR | O_NOCTTY, 0)) == -1)
169 { 161 {
170 snprintf(pty_name, 32, "/dev/ptyp%d", i); 162 snprintf(pty_name, 32, "/dev/ptyp%d", i);
171 snprintf(tty_name, 32, "/dev/ttyp%d", i); 163 snprintf(tty_name, 32, "/dev/ttyp%d", i);
172 if ((pfd = open (pty_name, O_RDWR | O_NOCTTY, 0)) == -1) 164 if ((pfd = open (pty_name, O_RDWR | O_NOCTTY, 0)) == -1)
173 continue; 165 continue;
174 } 166 }
167
175 if (access (tty_name, R_OK | W_OK) == 0) 168 if (access (tty_name, R_OK | W_OK) == 0)
176 { 169 {
177 *ttydev = strdup (tty_name); 170 *ttydev = strdup (tty_name);
178 return pfd; 171 return pfd;
179 } 172 }
180 173
181 close (pfd); 174 close (pfd);
182 } 175 }
183} 176
177 return -1;
178 }
179
184#endif 180#endif
185 181
186/*----------------------------------------------------------------------*/ 182/*----------------------------------------------------------------------*/
187/* 183/*
188 * Returns tty file descriptor, or -1 on failure 184 * Returns tty file descriptor, or -1 on failure
189 */ 185 */
190static int 186static int
191get_tty (char *ttydev) 187get_tty (char *ttydev)
192{ 188{
193 return open (ttydev, O_RDWR | O_NOCTTY, 0); 189 return open (ttydev, O_RDWR | O_NOCTTY, 0);
198 * Make our tty a controlling tty so that /dev/tty points to us 194 * Make our tty a controlling tty so that /dev/tty points to us
199 */ 195 */
200static int 196static int
201control_tty (int fd_tty) 197control_tty (int fd_tty)
202{ 198{
199 int fd;
200
203 setsid (); 201 setsid ();
204 202
205#if defined(HAVE_DEV_PTMX) && defined(I_PUSH) 203#if defined(HAVE_DEV_PTMX) && defined(I_PUSH)
206 /* 204 /*
207 * Push STREAMS modules: 205 * Push STREAMS modules:
218 * documentation is really unclear about whether it is any close () on 216 * documentation is really unclear about whether it is any close () on
219 * the master side or the last close () - i.e. a proper STREAMS dismantling 217 * the master side or the last close () - i.e. a proper STREAMS dismantling
220 * close () - on the master side which causes a hang up to be sent 218 * close () - on the master side which causes a hang up to be sent
221 * through - Geoff Wing 219 * through - Geoff Wing
222 */ 220 */
223# ifdef HAVE_ISASTREAM 221#if defined(HAVE_ISASTREAM) && defined(HAVE_STROPTS_H)
224 if (isastream (fd_tty) == 1) 222 if (isastream (fd_tty) == 1)
225# endif 223# endif
226 { 224 {
227 ioctl (fd_tty, I_PUSH, "ptem"); 225 ioctl (fd_tty, I_PUSH, "ptem");
228 ioctl (fd_tty, I_PUSH, "ldterm"); 226 ioctl (fd_tty, I_PUSH, "ldterm");
229 ioctl (fd_tty, I_PUSH, "ttcompat"); 227 ioctl (fd_tty, I_PUSH, "ttcompat");
230 } 228 }
231#endif 229#endif
232 230
231#ifdef TIOCSCTTY
233 ioctl (fd_tty, TIOCSCTTY, NULL); 232 ioctl (fd_tty, TIOCSCTTY, NULL);
233#else
234 fd = open (ttyname (fd_tty), O_RDWR);
235 if (fd >= 0)
236 close (fd);
237#endif
234 238
235 int fd = open ("/dev/tty", O_WRONLY); 239 fd = open ("/dev/tty", O_WRONLY);
236 if (fd < 0) 240 if (fd < 0)
237 return -1; /* fatal */ 241 return -1; /* fatal */
238 242
239 close (fd); 243 close (fd);
240 244
241 return 0; 245 return 0;
242} 246}
243 247
244void 248void
245rxvt_ptytty::close_tty () 249ptytty::close_tty ()
246{ 250{
247 if (tty < 0) 251 if (tty < 0)
248 return; 252 return;
249 253
250 close (tty); 254 close (tty);
251 tty = -1; 255 tty = -1;
252} 256}
253 257
254bool 258bool
255rxvt_ptytty::make_controlling_tty () 259ptytty::make_controlling_tty ()
256{ 260{
257 return control_tty (tty) >= 0; 261 return control_tty (tty) >= 0;
258} 262}
259 263
260void 264void
261rxvt_ptytty::set_utf8_mode (bool on) 265ptytty::set_utf8_mode (bool on)
262{ 266{
263#ifdef IUTF8 267#ifdef IUTF8
264 if (pty < 0) 268 if (pty < 0)
265 return; 269 return;
266 270
292 { 296 {
293#ifdef TTY_GID_SUPPORT 297#ifdef TTY_GID_SUPPORT
294 struct group *gr = getgrnam ("tty"); 298 struct group *gr = getgrnam ("tty");
295 299
296 if (gr) 300 if (gr)
301 {
297 { /* change group ownership of tty to "tty" */ 302 /* change group ownership of tty to "tty" */
298 mode = S_IRUSR | S_IWUSR | S_IWGRP; 303 mode = S_IRUSR | S_IWUSR | S_IWGRP;
299 gid = gr->gr_gid; 304 gid = gr->gr_gid;
300 } 305 }
301 else 306 else
302#endif /* TTY_GID_SUPPORT */ 307#endif /* TTY_GID_SUPPORT */
303 { 308 {
304 mode = S_IRUSR | S_IWUSR | S_IWGRP | S_IWOTH; 309 mode = S_IRUSR | S_IWUSR | S_IWGRP | S_IWOTH;
305 gid = 0; 310 gid = 0;
306 } 311 }
307 } 312 }
308} ttyconf; 313} ttyconf;
309 314
310rxvt_ptytty_unix::rxvt_ptytty_unix () 315ptytty_unix::ptytty_unix ()
311{ 316{
312 name = 0; 317 name = 0;
313#if UTMP_SUPPORT 318#if UTMP_SUPPORT
314 cmd_pid = 0; 319 cmd_pid = 0;
315#endif 320#endif
316} 321}
317 322
318rxvt_ptytty_unix::~rxvt_ptytty_unix () 323ptytty_unix::~ptytty_unix ()
319{ 324{
320#if UTMP_SUPPORT 325#if UTMP_SUPPORT
321 logout (); 326 logout ();
322#endif 327#endif
323 put (); 328 put ();
324} 329}
325 330
326void 331void
327rxvt_ptytty_unix::put () 332ptytty_unix::put ()
328{ 333{
334 if (name)
335 {
329 chmod (name, RESTORE_TTY_MODE); 336 chmod (name, RESTORE_TTY_MODE);
330 chown (name, 0, ttyconf.gid); 337 chown (name, 0, ttyconf.gid);
338 }
331 339
332 close_tty (); 340 close_tty ();
333 341
334 if (pty >= 0) 342 if (pty >= 0)
335 close (pty); 343 close (pty);
339 pty = tty = -1; 347 pty = tty = -1;
340 name = 0; 348 name = 0;
341} 349}
342 350
343bool 351bool
344rxvt_ptytty_unix::get () 352ptytty_unix::get ()
345{ 353{
346 /* get master (pty) */ 354 /* get master (pty) */
347 if ((pty = get_pty (&tty, &name)) < 0) 355 if ((pty = get_pty (&tty, &name)) < 0)
348 return false; 356 return false;
349 357
368 } 376 }
369 377
370 return true; 378 return true;
371} 379}
372 380
373#if PTYTTY_HELPER
374
375static int sock_fd;
376static int pid;
377
378struct command
379{
380 enum { get, login, destroy } type;
381
382 rxvt_ptytty *id;
383
384 bool login_shell;
385 int cmd_pid;
386 char hostname[512]; // arbitrary, but should be plenty
387};
388
389struct rxvt_ptytty_proxy : zero_initialized, rxvt_ptytty
390{
391 rxvt_ptytty *id;
392
393 ~rxvt_ptytty_proxy ();
394
395 bool get ();
396 void login (int cmd_pid, bool login_shell, const char *hostname);
397};
398
399bool
400rxvt_ptytty_proxy::get ()
401{
402 command cmd;
403
404 cmd.type = command::get;
405
406 write (sock_fd, &cmd, sizeof (cmd));
407
408 if (read (sock_fd, &id, sizeof (id)) != sizeof (id))
409 rxvt_fatal ("protocol error while creating pty using helper process, aborting.\n");
410
411 if (!id)
412 return false;
413
414 if ((pty = rxvt_recv_fd (sock_fd)) < 0
415 || (tty = rxvt_recv_fd (sock_fd)) < 0)
416 rxvt_fatal ("protocol error while reading pty/tty fds from helper process, aborting.\n");
417
418 return true;
419}
420
421void
422rxvt_ptytty_proxy::login (int cmd_pid, bool login_shell, const char *hostname)
423{
424 command cmd;
425
426 cmd.type = command::login;
427 cmd.id = id;
428 cmd.cmd_pid = cmd_pid;
429 cmd.login_shell = login_shell;
430 strncpy (cmd.hostname, hostname, sizeof (cmd.hostname));
431
432 write (sock_fd, &cmd, sizeof (cmd));
433}
434
435rxvt_ptytty_proxy::~rxvt_ptytty_proxy ()
436{
437 command cmd;
438
439 cmd.type = command::destroy;
440 cmd.id = id;
441
442 write (sock_fd, &cmd, sizeof (cmd));
443}
444
445static
446void serve ()
447{
448 command cmd;
449 vector<rxvt_ptytty *> ptys;
450
451 while (read (sock_fd, &cmd, sizeof (command)) == sizeof (command))
452 {
453 if (cmd.type == command::get)
454 {
455 // -> id ptyfd ttyfd
456 cmd.id = new rxvt_ptytty_unix;
457
458 if (cmd.id->get ())
459 {
460 write (sock_fd, &cmd.id, sizeof (cmd.id));
461 ptys.push_back (cmd.id);
462
463 rxvt_send_fd (sock_fd, cmd.id->pty);
464 rxvt_send_fd (sock_fd, cmd.id->tty);
465 }
466 else
467 {
468 delete cmd.id;
469 cmd.id = 0;
470 write (sock_fd, &cmd.id, sizeof (cmd.id));
471 }
472 }
473 else if (cmd.type == command::login)
474 {
475#if UTMP_SUPPORT
476 if (find (ptys.begin (), ptys.end (), cmd.id))
477 {
478 cmd.hostname[sizeof (cmd.hostname) - 1] = 0;
479 cmd.id->login (cmd.cmd_pid, cmd.login_shell, cmd.hostname);
480 }
481#endif
482 }
483 else if (cmd.type == command::destroy)
484 {
485 rxvt_ptytty **pty = find (ptys.begin (), ptys.end (), cmd.id);
486
487 if (pty)
488 {
489 delete *pty;
490 ptys.erase (pty);
491 }
492 }
493 else
494 break;
495 }
496
497 // destroy all ptys
498 for (rxvt_ptytty **i = ptys.end (); i-- > ptys.begin (); )
499 delete *i;
500}
501
502void rxvt_ptytty_server ()
503{
504 int sv[2];
505
506 if (socketpair (AF_UNIX, SOCK_STREAM, 0, sv))
507 rxvt_fatal ("could not create socket to communicate with pty/sessiondb helper, aborting.\n");
508
509 pid = fork ();
510
511 if (pid < 0)
512 rxvt_fatal ("could not create pty/sessiondb helper process, aborting.\n");
513
514 if (pid)
515 {
516 // client, urxvt
517 sock_fd = sv[0];
518 close (sv[1]);
519 fcntl (sock_fd, F_SETFD, FD_CLOEXEC);
520 }
521 else
522 {
523 // server, pty-helper
524 sock_fd = sv[1];
525
526 for (int fd = 0; fd < 1023; fd++)
527 if (fd != sock_fd)
528 close (fd);
529
530 serve ();
531 _exit (EXIT_SUCCESS);
532 }
533}
534
535#endif
536
537// a "factory" *g*
538rxvt_ptytty *
539rxvt_new_ptytty ()
540{
541#if PTYTTY_HELPER
542 if (pid > 0)
543 // use helper process
544 return new rxvt_ptytty_proxy;
545 else
546#endif
547 return new rxvt_ptytty_unix;
548}
549
550/*----------------------- end-of-file (C source) -----------------------*/
551

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines