1 /*--------------------------------*-C-*---------------------------------*
3 *----------------------------------------------------------------------*
5 * All portions of code are copyright by their respective author/s.
6 * Copyright (c) 1992 John Bovey <jdb@ukc.ac.uk>
8 * Copyright (c) 1993 lipka
9 * Copyright (c) 1993 Brian Stempien <stempien@cs.wmich.edu>
10 * Copyright (c) 1995 Raul Garcia Garcia <rgg@tid.es>
11 * Copyright (c) 1995 Piet W. Plomp <piet@idefix.icce.rug.nl>
12 * Copyright (c) 1997 Raul Garcia Garcia <rgg@tid.es>
13 * Copyright (c) 1998-2001 Geoff Wing <gcw@pobox.com>
14 * - extensive modifications
15 * Copyright (c) 1999 D J Hawkey Jr <hawkeyd@visi.com>
17 * Copyright (c) 2004-2006 Marc Lehmann <pcg@goof.com>
19 * This program is free software; you can redistribute it and/or modify
20 * it under the terms of the GNU General Public License as published by
21 * the Free Software Foundation; either version 2 of the License, or
22 * (at your option) any later version.
24 * This program is distributed in the hope that it will be useful,
25 * but WITHOUT ANY WARRANTY; without even the implied warranty of
26 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
27 * GNU General Public License for more details.
29 * You should have received a copy of the GNU General Public License
30 * along with this program; if not, write to the Free Software
31 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
32 *----------------------------------------------------------------------*/
34 #include "../config.h"
41 static int rxvt_write_bsd_utmp (int utmp_pos, struct utmp *wu);
42 static void rxvt_update_wtmp (const char *fname, const struct utmp *putmp);
45 static void rxvt_update_lastlog (const char *fname, const char *pty, const char *host);
48 * BSD style utmp entry
49 * ut_line, ut_name, ut_host, ut_time
50 * SYSV style utmp (and utmpx) entry
51 * ut_user, ut_id, ut_line, ut_pid, ut_type, ut_exit, ut_time
54 /* ------------------------------------------------------------------------- */
57 * make and write utmp and wtmp entries
60 rxvt_ptytty_unix::login (int cmd_pid, bool login_shell, const char *hostname)
62 const char *pty = name;
67 this->cmd_pid = cmd_pid;
68 this->login_shell = login_shell;
70 #ifdef HAVE_STRUCT_UTMP
71 struct utmp *ut = &this->ut;
73 #ifdef HAVE_STRUCT_UTMPX
74 struct utmpx *utx = &this->utx;
77 struct passwd *pwent = getpwuid (getuid ());
79 if (!strncmp (pty, "/dev/", 5))
80 pty += 5; /* skip /dev/ prefix */
82 #if defined(HAVE_UTMP_PID) || defined(HAVE_STRUCT_UTMPX)
83 if (!strncmp (pty, "pty", 3) || !strncmp (pty, "tty", 3))
84 strncpy (ut_id, pty + 3, sizeof (ut_id));
85 else if (sscanf (pty, "pts/%d", &i) == 1)
86 sprintf (ut_id, "vt%02x", (i & 0xff)); /* sysv naming */
87 else if (strncmp (pty, "pty", 3) && strncmp (pty, "tty", 3))
89 rxvt_warn ("can't parse tty name \"%s\", not adding utmp entry.\n", pty);
94 #ifdef HAVE_STRUCT_UTMP
95 memset (ut, 0, sizeof (struct utmp));
98 strncpy (ut->ut_id, ut_id, sizeof (ut->ut_id));
99 ut->ut_type = DEAD_PROCESS;
100 getutid (ut); /* position to entry in utmp file */
101 strncpy (this->ut_id, ut_id, sizeof (this->ut_id));
105 #ifdef HAVE_STRUCT_UTMPX
106 memset (utx, 0, sizeof (struct utmpx));
108 strncpy (utx->ut_id, ut_id, sizeof (utx->ut_id));
109 utx->ut_type = DEAD_PROCESS;
110 getutxid (utx); /* position to entry in utmp file */
111 strncpy (this->ut_id, ut_id, sizeof (this->ut_id));
114 #ifdef HAVE_STRUCT_UTMP
115 strncpy (ut->ut_line, pty, sizeof (ut->ut_line));
116 ut->ut_time = time (NULL);
117 # ifdef HAVE_UTMP_PID
118 strncpy (ut->ut_user, (pwent && pwent->pw_name) ? pwent->pw_name : "?",
119 sizeof (ut->ut_user));
120 strncpy (ut->ut_id, ut_id, sizeof (ut->ut_id));
121 ut->ut_time = time (NULL);
122 ut->ut_pid = cmd_pid;
123 # ifdef HAVE_UTMP_HOST
124 strncpy (ut->ut_host, hostname, sizeof (ut->ut_host));
126 ut->ut_type = USER_PROCESS;
128 endutent (); /* close the file */
131 strncpy (ut->ut_name, (pwent && pwent->pw_name) ? pwent->pw_name : "?",
132 sizeof (ut->ut_name));
133 # ifdef HAVE_UTMP_HOST
134 strncpy (ut->ut_host, hostname, sizeof (ut->ut_host));
139 #ifdef HAVE_STRUCT_UTMPX
140 strncpy (utx->ut_line, pty, sizeof (utx->ut_line));
141 strncpy (utx->ut_user, (pwent && pwent->pw_name) ? pwent->pw_name : "?",
142 sizeof (utx->ut_user));
143 strncpy (utx->ut_id, ut_id, sizeof (utx->ut_id));
144 # if HAVE_UTMPX_SESSION
145 utx->ut_session = getsid (0);
147 utx->ut_tv.tv_sec = time (NULL);
148 utx->ut_tv.tv_usec = 0;
149 utx->ut_pid = cmd_pid;
150 # ifdef HAVE_UTMPX_HOST
151 strncpy (utx->ut_host, hostname, sizeof (utx->ut_host));
156 if ((colon = strrchr (ut->ut_host, ':')) != NULL)
161 utx->ut_type = USER_PROCESS;
163 endutxent (); /* close the file */
167 #if defined(HAVE_STRUCT_UTMP) && !defined(HAVE_UTMP_PID)
170 int fdstdin = dup (STDIN_FILENO);
171 dup2 (pty->tty, STDIN_FILENO);
174 if (rxvt_write_bsd_utmp (i, ut))
177 dup2 (fdstdin, STDIN_FILENO);
182 if ((fd0 = fopen (TTYTAB_FILENAME, "r")) != NULL)
184 char buf[256], name[256];
186 buf[sizeof (buf) - 1] = '\0';
187 for (i = 1; (fgets (buf, sizeof (buf) - 1, fd0) != NULL);)
189 if (*buf == '#' || sscanf (buf, "%s", name) != 1)
191 if (!strcmp (ut->ut_line, name))
193 if (!rxvt_write_bsd_utmp (i, ut))
208 # ifdef WTMP_ONLY_ON_LOGIN
212 # ifdef HAVE_STRUCT_UTMP
214 updwtmp (RXVT_WTMP_FILE, ut);
216 rxvt_update_wtmp (RXVT_WTMP_FILE, ut);
219 # if defined(HAVE_STRUCT_UTMPX) && defined(HAVE_UPDWTMPX)
220 updwtmpx (RXVT_WTMPX_FILE, utx);
224 #if defined(LASTLOG_SUPPORT) && defined(RXVT_LASTLOG_FILE)
226 rxvt_update_lastlog (RXVT_LASTLOG_FILE, pty, hostname);
230 /* ------------------------------------------------------------------------- */
232 * remove utmp and wtmp entries
235 rxvt_ptytty_unix::logout ()
240 #ifdef HAVE_STRUCT_UTMP
241 struct utmp *tmput, *ut = &this->ut;
243 #ifdef HAVE_STRUCT_UTMPX
244 struct utmpx *tmputx, *utx = &this->utx;
247 #ifdef HAVE_STRUCT_UTMP
248 # ifdef HAVE_UTMP_PID
249 memset (ut, 0, sizeof (struct utmp));
251 strncpy (ut->ut_id, this->ut_id, sizeof (ut->ut_id));
252 ut->ut_type = USER_PROCESS;
253 if ((tmput = getutid (ut))) /* position to entry in utmp file */
255 ut->ut_type = DEAD_PROCESS;
257 memset (ut->ut_name, 0, sizeof (ut->ut_name));
258 # ifdef HAVE_UTMP_HOST
259 memset (ut->ut_host, 0, sizeof (ut->ut_host));
262 ut->ut_time = time (NULL);
265 #ifdef HAVE_STRUCT_UTMPX
266 memset (utx, 0, sizeof (struct utmpx));
268 strncpy (utx->ut_id, this->ut_id, sizeof (utx->ut_id));
269 utx->ut_type = USER_PROCESS;
270 if ((tmputx = getutxid (utx))) /* position to entry in utmp file */
272 utx->ut_type = DEAD_PROCESS;
273 # if HAVE_UTMPX_SESSION
274 utx->ut_session = getsid (0);
276 utx->ut_tv.tv_sec = time (NULL);
277 utx->ut_tv.tv_usec = 0;
281 * Write ending wtmp entry
284 # ifdef WTMP_ONLY_ON_LOGIN
288 # ifdef HAVE_STRUCT_UTMP
290 updwtmp (RXVT_WTMP_FILE, ut);
292 rxvt_update_wtmp (RXVT_WTMP_FILE, ut);
295 # if defined(HAVE_STRUCT_UTMPX) && defined(HAVE_UPDWTMPX)
296 updwtmpx (RXVT_WTMPX_FILE, utx);
304 #ifdef HAVE_STRUCT_UTMP
305 # ifdef HAVE_UTMP_PID
306 if (ut->ut_pid == cmd_pid)
310 memset (ut, 0, sizeof (struct utmp));
311 rxvt_write_bsd_utmp (utmp_pos, ut);
314 #ifdef HAVE_STRUCT_UTMPX
315 if (utx->ut_pid == cmd_pid)
323 /* ------------------------------------------------------------------------- */
325 * Write a BSD style utmp entry
327 #if defined(HAVE_STRUCT_UTMP) && !defined(HAVE_UTMP_PID)
329 rxvt_write_bsd_utmp (int utmp_pos, struct utmp *wu)
333 if (utmp_pos <= 0 || (fd = open (RXVT_UTMP_FILE, O_WRONLY)) == -1)
336 if (lseek (fd, (off_t) (utmp_pos * sizeof (struct utmp)), SEEK_SET) != -1)
337 write (fd, wu, sizeof (struct utmp));
343 /* ------------------------------------------------------------------------- */
345 * Update a BSD style wtmp entry
347 #if defined(WTMP_SUPPORT) && !defined(HAVE_UPDWTMP) && defined(HAVE_STRUCT_UTMP)
349 rxvt_update_wtmp (const char *fname, const struct utmp *putmp)
351 int fd, gotlock, retry;
352 struct flock lck; /* fcntl locking scheme */
355 if ((fd = open (fname, O_WRONLY | O_APPEND, 0)) < 0)
358 lck.l_whence = SEEK_END; /* start lock at current eof */
359 lck.l_len = 0; /* end at ``largest possible eof'' */
361 lck.l_type = F_WRLCK; /* we want a write lock */
363 /* attempt lock with F_SETLK; F_SETLKW would cause a deadlock! */
364 for (retry = 10, gotlock = 0; retry--;)
365 if (fcntl (fd, F_SETLK, &lck) != -1)
370 else if (errno != EAGAIN && errno != EACCES)
377 if (fstat (fd, &sbuf) == 0)
378 if (write (fd, putmp, sizeof (struct utmp)) != sizeof (struct utmp))
379 ftruncate (fd, sbuf.st_size); /* remove bad writes */
381 lck.l_type = F_UNLCK; /* unlocking the file */
382 fcntl (fd, F_SETLK, &lck);
387 /* ------------------------------------------------------------------------- */
388 #ifdef LASTLOG_SUPPORT
390 rxvt_update_lastlog (const char *fname, const char *pty, const char *host)
392 # ifdef HAVE_STRUCT_LASTLOGX
395 # ifdef HAVE_STRUCT_LASTLOG
398 # ifdef LASTLOG_IS_DIR
399 char lastlogfile[256];
401 struct passwd *pwent;
404 # ifdef HAVE_STRUCT_LASTLOGX
405 memset (&llx, 0, sizeof (llx));
406 llx.ll_tv.tv_sec = time (NULL);
407 llx.ll_tv.tv_usec = 0;
408 strncpy (llx.ll_line, pty, sizeof (llx.ll_line));
409 strncpy (llx.ll_host, host, sizeof (llx.ll_host));
410 updlastlogx (RXVT_LASTLOGX_FILE, getuid (), &llx);
413 # ifdef HAVE_STRUCT_LASTLOG
414 pwent = getpwuid (getuid ());
417 rxvt_warn ("no entry in password file, not updating lastlog.\n");
421 memset (&ll, 0, sizeof (ll));
422 ll.ll_time = time (NULL);
423 strncpy (ll.ll_line, pty, sizeof (ll.ll_line));
424 strncpy (ll.ll_host, host, sizeof (ll.ll_host));
425 # ifdef LASTLOG_IS_DIR
426 sprintf (lastlogfile, "%.*s/%.*s",
427 sizeof (lastlogfile) - sizeof (pwent->pw_name) - 2, fname,
428 sizeof (pwent->pw_name),
429 (!pwent->pw_name || pwent->pw_name[0] == '\0') ? "unknown"
431 if ((fd = open (lastlogfile, O_WRONLY | O_CREAT, 0644)) >= 0)
433 write (fd, &ll, sizeof (ll));
437 if ((fd = open (fname, O_RDWR)) != -1)
439 if (lseek (fd, (off_t) ((long)pwent->pw_uid * sizeof (ll)),
441 write (fd, &ll, sizeof (ll));
444 # endif /* LASTLOG_IS_DIR */
445 # endif /* HAVE_STRUCT_LASTLOG */
447 #endif /* LASTLOG_SUPPORT */
448 /* ------------------------------------------------------------------------- */
450 #endif /* UTMP_SUPPORT */