rxvt-unicode/src/logging.C

// This file is part of libptytty. Do not make local modifications.
// http://software.schmorp.de/pkg/libptytty

/*----------------------------------------------------------------------*
 * File:        logging.C
 *----------------------------------------------------------------------*
 *
 * All portions of code are copyright by their respective author/s.
 * Copyright (c) 1992      John Bovey <jdb@ukc.ac.uk>
 *                              - original version
 * Copyright (c) 1993      lipka
 * Copyright (c) 1993      Brian Stempien <stempien@cs.wmich.edu>
 * Copyright (c) 1995      Raul Garcia Garcia <rgg@tid.es>
 * Copyright (c) 1995      Piet W. Plomp <piet@idefix.icce.rug.nl>
 * Copyright (c) 1997      Raul Garcia Garcia <rgg@tid.es>
 * Copyright (c) 1998-2001 Geoff Wing <gcw@pobox.com>
 *                              - extensive modifications
 * Copyright (c) 1999      D J Hawkey Jr <hawkeyd@visi.com>
 *                              - lastlog support
 * Copyright (c) 2004-2006 Marc Lehmann <pcg@goof.com>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 *----------------------------------------------------------------------*/

#include "../config.h"

#include <cstdio>

#include <sys/types.h>
#include <sys/stat.h>
#include <sys/fcntl.h>
#include <unistd.h>
#include <time.h>

#include "ptytty.h"

#if UTMP_SUPPORT

#if HAVE_STRUCT_UTMP
static int              write_bsd_utmp              (int utmp_pos, struct utmp *wu);
static void             update_wtmp                 (const char *fname, const struct utmp *putmp);
#endif

static void             update_lastlog              (const char *fname, const char *pty, const char *host);

/*
 * BSD style utmp entry
 *      ut_line, ut_name, ut_host, ut_time
 * SYSV style utmp (and utmpx) entry
 *      ut_user, ut_id, ut_line, ut_pid, ut_type, ut_exit, ut_time
 */

/* ------------------------------------------------------------------------- */

/*
 * make and write utmp and wtmp entries
 */
void
ptytty_unix::login (int cmd_pid, bool login_shell, const char *hostname)
{
  const char *pty = name;

  if (!pty || !*pty)
    return;

  this->cmd_pid     = cmd_pid;
  this->login_shell = login_shell;

#ifdef HAVE_STRUCT_UTMP
  struct utmp *ut = &this->ut;
#endif
#ifdef HAVE_STRUCT_UTMPX
  struct utmpx *utx = &this->utx;
#endif
  int i;
  struct passwd *pwent = getpwuid (getuid ());

  if (!strncmp (pty, "/dev/", 5))
    pty += 5;           /* skip /dev/ prefix */

#if defined(HAVE_UTMP_PID) || defined(HAVE_STRUCT_UTMPX)
  if (!strncmp (pty, "pty", 3) || !strncmp (pty, "tty", 3))
    strncpy (ut_id, pty + 3, sizeof (ut_id));
  else if (sscanf (pty, "pts/%d", &i) == 1)
    sprintf (ut_id, "vt%02x", (i & 0xff));      /* sysv naming */
  else if (strncmp (pty, "pty", 3) && strncmp (pty, "tty", 3))
    {
      ptytty_warn ("can't parse tty name \"%s\", not adding utmp entry.\n", pty);
      return;
    }
#endif

#ifdef HAVE_STRUCT_UTMP
  memset (ut, 0, sizeof (struct utmp));
# ifdef HAVE_UTMP_PID
  setutent ();
  strncpy (ut->ut_id, ut_id, sizeof (ut->ut_id));
  ut->ut_type = DEAD_PROCESS;
  getutid (ut);         /* position to entry in utmp file */
  strncpy (this->ut_id, ut_id, sizeof (this->ut_id));
# endif
#endif

#ifdef HAVE_STRUCT_UTMPX
  memset (utx, 0, sizeof (struct utmpx));
  setutxent ();
  strncpy (utx->ut_id, ut_id, sizeof (utx->ut_id));
  utx->ut_type = DEAD_PROCESS;
  getutxid (utx);               /* position to entry in utmp file */
  strncpy (this->ut_id, ut_id, sizeof (this->ut_id));
#endif

#ifdef HAVE_STRUCT_UTMP
  strncpy (ut->ut_line, pty, sizeof (ut->ut_line));
  ut->ut_time = time (NULL);
# ifdef HAVE_UTMP_PID
  strncpy (ut->ut_user, (pwent && pwent->pw_name) ? pwent->pw_name : "?",
          sizeof (ut->ut_user));
  strncpy (ut->ut_id, ut_id, sizeof (ut->ut_id));
  ut->ut_time = time (NULL);
  ut->ut_pid = cmd_pid;
#  ifdef HAVE_UTMP_HOST
  strncpy (ut->ut_host, hostname, sizeof (ut->ut_host));
#  endif
  ut->ut_type = USER_PROCESS;
  pututline (ut);
  endutent ();                  /* close the file */
  utmp_pos = 0;
# else
  strncpy (ut->ut_name, (pwent && pwent->pw_name) ? pwent->pw_name : "?",
          sizeof (ut->ut_name));
#  ifdef HAVE_UTMP_HOST
  strncpy (ut->ut_host, hostname, sizeof (ut->ut_host));
#  endif
# endif
#endif

#ifdef HAVE_STRUCT_UTMPX
  strncpy (utx->ut_line, pty, sizeof (utx->ut_line));
  strncpy (utx->ut_user, (pwent && pwent->pw_name) ? pwent->pw_name : "?",
          sizeof (utx->ut_user));
  strncpy (utx->ut_id, ut_id, sizeof (utx->ut_id));
# if HAVE_UTMPX_SESSION
  utx->ut_session = getsid (0);
# endif
  utx->ut_tv.tv_sec = time (NULL);
  utx->ut_tv.tv_usec = 0;
  utx->ut_pid = cmd_pid;
# ifdef HAVE_UTMPX_HOST
  strncpy (utx->ut_host, hostname, sizeof (utx->ut_host));
#  if 0
  {
    char           *colon;

    if ((colon = strrchr (ut->ut_host, ':')) != NULL)
      *colon = '\0';
  }
#  endif
# endif
  utx->ut_type = USER_PROCESS;
  pututxline (utx);
  endutxent ();         /* close the file */
  utmp_pos = 0;
#endif

#if defined(HAVE_STRUCT_UTMP) && !defined(HAVE_UTMP_PID)
  {
# ifdef HAVE_TTYSLOT
    int fdstdin = dup (STDIN_FILENO);
    dup2 (tty, STDIN_FILENO);

    i = ttyslot ();
    if (write_bsd_utmp (i, ut))
      utmp_pos = i;

    dup2 (fdstdin, STDIN_FILENO);
    close (fdstdin);
# else
    FILE *fd0;

    if ((fd0 = fopen (TTYTAB_FILENAME, "r")) != NULL)
      {
        char buf[256], name[256];

        buf[sizeof (buf) - 1] = '\0';
        for (i = 1; (fgets (buf, sizeof (buf) - 1, fd0) != NULL);)
          {
            if (*buf == '#' || sscanf (buf, "%s", name) != 1)
              continue;
            if (!strcmp (ut->ut_line, name))
              {
                if (!write_bsd_utmp (i, ut))
                  i = 0;
                utmp_pos = i;
                fclose (fd0);
                break;
              }
            i++;
          }
        fclose (fd0);
      }
# endif
  }
#endif

#ifdef WTMP_SUPPORT
#ifdef LOG_ONLY_ON_LOGIN
  if (login_shell)
#endif
    {
# ifdef HAVE_STRUCT_UTMP
#  ifdef HAVE_UPDWTMP
      updwtmp (WTMP_FILE, ut);
#  else
      update_wtmp (WTMP_FILE, ut);
#  endif
# endif
# if defined(HAVE_STRUCT_UTMPX) && defined(HAVE_UPDWTMPX)
      updwtmpx (WTMPX_FILE, utx);
# endif
    }
#endif
#if defined(LASTLOG_SUPPORT) && defined(LASTLOG_FILE)
#ifdef LOG_ONLY_ON_LOGIN
  if (login_shell)
#endif
    update_lastlog (LASTLOG_FILE, pty, hostname);
#endif
}

/* ------------------------------------------------------------------------- */
/*
 * remove utmp and wtmp entries
 */
void
ptytty_unix::logout ()
{
  if (!cmd_pid)
    return;

#ifdef HAVE_STRUCT_UTMP
  struct utmp *tmput, *ut = &this->ut;
#endif
#ifdef HAVE_STRUCT_UTMPX
  struct utmpx *tmputx, *utx = &this->utx;
#endif

#ifdef HAVE_STRUCT_UTMP
# ifdef HAVE_UTMP_PID
  memset (ut, 0, sizeof (struct utmp));
  setutent ();
  strncpy (ut->ut_id, this->ut_id, sizeof (ut->ut_id));
  ut->ut_type = USER_PROCESS;
  if ((tmput = getutid (ut)))           /* position to entry in utmp file */
    ut = tmput;
  ut->ut_type = DEAD_PROCESS;
# else
  memset (ut->ut_name, 0, sizeof (ut->ut_name));
#  ifdef HAVE_UTMP_HOST
  memset (ut->ut_host, 0, sizeof (ut->ut_host));
#  endif
# endif
  ut->ut_time = time (NULL);
#endif

#ifdef HAVE_STRUCT_UTMPX
  memset (utx, 0, sizeof (struct utmpx));
  setutxent ();
  strncpy (utx->ut_id, this->ut_id, sizeof (utx->ut_id));
  utx->ut_type = USER_PROCESS;
  if ((tmputx = getutxid (utx)))        /* position to entry in utmp file */
    utx = tmputx;
  utx->ut_type = DEAD_PROCESS;
# if HAVE_UTMPX_SESSION
  utx->ut_session = getsid (0);
# endif
  utx->ut_tv.tv_sec = time (NULL);
  utx->ut_tv.tv_usec = 0;
#endif

  /*
   * Write ending wtmp entry
   */
#ifdef WTMP_SUPPORT
#ifdef LOG_ONLY_ON_LOGIN
  if (login_shell)
#endif
    {
# ifdef HAVE_STRUCT_UTMP
#  ifdef HAVE_UPDWTMP
      updwtmp (WTMP_FILE, ut);
#  else
      update_wtmp (WTMP_FILE, ut);
#  endif
# endif
# if defined(HAVE_STRUCT_UTMPX) && defined(HAVE_UPDWTMPX)
      updwtmpx (WTMPX_FILE, utx);
# endif
    }
#endif

  /*
   * Write utmp entry
   */
#ifdef HAVE_STRUCT_UTMP
# ifdef HAVE_UTMP_PID
  if (ut->ut_pid == cmd_pid)
    pututline (ut);
  endutent ();
# else
  memset (ut, 0, sizeof (struct utmp));
  write_bsd_utmp (utmp_pos, ut);
# endif
#endif
#ifdef HAVE_STRUCT_UTMPX
  if (utx->ut_pid == cmd_pid)
    pututxline (utx);
  endutxent ();
#endif

  cmd_pid = 0;
}

/* ------------------------------------------------------------------------- */
/*
 * Write a BSD style utmp entry
 */
#if defined(HAVE_STRUCT_UTMP) && !defined(HAVE_UTMP_PID)
static int
write_bsd_utmp (int utmp_pos, struct utmp *wu)
{
  int             fd;

  if (utmp_pos <= 0 || (fd = open (UTMP_FILE, O_WRONLY)) == -1)
    return 0;

  if (lseek (fd, (off_t) (utmp_pos * sizeof (struct utmp)), SEEK_SET) != -1)
    write (fd, wu, sizeof (struct utmp));
  close (fd);
  return 1;
}
#endif

/* ------------------------------------------------------------------------- */
/*
 * Update a BSD style wtmp entry
 */
#if defined(WTMP_SUPPORT) && !defined(HAVE_UPDWTMP) && defined(HAVE_STRUCT_UTMP)
static void
update_wtmp (const char *fname, const struct utmp *putmp)
{
  int             fd, gotlock, retry;
  struct flock    lck;  /* fcntl locking scheme */
  struct stat     sbuf;

  if ((fd = open (fname, O_WRONLY | O_APPEND, 0)) < 0)
    return;

  lck.l_whence = SEEK_END;      /* start lock at current eof */
  lck.l_len = 0;                /* end at ``largest possible eof'' */
  lck.l_start = 0;
  lck.l_type = F_WRLCK; /* we want a write lock */

  /* attempt lock with F_SETLK; F_SETLKW would cause a deadlock! */
  for (retry = 10, gotlock = 0; retry--;)
    if (fcntl (fd, F_SETLK, &lck) != -1)
      {
        gotlock = 1;
        break;
      }
    else if (errno != EAGAIN && errno != EACCES)
      break;
  if (!gotlock)
    {           /* give it up */
      close (fd);
      return;
    }
  if (fstat (fd, &sbuf) == 0)
    if (write (fd, putmp, sizeof (struct utmp)) != sizeof (struct utmp))
      ftruncate (fd, sbuf.st_size);     /* remove bad writes */

  lck.l_type = F_UNLCK; /* unlocking the file */
  fcntl (fd, F_SETLK, &lck);
  close (fd);
}
#endif

/* ------------------------------------------------------------------------- */
#ifdef LASTLOG_SUPPORT
static void
update_lastlog (const char *fname, const char *pty, const char *host)
{
# ifdef HAVE_STRUCT_LASTLOGX
  struct lastlogx llx;
# endif
# ifdef HAVE_STRUCT_LASTLOG
  int             fd;
  struct lastlog  ll;
#  ifdef LASTLOG_IS_DIR
  char            lastlogfile[256];
#  endif
  struct passwd  *pwent;
# endif

# ifdef HAVE_STRUCT_LASTLOGX
  memset (&llx, 0, sizeof (llx));
  llx.ll_tv.tv_sec = time (NULL);
  llx.ll_tv.tv_usec = 0;
  strncpy (llx.ll_line, pty, sizeof (llx.ll_line));
  strncpy (llx.ll_host, host, sizeof (llx.ll_host));
  updlastlogx (LASTLOGX_FILE, getuid (), &llx);
# endif

# ifdef HAVE_STRUCT_LASTLOG
  pwent = getpwuid (getuid ());
  if (!pwent)
    {
      ptytty_warn ("no entry in password file, not updating lastlog.\n");
      return;
    }

  memset (&ll, 0, sizeof (ll));
  ll.ll_time = time (NULL);
  strncpy (ll.ll_line, pty, sizeof (ll.ll_line));
  strncpy (ll.ll_host, host, sizeof (ll.ll_host));
#  ifdef LASTLOG_IS_DIR
  sprintf (lastlogfile, "%.*s/%.*s",
          sizeof (lastlogfile) - sizeof (pwent->pw_name) - 2, fname,
          sizeof (pwent->pw_name),
          (!pwent->pw_name || pwent->pw_name[0] == '\0') ? "unknown"
          : pwent->pw_name);
  if ((fd = open (lastlogfile, O_WRONLY | O_CREAT, 0644)) >= 0)
    {
      write (fd, &ll, sizeof (ll));
      close (fd);
    }
#  else
  if ((fd = open (fname, O_RDWR)) != -1)
    {
      if (lseek (fd, (off_t) ((long)pwent->pw_uid * sizeof (ll)),
                SEEK_SET) != -1)
        write (fd, &ll, sizeof (ll));
      close (fd);
    }
#  endif                        /* LASTLOG_IS_DIR */
# endif                         /* HAVE_STRUCT_LASTLOG */
}
#endif                          /* LASTLOG_SUPPORT */

#else
void
ptytty_unix::login (int cmd_pid, bool login_shell, const char *hostname)
{
}
#endif

Revision:	1.38
Committed:	Sun Jan 22 04:01:52 2006 UTC (18 years, 4 months ago) by root
Content type:	text/plain
Branch:	MAIN
Changes since 1.37:	+10 -2 lines
Log Message:	* empty log message *
#	User	Rev	Content
1	root	1.37	// This file is part of libptytty. Do not make local modifications.
2			// http://software.schmorp.de/pkg/libptytty
3
4			/----------------------------------------------------------------------
5	pcg	1.9	* File: logging.C
6	pcg	1.1	----------------------------------------------------------------------
7			*
8			* All portions of code are copyright by their respective author/s.
9			* Copyright (c) 1992 John Bovey <jdb@ukc.ac.uk>
10			* - original version
11			* Copyright (c) 1993 lipka
12			* Copyright (c) 1993 Brian Stempien <stempien@cs.wmich.edu>
13			* Copyright (c) 1995 Raul Garcia Garcia <rgg@tid.es>
14			* Copyright (c) 1995 Piet W. Plomp <piet@idefix.icce.rug.nl>
15			* Copyright (c) 1997 Raul Garcia Garcia <rgg@tid.es>
16			* Copyright (c) 1998-2001 Geoff Wing <gcw@pobox.com>
17			* - extensive modifications
18			* Copyright (c) 1999 D J Hawkey Jr <hawkeyd@visi.com>
19			* - lastlog support
20	root	1.30	* Copyright (c) 2004-2006 Marc Lehmann <pcg@goof.com>
21	pcg	1.1	*
22			* This program is free software; you can redistribute it and/or modify
23			* it under the terms of the GNU General Public License as published by
24			* the Free Software Foundation; either version 2 of the License, or
25			* (at your option) any later version.
26			*
27			* This program is distributed in the hope that it will be useful,
28			* but WITHOUT ANY WARRANTY; without even the implied warranty of
29			* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
30			* GNU General Public License for more details.
31			*
32			* You should have received a copy of the GNU General Public License
33			* along with this program; if not, write to the Free Software
34			* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
35			----------------------------------------------------------------------/
36
37	root	1.20	#include "../config.h"
38	root	1.36
39	root	1.38	#include <cstdio>
40
41			#include <sys/types.h>
42			#include <sys/stat.h>
43			#include <sys/fcntl.h>
44			#include <unistd.h>
45			#include <time.h>
46
47	root	1.27	#include "ptytty.h"
48	root	1.20
49	root	1.27	#if UTMP_SUPPORT
50	pcg	1.1
51	root	1.16	#if HAVE_STRUCT_UTMP
52	root	1.36	static int write_bsd_utmp (int utmp_pos, struct utmp *wu);
53			static void update_wtmp (const char fname, const struct utmp putmp);
54	root	1.16	#endif
55
56	root	1.36	static void update_lastlog (const char fname, const char pty, const char *host);
57	root	1.14
58	pcg	1.1	/*
59			* BSD style utmp entry
60			* ut_line, ut_name, ut_host, ut_time
61			* SYSV style utmp (and utmpx) entry
62			* ut_user, ut_id, ut_line, ut_pid, ut_type, ut_exit, ut_time
63			*/
64
65			/* ------------------------------------------------------------------------- */
66
67			/*
68			* make and write utmp and wtmp entries
69			*/
70			void
71	root	1.36	ptytty_unix::login (int cmd_pid, bool login_shell, const char *hostname)
72	pcg	1.1	{
73	root	1.28	const char *pty = name;
74
75			if (!pty \|\| !*pty)
76			return;
77
78	root	1.25	this->cmd_pid = cmd_pid;
79			this->login_shell = login_shell;
80
81	pcg	1.1	#ifdef HAVE_STRUCT_UTMP
82	root	1.12	struct utmp *ut = &this->ut;
83	pcg	1.1	#endif
84			#ifdef HAVE_STRUCT_UTMPX
85	root	1.12	struct utmpx *utx = &this->utx;
86	pcg	1.1	#endif
87	root	1.12	int i;
88	root	1.17	struct passwd *pwent = getpwuid (getuid ());
89	pcg	1.1
90	root	1.11	if (!strncmp (pty, "/dev/", 5))
91	pcg	1.6	pty += 5; /* skip /dev/ prefix */
92	pcg	1.1
93	root	1.22	#if defined(HAVE_UTMP_PID) \|\| defined(HAVE_STRUCT_UTMPX)
94	root	1.11	if (!strncmp (pty, "pty", 3) \|\| !strncmp (pty, "tty", 3))
95	root	1.13	strncpy (ut_id, pty + 3, sizeof (ut_id));
96	pcg	1.7	else if (sscanf (pty, "pts/%d", &i) == 1)
97			sprintf (ut_id, "vt%02x", (i & 0xff)); /* sysv naming */
98	root	1.11	else if (strncmp (pty, "pty", 3) && strncmp (pty, "tty", 3))
99	pcg	1.6	{
100	root	1.38	ptytty_warn ("can't parse tty name \"%s\", not adding utmp entry.\n", pty);
101	pcg	1.6	return;
102	pcg	1.1	}
103	root	1.13	#endif
104	pcg	1.1
105			#ifdef HAVE_STRUCT_UTMP
106	root	1.11	memset (ut, 0, sizeof (struct utmp));
107	pcg	1.1	# ifdef HAVE_UTMP_PID
108	pcg	1.7	setutent ();
109	root	1.11	strncpy (ut->ut_id, ut_id, sizeof (ut->ut_id));
110	pcg	1.6	ut->ut_type = DEAD_PROCESS;
111	pcg	1.7	getutid (ut); /* position to entry in utmp file */
112	root	1.21	strncpy (this->ut_id, ut_id, sizeof (this->ut_id));
113	pcg	1.1	# endif
114			#endif
115
116			#ifdef HAVE_STRUCT_UTMPX
117	root	1.11	memset (utx, 0, sizeof (struct utmpx));
118	pcg	1.7	setutxent ();
119	root	1.11	strncpy (utx->ut_id, ut_id, sizeof (utx->ut_id));
120	pcg	1.6	utx->ut_type = DEAD_PROCESS;
121	pcg	1.7	getutxid (utx); /* position to entry in utmp file */
122	root	1.21	strncpy (this->ut_id, ut_id, sizeof (this->ut_id));
123	pcg	1.1	#endif
124
125			#ifdef HAVE_STRUCT_UTMP
126	root	1.11	strncpy (ut->ut_line, pty, sizeof (ut->ut_line));
127	pcg	1.7	ut->ut_time = time (NULL);
128	pcg	1.1	# ifdef HAVE_UTMP_PID
129	root	1.11	strncpy (ut->ut_user, (pwent && pwent->pw_name) ? pwent->pw_name : "?",
130	pcg	1.7	sizeof (ut->ut_user));
131	root	1.11	strncpy (ut->ut_id, ut_id, sizeof (ut->ut_id));
132	pcg	1.7	ut->ut_time = time (NULL);
133	pcg	1.6	ut->ut_pid = cmd_pid;
134	pcg	1.1	# ifdef HAVE_UTMP_HOST
135	root	1.11	strncpy (ut->ut_host, hostname, sizeof (ut->ut_host));
136	pcg	1.1	# endif
137	pcg	1.6	ut->ut_type = USER_PROCESS;
138	pcg	1.7	pututline (ut);
139			endutent (); /* close the file */
140	pcg	1.6	utmp_pos = 0;
141	pcg	1.1	# else
142	root	1.11	strncpy (ut->ut_name, (pwent && pwent->pw_name) ? pwent->pw_name : "?",
143	pcg	1.7	sizeof (ut->ut_name));
144	pcg	1.1	# ifdef HAVE_UTMP_HOST
145	root	1.11	strncpy (ut->ut_host, hostname, sizeof (ut->ut_host));
146	pcg	1.1	# endif
147			# endif
148			#endif
149
150			#ifdef HAVE_STRUCT_UTMPX
151	root	1.11	strncpy (utx->ut_line, pty, sizeof (utx->ut_line));
152			strncpy (utx->ut_user, (pwent && pwent->pw_name) ? pwent->pw_name : "?",
153	pcg	1.7	sizeof (utx->ut_user));
154	root	1.11	strncpy (utx->ut_id, ut_id, sizeof (utx->ut_id));
155	root	1.15	# if HAVE_UTMPX_SESSION
156	pcg	1.7	utx->ut_session = getsid (0);
157	root	1.15	# endif
158	pcg	1.7	utx->ut_tv.tv_sec = time (NULL);
159	pcg	1.6	utx->ut_tv.tv_usec = 0;
160			utx->ut_pid = cmd_pid;
161	pcg	1.1	# ifdef HAVE_UTMPX_HOST
162	root	1.11	strncpy (utx->ut_host, hostname, sizeof (utx->ut_host));
163	pcg	1.1	# if 0
164	pcg	1.6	{
165			char *colon;
166	pcg	1.1
167	root	1.11	if ((colon = strrchr (ut->ut_host, ':')) != NULL)
168	pcg	1.6	*colon = '\0';
169			}
170	pcg	1.1	# endif
171			# endif
172	pcg	1.6	utx->ut_type = USER_PROCESS;
173	pcg	1.7	pututxline (utx);
174			endutxent (); /* close the file */
175	pcg	1.6	utmp_pos = 0;
176	pcg	1.1	#endif
177
178			#if defined(HAVE_STRUCT_UTMP) && !defined(HAVE_UTMP_PID)
179	pcg	1.6	{
180	pcg	1.1	# ifdef HAVE_TTYSLOT
181	root	1.31	int fdstdin = dup (STDIN_FILENO);
182	root	1.33	dup2 (tty, STDIN_FILENO);
183	root	1.31
184	pcg	1.7	i = ttyslot ();
185	root	1.36	if (write_bsd_utmp (i, ut))
186	pcg	1.6	utmp_pos = i;
187	root	1.31
188			dup2 (fdstdin, STDIN_FILENO);
189			close (fdstdin);
190	pcg	1.1	# else
191	root	1.31	FILE *fd0;
192	pcg	1.1
193	pcg	1.7	if ((fd0 = fopen (TTYTAB_FILENAME, "r")) != NULL)
194	pcg	1.6	{
195	root	1.18	char buf[256], name[256];
196	pcg	1.6
197	pcg	1.7	buf[sizeof (buf) - 1] = '\0';
198			for (i = 1; (fgets (buf, sizeof (buf) - 1, fd0) != NULL);)
199	pcg	1.6	{
200	pcg	1.7	if (*buf == '#' \|\| sscanf (buf, "%s", name) != 1)
201	pcg	1.6	continue;
202	root	1.11	if (!strcmp (ut->ut_line, name))
203	pcg	1.6	{
204	root	1.36	if (!write_bsd_utmp (i, ut))
205	pcg	1.6	i = 0;
206			utmp_pos = i;
207	pcg	1.7	fclose (fd0);
208	pcg	1.6	break;
209			}
210			i++;
211			}
212	pcg	1.7	fclose (fd0);
213	pcg	1.6	}
214			# endif
215			}
216	pcg	1.1	#endif
217
218			#ifdef WTMP_SUPPORT
219	ayin	1.34	#ifdef LOG_ONLY_ON_LOGIN
220	root	1.25	if (login_shell)
221	ayin	1.34	#endif
222	pcg	1.1	{
223			# ifdef HAVE_STRUCT_UTMP
224			# ifdef HAVE_UPDWTMP
225	root	1.36	updwtmp (WTMP_FILE, ut);
226	pcg	1.1	# else
227	root	1.36	update_wtmp (WTMP_FILE, ut);
228	pcg	1.1	# endif
229			# endif
230	root	1.23	# if defined(HAVE_STRUCT_UTMPX) && defined(HAVE_UPDWTMPX)
231	root	1.36	updwtmpx (WTMPX_FILE, utx);
232	pcg	1.1	# endif
233			}
234			#endif
235	root	1.36	#if defined(LASTLOG_SUPPORT) && defined(LASTLOG_FILE)
236	ayin	1.34	#ifdef LOG_ONLY_ON_LOGIN
237	root	1.25	if (login_shell)
238	ayin	1.34	#endif
239	root	1.36	update_lastlog (LASTLOG_FILE, pty, hostname);
240	pcg	1.1	#endif
241			}
242
243			/* ------------------------------------------------------------------------- */
244			/*
245			* remove utmp and wtmp entries
246			*/
247			void
248	root	1.36	ptytty_unix::logout ()
249	pcg	1.1	{
250	root	1.28	if (!cmd_pid)
251			return;
252
253	pcg	1.1	#ifdef HAVE_STRUCT_UTMP
254	ayin	1.26	struct utmp tmput, ut = &this->ut;
255	pcg	1.1	#endif
256			#ifdef HAVE_STRUCT_UTMPX
257	root	1.12	struct utmpx tmputx, utx = &this->utx;
258	pcg	1.1	#endif
259
260			#ifdef HAVE_STRUCT_UTMP
261			# ifdef HAVE_UTMP_PID
262	root	1.11	memset (ut, 0, sizeof (struct utmp));
263	pcg	1.7	setutent ();
264	root	1.21	strncpy (ut->ut_id, this->ut_id, sizeof (ut->ut_id));
265	pcg	1.6	ut->ut_type = USER_PROCESS;
266	ayin	1.26	if ((tmput = getutid (ut))) /* position to entry in utmp file */
267			ut = tmput;
268	pcg	1.6	ut->ut_type = DEAD_PROCESS;
269			# else
270	root	1.11	memset (ut->ut_name, 0, sizeof (ut->ut_name));
271	pcg	1.1	# ifdef HAVE_UTMP_HOST
272	root	1.11	memset (ut->ut_host, 0, sizeof (ut->ut_host));
273	pcg	1.1	# endif
274			# endif
275	pcg	1.7	ut->ut_time = time (NULL);
276	pcg	1.1	#endif
277
278			#ifdef HAVE_STRUCT_UTMPX
279	root	1.11	memset (utx, 0, sizeof (struct utmpx));
280	pcg	1.7	setutxent ();
281	root	1.21	strncpy (utx->ut_id, this->ut_id, sizeof (utx->ut_id));
282	pcg	1.6	utx->ut_type = USER_PROCESS;
283	pcg	1.7	if ((tmputx = getutxid (utx))) /* position to entry in utmp file */
284	pcg	1.6	utx = tmputx;
285			utx->ut_type = DEAD_PROCESS;
286	root	1.15	# if HAVE_UTMPX_SESSION
287	pcg	1.7	utx->ut_session = getsid (0);
288	root	1.15	# endif
289	pcg	1.7	utx->ut_tv.tv_sec = time (NULL);
290	pcg	1.6	utx->ut_tv.tv_usec = 0;
291	pcg	1.1	#endif
292
293	pcg	1.6	/*
294			* Write ending wtmp entry
295			*/
296	pcg	1.1	#ifdef WTMP_SUPPORT
297	ayin	1.34	#ifdef LOG_ONLY_ON_LOGIN
298	root	1.25	if (login_shell)
299	ayin	1.34	#endif
300	pcg	1.1	{
301			# ifdef HAVE_STRUCT_UTMP
302			# ifdef HAVE_UPDWTMP
303	root	1.36	updwtmp (WTMP_FILE, ut);
304	pcg	1.1	# else
305	root	1.36	update_wtmp (WTMP_FILE, ut);
306	pcg	1.1	# endif
307			# endif
308	root	1.24	# if defined(HAVE_STRUCT_UTMPX) && defined(HAVE_UPDWTMPX)
309	root	1.36	updwtmpx (WTMPX_FILE, utx);
310	pcg	1.1	# endif
311			}
312			#endif
313
314	pcg	1.6	/*
315			* Write utmp entry
316			*/
317	pcg	1.1	#ifdef HAVE_STRUCT_UTMP
318			# ifdef HAVE_UTMP_PID
319	pcg	1.6	if (ut->ut_pid == cmd_pid)
320	pcg	1.7	pututline (ut);
321			endutent ();
322	pcg	1.1	# else
323	root	1.11	memset (ut, 0, sizeof (struct utmp));
324	root	1.36	write_bsd_utmp (utmp_pos, ut);
325	pcg	1.1	# endif
326			#endif
327			#ifdef HAVE_STRUCT_UTMPX
328	pcg	1.6	if (utx->ut_pid == cmd_pid)
329	pcg	1.7	pututxline (utx);
330			endutxent ();
331	pcg	1.1	#endif
332	root	1.28
333			cmd_pid = 0;
334	pcg	1.1	}
335
336			/* ------------------------------------------------------------------------- */
337			/*
338			* Write a BSD style utmp entry
339			*/
340	root	1.22	#if defined(HAVE_STRUCT_UTMP) && !defined(HAVE_UTMP_PID)
341			static int
342	root	1.36	write_bsd_utmp (int utmp_pos, struct utmp *wu)
343	pcg	1.1	{
344	pcg	1.6	int fd;
345	pcg	1.1
346	root	1.36	if (utmp_pos <= 0 \|\| (fd = open (UTMP_FILE, O_WRONLY)) == -1)
347	pcg	1.6	return 0;
348	pcg	1.1
349	pcg	1.7	if (lseek (fd, (off_t) (utmp_pos * sizeof (struct utmp)), SEEK_SET) != -1)
350			write (fd, wu, sizeof (struct utmp));
351			close (fd);
352	pcg	1.6	return 1;
353	pcg	1.1	}
354			#endif
355
356			/* ------------------------------------------------------------------------- */
357			/*
358			* Update a BSD style wtmp entry
359			*/
360	root	1.16	#if defined(WTMP_SUPPORT) && !defined(HAVE_UPDWTMP) && defined(HAVE_STRUCT_UTMP)
361	root	1.22	static void
362	root	1.36	update_wtmp (const char fname, const struct utmp putmp)
363	pcg	1.1	{
364	pcg	1.6	int fd, gotlock, retry;
365			struct flock lck; /* fcntl locking scheme */
366			struct stat sbuf;
367
368	pcg	1.7	if ((fd = open (fname, O_WRONLY \| O_APPEND, 0)) < 0)
369	pcg	1.6	return;
370
371			lck.l_whence = SEEK_END; /* start lock at current eof */
372			lck.l_len = 0; /* end at ``largest possible eof'' */
373			lck.l_start = 0;
374			lck.l_type = F_WRLCK; /* we want a write lock */
375
376			/* attempt lock with F_SETLK; F_SETLKW would cause a deadlock! */
377			for (retry = 10, gotlock = 0; retry--;)
378	pcg	1.7	if (fcntl (fd, F_SETLK, &lck) != -1)
379	pcg	1.6	{
380			gotlock = 1;
381			break;
382			}
383			else if (errno != EAGAIN && errno != EACCES)
384			break;
385			if (!gotlock)
386			{ /* give it up */
387	pcg	1.7	close (fd);
388	pcg	1.6	return;
389			}
390	pcg	1.7	if (fstat (fd, &sbuf) == 0)
391			if (write (fd, putmp, sizeof (struct utmp)) != sizeof (struct utmp))
392			ftruncate (fd, sbuf.st_size); /* remove bad writes */
393	pcg	1.6
394			lck.l_type = F_UNLCK; /* unlocking the file */
395	pcg	1.7	fcntl (fd, F_SETLK, &lck);
396			close (fd);
397	pcg	1.1	}
398			#endif
399
400			/* ------------------------------------------------------------------------- */
401			#ifdef LASTLOG_SUPPORT
402	root	1.22	static void
403	root	1.36	update_lastlog (const char fname, const char pty, const char *host)
404	pcg	1.1	{
405			# ifdef HAVE_STRUCT_LASTLOGX
406	pcg	1.6	struct lastlogx llx;
407	pcg	1.1	# endif
408			# ifdef HAVE_STRUCT_LASTLOG
409	pcg	1.6	int fd;
410			struct lastlog ll;
411	pcg	1.1	# ifdef LASTLOG_IS_DIR
412	pcg	1.6	char lastlogfile[256];
413	pcg	1.1	# endif
414	pcg	1.6	struct passwd *pwent;
415	pcg	1.1	# endif
416
417			# ifdef HAVE_STRUCT_LASTLOGX
418	root	1.11	memset (&llx, 0, sizeof (llx));
419	pcg	1.7	llx.ll_tv.tv_sec = time (NULL);
420	pcg	1.6	llx.ll_tv.tv_usec = 0;
421	root	1.11	strncpy (llx.ll_line, pty, sizeof (llx.ll_line));
422			strncpy (llx.ll_host, host, sizeof (llx.ll_host));
423	root	1.36	updlastlogx (LASTLOGX_FILE, getuid (), &llx);
424	pcg	1.1	# endif
425
426			# ifdef HAVE_STRUCT_LASTLOG
427	pcg	1.7	pwent = getpwuid (getuid ());
428	pcg	1.6	if (!pwent)
429			{
430	root	1.38	ptytty_warn ("no entry in password file, not updating lastlog.\n");
431	pcg	1.6	return;
432	pcg	1.1	}
433	pcg	1.8
434	root	1.11	memset (&ll, 0, sizeof (ll));
435	pcg	1.7	ll.ll_time = time (NULL);
436	root	1.11	strncpy (ll.ll_line, pty, sizeof (ll.ll_line));
437			strncpy (ll.ll_host, host, sizeof (ll.ll_host));
438	pcg	1.1	# ifdef LASTLOG_IS_DIR
439	pcg	1.7	sprintf (lastlogfile, "%.s/%.s",
440			sizeof (lastlogfile) - sizeof (pwent->pw_name) - 2, fname,
441			sizeof (pwent->pw_name),
442	pcg	1.6	(!pwent->pw_name \|\| pwent->pw_name[0] == '\0') ? "unknown"
443			: pwent->pw_name);
444	pcg	1.7	if ((fd = open (lastlogfile, O_WRONLY \| O_CREAT, 0644)) >= 0)
445	pcg	1.6	{
446	pcg	1.7	write (fd, &ll, sizeof (ll));
447			close (fd);
448	pcg	1.1	}
449			# else
450	pcg	1.7	if ((fd = open (fname, O_RDWR)) != -1)
451	pcg	1.6	{
452	pcg	1.7	if (lseek (fd, (off_t) ((long)pwent->pw_uid * sizeof (ll)),
453	pcg	1.6	SEEK_SET) != -1)
454	pcg	1.7	write (fd, &ll, sizeof (ll));
455			close (fd);
456	pcg	1.1	}
457			# endif /* LASTLOG_IS_DIR */
458			# endif /* HAVE_STRUCT_LASTLOG */
459			}
460			#endif /* LASTLOG_SUPPORT */
461
462	root	1.35	#else
463			void
464	root	1.36	ptytty_unix::login (int cmd_pid, bool login_shell, const char *hostname)
465	root	1.35	{
466			}
467	root	1.36	#endif
468