libptytty/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 <schmorp@schmorp.de>
 * Copyright (c) 2006      Emanuele Giaquinta <e.giaquinta@glauco.it>
 *
 * 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 "ptytty.h"

#if UTMP_SUPPORT

#include <cstdio>
#include <cstring>

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

/*
 * 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
 */

/* ------------------------------------------------------------------------- */
/*
 * 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 *pty, const char *host)
{
# if defined(HAVE_STRUCT_LASTLOGX) && defined(HAVE_UPDLASTLOGX)
  struct lastlogx llx;
# endif
# ifdef HAVE_STRUCT_LASTLOG
  int             fd;
  struct lastlog  ll;
  char            lastlogfile[256];
  struct passwd  *pwent;
  struct stat     st;
# endif

# if defined(HAVE_STRUCT_LASTLOGX) && defined(HAVE_UPDLASTLOGX)
  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", 0);
      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));
  if (stat (LASTLOG_FILE, &st) != 0)
    return;
  if (S_ISDIR (st.st_mode))
    {
      snprintf (lastlogfile, sizeof (lastlogfile), "%s/%s", LASTLOG_FILE,
               (!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 (S_ISREG (st.st_mode))
    if ((fd = open (LASTLOG_FILE, 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 /* HAVE_STRUCT_LASTLOG */
}
#endif /* LASTLOG_SUPPORT */

#ifdef HAVE_STRUCT_UTMP
static void
fill_utmp (struct utmp *ut, bool login, int pid, const char *id, const char *line, const char *user, const char *host)
{
  memset (ut, 0, sizeof (struct utmp));

# ifdef HAVE_UTMP_PID
  strncpy (ut->ut_id, id, sizeof (ut->ut_id));
  ut->ut_pid = pid;
  ut->ut_type = login ? USER_PROCESS : DEAD_PROCESS;
# endif
  ut->ut_time = time (NULL);

  if (login)
    {
      strncpy (ut->ut_line, line, sizeof (ut->ut_line));
# ifdef HAVE_UTMP_PID
      strncpy (ut->ut_user, user, sizeof (ut->ut_user));
# else
      strncpy (ut->ut_name, user, sizeof (ut->ut_name));
# endif
# ifdef HAVE_UTMP_HOST
      strncpy (ut->ut_host, host, sizeof (ut->ut_host));
# endif
    }
}
#endif

#ifdef HAVE_STRUCT_UTMPX
static void
fill_utmpx (struct utmpx *utx, bool login, int pid, const char *id, const char *line, const char *user, const char *host)
{
  memset (utx, 0, sizeof (struct utmpx));

  strncpy (utx->ut_id, id, sizeof (utx->ut_id));
  utx->ut_pid = pid;
  utx->ut_type = login ? USER_PROCESS : DEAD_PROCESS;
  utx->ut_tv.tv_sec = time (NULL);
  utx->ut_tv.tv_usec = 0;
# if HAVE_UTMPX_SESSION
  utx->ut_session = getsid (0);
# endif

  if (login)
    {
      strncpy (utx->ut_line, line, sizeof (utx->ut_line));
      strncpy (utx->ut_user, user, sizeof (utx->ut_user));
# ifdef HAVE_UTMPX_HOST
      strncpy (utx->ut_host, host, sizeof (utx->ut_host));
# endif
    }
}
#endif

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

/*
 * 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 ());
  const char *name = (pwent && pwent->pw_name) ? pwent->pw_name : "?";

  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
    {
      ptytty_warn ("can't parse tty name \"%s\", not adding utmp entry.\n", pty);
      return;
    }
#endif

#ifdef HAVE_STRUCT_UTMP
  fill_utmp (ut, true, cmd_pid, ut_id, pty, name, hostname);
#endif

#ifdef HAVE_STRUCT_UTMPX
  fill_utmpx (utx, true, cmd_pid, ut_id, pty, name, hostname);
#endif

#ifdef HAVE_STRUCT_UTMP
# ifdef HAVE_UTMP_PID
  setutent ();
  pututline (ut);
  endutent ();                  /* close the file */
# endif
#endif

#ifdef HAVE_STRUCT_UTMPX
  setutxent ();
  pututxline (utx);
  endutxent ();         /* close the file */
#endif

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

    utmp_pos = ttyslot ();
    if (!write_bsd_utmp (utmp_pos, ut))
      utmp_pos = 0;

    dup2 (fdstdin, STDIN_FILENO);
    close (fdstdin);
# 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
#ifdef LASTLOG_SUPPORT
#ifdef LOG_ONLY_ON_LOGIN
  if (login_shell)
#endif
    update_lastlog (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
  fill_utmp (ut, false, cmd_pid, ut_id, 0, 0, 0);
#endif

#ifdef HAVE_STRUCT_UTMPX
  fill_utmpx (utx, false, cmd_pid, ut_id, 0, 0, 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
  setutent ();
  tmput = getutid (ut);         /* position to entry in utmp file */
  if (tmput && tmput->ut_pid == cmd_pid)
    pututline (ut);
  endutent ();
# else
  write_bsd_utmp (utmp_pos, ut);
# endif
#endif
#ifdef HAVE_STRUCT_UTMPX
  setutxent ();
  tmputx = getutxid (utx);              /* position to entry in utmp file */
  if (tmputx && tmputx->ut_pid == cmd_pid)
    pututxline (utx);
  endutxent ();
#endif

  cmd_pid = 0;
}

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

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