rxvt-unicode/src/logging.C

/*--------------------------------*-C-*---------------------------------*
 * 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
 *
 * 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.
 *----------------------------------------------------------------------*/
/*----------------------------------------------------------------------*
 * Public:
 *      extern void cleanutent (void);
 *      extern void makeutent (const char * pty, const char * hostname);
 *
 * Private:
 *      rxvt_update_wtmp ();
 *----------------------------------------------------------------------*/

#include "../config.h"          /* NECESSARY */
#include "rxvt.h"               /* NECESSARY */
#include "logging.h"
#ifdef UTMP_SUPPORT

/*
 * 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
rxvt_term::makeutent (const char *pty, const char *hostname)
{
#ifdef HAVE_STRUCT_UTMP
    struct utmp    *ut = &(this->ut);
#endif
#ifdef HAVE_STRUCT_UTMPX
    struct utmpx   *utx = &(this->utx);
#endif
#ifdef HAVE_UTMP_PID
    int             i;
#endif
    char            ut_id[5];
    struct passwd  *pwent = getpwuid(getuid());

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

    if (!STRNCMP(pty, "pty", 3) || !STRNCMP(pty, "tty", 3)) {
        STRNCPY(ut_id, (pty + 3), sizeof(ut_id));
    }
#ifdef HAVE_UTMP_PID
    else if (sscanf(pty, "pts/%d", &i) == 1)
        sprintf(ut_id, "vt%02x", (i & 0xff));   /* sysv naming */
#endif
    else if (STRNCMP(pty, "pty", 3) && STRNCMP(pty, "tty", 3)) {
        rxvt_print_error("can't parse tty name \"%s\"", pty);
        return;
    }

#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(ut_id, ut_id, sizeof(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(ut_id, ut_id, sizeof(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));
    utx->ut_session = getsid(0);
    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)
    {
        int             i;
# ifdef HAVE_TTYSLOT
        i = ttyslot();
        if (rxvt_write_bsd_utmp(i, ut))
            utmp_pos = i;
# 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 (!rxvt_write_bsd_utmp(i, ut))
                        i = 0;
                    utmp_pos = i;
                    fclose(fd0);
                    break;
                }
                i++;
            }
            fclose(fd0);
        }
# endif
    }
#endif

#ifdef WTMP_SUPPORT
# ifdef WTMP_ONLY_ON_LOGIN
    if (Options & Opt_loginShell)
# endif
    {
# ifdef HAVE_STRUCT_UTMP
#  ifdef HAVE_UPDWTMP
        updwtmp(RXVT_WTMP_FILE, ut);
#  else
        rxvt_update_wtmp(RXVT_WTMP_FILE, ut);
#  endif
# endif
# ifdef HAVE_STRUCT_UTMPX
        updwtmpx(RXVT_WTMPX_FILE, utx);
# endif
    }
#endif
#if defined(LASTLOG_SUPPORT) && defined(RXVT_LASTLOG_FILE)
    if (Options & Opt_loginShell)
        rxvt_update_lastlog(RXVT_LASTLOG_FILE, pty, hostname);
#endif
}

/* ------------------------------------------------------------------------- */
/*
 * remove utmp and wtmp entries
 */
void
rxvt_term::cleanutent ()
{
#ifdef HAVE_STRUCT_UTMP
    struct utmp    *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, ut_id, sizeof(ut->ut_id));
    ut->ut_type = USER_PROCESS;
    {
        struct utmp    *tmput = getutid(ut);

        if (tmput)              /* 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, 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;
    utx->ut_session = getsid(0);
    utx->ut_tv.tv_sec = time(NULL);
    utx->ut_tv.tv_usec = 0;
#endif

    /*
     * Write ending wtmp entry
     */
#ifdef WTMP_SUPPORT
# ifdef WTMP_ONLY_ON_LOGIN
    if (Options & Opt_loginShell)
# endif
    {
# ifdef HAVE_STRUCT_UTMP
#  ifdef HAVE_UPDWTMP
        updwtmp(RXVT_WTMP_FILE, ut);
#  else
        rxvt_update_wtmp(RXVT_WTMP_FILE, ut);
#  endif
# endif
# ifdef HAVE_STRUCT_UTMPX
        updwtmpx(RXVT_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));
    rxvt_write_bsd_utmp(utmp_pos, ut);
# endif
#endif
#ifdef HAVE_STRUCT_UTMPX
    if (utx->ut_pid == cmd_pid)
        pututxline(utx);
    endutxent();
#endif
}

/* ------------------------------------------------------------------------- */
/*
 * Write a BSD style utmp entry
 */
#ifdef HAVE_UTMP_H
/* INTPROTO */
int
rxvt_write_bsd_utmp(int utmp_pos, struct utmp *wu)
{
    int             fd;

    if (utmp_pos <= 0 || (fd = open(RXVT_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)
/* INTPROTO */
void
rxvt_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
/* INTPROTO */
void
rxvt_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(RXVT_LASTLOGX_FILE, getuid(), &llx);
# endif

# ifdef HAVE_STRUCT_LASTLOG
    pwent = getpwuid(getuid());
    if (!pwent) {
        rxvt_print_error("no entry in password file");
        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 */
/* ------------------------------------------------------------------------- */

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