ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/logging.C
Revision: 1.28
Committed: Tue Jan 17 10:19:13 2006 UTC (18 years, 4 months ago) by root
Content type: text/plain
Branch: MAIN
Changes since 1.27: +10 -2 lines
Log Message:
*** empty log message ***

File Contents

# User Rev Content
1 pcg 1.1 /*--------------------------------*-C-*---------------------------------*
2 pcg 1.9 * File: logging.C
3 pcg 1.1 *----------------------------------------------------------------------*
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 pcg 1.9 * Copyright (c) 2004 Marc Lehmann <pcg@goof.com>
18 pcg 1.1 *
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.
23     *
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.
28     *
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     *----------------------------------------------------------------------*/
33    
34 root 1.20 #include "../config.h"
35     #include "rxvt.h"
36 root 1.27 #include "ptytty.h"
37 root 1.20
38 root 1.27 #if UTMP_SUPPORT
39 pcg 1.1
40 root 1.16 #if HAVE_STRUCT_UTMP
41 root 1.22 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);
43 root 1.16 #endif
44    
45 root 1.22 static void rxvt_update_lastlog (const char *fname, const char *pty, const char *host);
46 root 1.14
47 pcg 1.1 /*
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
52     */
53    
54     /* ------------------------------------------------------------------------- */
55    
56     /*
57     * make and write utmp and wtmp entries
58     */
59     void
60 root 1.27 rxvt_ptytty::login (int cmd_pid, bool login_shell, const char *hostname)
61 pcg 1.1 {
62 root 1.28 const char *pty = name;
63    
64     if (!pty || !*pty)
65     return;
66    
67 root 1.25 this->cmd_pid = cmd_pid;
68     this->login_shell = login_shell;
69    
70 pcg 1.1 #ifdef HAVE_STRUCT_UTMP
71 root 1.12 struct utmp *ut = &this->ut;
72 pcg 1.1 #endif
73     #ifdef HAVE_STRUCT_UTMPX
74 root 1.12 struct utmpx *utx = &this->utx;
75 pcg 1.1 #endif
76 root 1.12 int i;
77 root 1.17 struct passwd *pwent = getpwuid (getuid ());
78 pcg 1.1
79 root 1.11 if (!strncmp (pty, "/dev/", 5))
80 pcg 1.6 pty += 5; /* skip /dev/ prefix */
81 pcg 1.1
82 root 1.22 #if defined(HAVE_UTMP_PID) || defined(HAVE_STRUCT_UTMPX)
83 root 1.11 if (!strncmp (pty, "pty", 3) || !strncmp (pty, "tty", 3))
84 root 1.13 strncpy (ut_id, pty + 3, sizeof (ut_id));
85 pcg 1.7 else if (sscanf (pty, "pts/%d", &i) == 1)
86     sprintf (ut_id, "vt%02x", (i & 0xff)); /* sysv naming */
87 root 1.11 else if (strncmp (pty, "pty", 3) && strncmp (pty, "tty", 3))
88 pcg 1.6 {
89 pcg 1.8 rxvt_warn ("can't parse tty name \"%s\", not adding utmp entry.\n", pty);
90 pcg 1.6 return;
91 pcg 1.1 }
92 root 1.13 #endif
93 pcg 1.1
94     #ifdef HAVE_STRUCT_UTMP
95 root 1.11 memset (ut, 0, sizeof (struct utmp));
96 pcg 1.1 # ifdef HAVE_UTMP_PID
97 pcg 1.7 setutent ();
98 root 1.11 strncpy (ut->ut_id, ut_id, sizeof (ut->ut_id));
99 pcg 1.6 ut->ut_type = DEAD_PROCESS;
100 pcg 1.7 getutid (ut); /* position to entry in utmp file */
101 root 1.21 strncpy (this->ut_id, ut_id, sizeof (this->ut_id));
102 pcg 1.1 # endif
103     #endif
104    
105     #ifdef HAVE_STRUCT_UTMPX
106 root 1.11 memset (utx, 0, sizeof (struct utmpx));
107 pcg 1.7 setutxent ();
108 root 1.11 strncpy (utx->ut_id, ut_id, sizeof (utx->ut_id));
109 pcg 1.6 utx->ut_type = DEAD_PROCESS;
110 pcg 1.7 getutxid (utx); /* position to entry in utmp file */
111 root 1.21 strncpy (this->ut_id, ut_id, sizeof (this->ut_id));
112 pcg 1.1 #endif
113    
114     #ifdef HAVE_STRUCT_UTMP
115 root 1.11 strncpy (ut->ut_line, pty, sizeof (ut->ut_line));
116 pcg 1.7 ut->ut_time = time (NULL);
117 pcg 1.1 # ifdef HAVE_UTMP_PID
118 root 1.11 strncpy (ut->ut_user, (pwent && pwent->pw_name) ? pwent->pw_name : "?",
119 pcg 1.7 sizeof (ut->ut_user));
120 root 1.11 strncpy (ut->ut_id, ut_id, sizeof (ut->ut_id));
121 pcg 1.7 ut->ut_time = time (NULL);
122 pcg 1.6 ut->ut_pid = cmd_pid;
123 pcg 1.1 # ifdef HAVE_UTMP_HOST
124 root 1.11 strncpy (ut->ut_host, hostname, sizeof (ut->ut_host));
125 pcg 1.1 # endif
126 pcg 1.6 ut->ut_type = USER_PROCESS;
127 pcg 1.7 pututline (ut);
128     endutent (); /* close the file */
129 pcg 1.6 utmp_pos = 0;
130 pcg 1.1 # else
131 root 1.11 strncpy (ut->ut_name, (pwent && pwent->pw_name) ? pwent->pw_name : "?",
132 pcg 1.7 sizeof (ut->ut_name));
133 pcg 1.1 # ifdef HAVE_UTMP_HOST
134 root 1.11 strncpy (ut->ut_host, hostname, sizeof (ut->ut_host));
135 pcg 1.1 # endif
136     # endif
137     #endif
138    
139     #ifdef HAVE_STRUCT_UTMPX
140 root 1.11 strncpy (utx->ut_line, pty, sizeof (utx->ut_line));
141     strncpy (utx->ut_user, (pwent && pwent->pw_name) ? pwent->pw_name : "?",
142 pcg 1.7 sizeof (utx->ut_user));
143 root 1.11 strncpy (utx->ut_id, ut_id, sizeof (utx->ut_id));
144 root 1.15 # if HAVE_UTMPX_SESSION
145 pcg 1.7 utx->ut_session = getsid (0);
146 root 1.15 # endif
147 pcg 1.7 utx->ut_tv.tv_sec = time (NULL);
148 pcg 1.6 utx->ut_tv.tv_usec = 0;
149     utx->ut_pid = cmd_pid;
150 pcg 1.1 # ifdef HAVE_UTMPX_HOST
151 root 1.11 strncpy (utx->ut_host, hostname, sizeof (utx->ut_host));
152 pcg 1.1 # if 0
153 pcg 1.6 {
154     char *colon;
155 pcg 1.1
156 root 1.11 if ((colon = strrchr (ut->ut_host, ':')) != NULL)
157 pcg 1.6 *colon = '\0';
158     }
159 pcg 1.1 # endif
160     # endif
161 pcg 1.6 utx->ut_type = USER_PROCESS;
162 pcg 1.7 pututxline (utx);
163     endutxent (); /* close the file */
164 pcg 1.6 utmp_pos = 0;
165 pcg 1.1 #endif
166    
167     #if defined(HAVE_STRUCT_UTMP) && !defined(HAVE_UTMP_PID)
168 pcg 1.6
169     {
170 pcg 1.1 # ifdef HAVE_TTYSLOT
171 pcg 1.7 i = ttyslot ();
172     if (rxvt_write_bsd_utmp (i, ut))
173 pcg 1.6 utmp_pos = i;
174 pcg 1.1 # else
175 pcg 1.6 FILE *fd0;
176 pcg 1.1
177 pcg 1.7 if ((fd0 = fopen (TTYTAB_FILENAME, "r")) != NULL)
178 pcg 1.6 {
179 root 1.18 char buf[256], name[256];
180 pcg 1.6
181 pcg 1.7 buf[sizeof (buf) - 1] = '\0';
182     for (i = 1; (fgets (buf, sizeof (buf) - 1, fd0) != NULL);)
183 pcg 1.6 {
184 pcg 1.7 if (*buf == '#' || sscanf (buf, "%s", name) != 1)
185 pcg 1.6 continue;
186 root 1.11 if (!strcmp (ut->ut_line, name))
187 pcg 1.6 {
188 pcg 1.7 if (!rxvt_write_bsd_utmp (i, ut))
189 pcg 1.6 i = 0;
190     utmp_pos = i;
191 pcg 1.7 fclose (fd0);
192 pcg 1.6 break;
193     }
194     i++;
195     }
196 pcg 1.7 fclose (fd0);
197 pcg 1.6 }
198     # endif
199     }
200 pcg 1.1 #endif
201    
202     #ifdef WTMP_SUPPORT
203     # ifdef WTMP_ONLY_ON_LOGIN
204 root 1.25 if (login_shell)
205 pcg 1.1 # endif
206     {
207     # ifdef HAVE_STRUCT_UTMP
208     # ifdef HAVE_UPDWTMP
209 pcg 1.7 updwtmp (RXVT_WTMP_FILE, ut);
210 pcg 1.1 # else
211 pcg 1.7 rxvt_update_wtmp (RXVT_WTMP_FILE, ut);
212 pcg 1.1 # endif
213     # endif
214 root 1.23 # if defined(HAVE_STRUCT_UTMPX) && defined(HAVE_UPDWTMPX)
215 pcg 1.7 updwtmpx (RXVT_WTMPX_FILE, utx);
216 pcg 1.1 # endif
217     }
218     #endif
219     #if defined(LASTLOG_SUPPORT) && defined(RXVT_LASTLOG_FILE)
220 root 1.25 if (login_shell)
221 pcg 1.7 rxvt_update_lastlog (RXVT_LASTLOG_FILE, pty, hostname);
222 pcg 1.1 #endif
223     }
224    
225     /* ------------------------------------------------------------------------- */
226     /*
227     * remove utmp and wtmp entries
228     */
229     void
230 root 1.27 rxvt_ptytty::logout ()
231 pcg 1.1 {
232 root 1.28 if (!cmd_pid)
233     return;
234    
235 pcg 1.1 #ifdef HAVE_STRUCT_UTMP
236 ayin 1.26 struct utmp *tmput, *ut = &this->ut;
237 pcg 1.1 #endif
238     #ifdef HAVE_STRUCT_UTMPX
239 root 1.12 struct utmpx *tmputx, *utx = &this->utx;
240 pcg 1.1 #endif
241    
242     #ifdef HAVE_STRUCT_UTMP
243     # ifdef HAVE_UTMP_PID
244 root 1.11 memset (ut, 0, sizeof (struct utmp));
245 pcg 1.7 setutent ();
246 root 1.21 strncpy (ut->ut_id, this->ut_id, sizeof (ut->ut_id));
247 pcg 1.6 ut->ut_type = USER_PROCESS;
248 ayin 1.26 if ((tmput = getutid (ut))) /* position to entry in utmp file */
249     ut = tmput;
250 pcg 1.6 ut->ut_type = DEAD_PROCESS;
251     # else
252 root 1.11 memset (ut->ut_name, 0, sizeof (ut->ut_name));
253 pcg 1.1 # ifdef HAVE_UTMP_HOST
254 root 1.11 memset (ut->ut_host, 0, sizeof (ut->ut_host));
255 pcg 1.1 # endif
256     # endif
257 pcg 1.7 ut->ut_time = time (NULL);
258 pcg 1.1 #endif
259    
260     #ifdef HAVE_STRUCT_UTMPX
261 root 1.11 memset (utx, 0, sizeof (struct utmpx));
262 pcg 1.7 setutxent ();
263 root 1.21 strncpy (utx->ut_id, this->ut_id, sizeof (utx->ut_id));
264 pcg 1.6 utx->ut_type = USER_PROCESS;
265 pcg 1.7 if ((tmputx = getutxid (utx))) /* position to entry in utmp file */
266 pcg 1.6 utx = tmputx;
267     utx->ut_type = DEAD_PROCESS;
268 root 1.15 # if HAVE_UTMPX_SESSION
269 pcg 1.7 utx->ut_session = getsid (0);
270 root 1.15 # endif
271 pcg 1.7 utx->ut_tv.tv_sec = time (NULL);
272 pcg 1.6 utx->ut_tv.tv_usec = 0;
273 pcg 1.1 #endif
274    
275 pcg 1.6 /*
276     * Write ending wtmp entry
277     */
278 pcg 1.1 #ifdef WTMP_SUPPORT
279     # ifdef WTMP_ONLY_ON_LOGIN
280 root 1.25 if (login_shell)
281 pcg 1.1 # endif
282     {
283     # ifdef HAVE_STRUCT_UTMP
284     # ifdef HAVE_UPDWTMP
285 pcg 1.7 updwtmp (RXVT_WTMP_FILE, ut);
286 pcg 1.1 # else
287 pcg 1.7 rxvt_update_wtmp (RXVT_WTMP_FILE, ut);
288 pcg 1.1 # endif
289     # endif
290 root 1.24 # if defined(HAVE_STRUCT_UTMPX) && defined(HAVE_UPDWTMPX)
291 pcg 1.7 updwtmpx (RXVT_WTMPX_FILE, utx);
292 pcg 1.1 # endif
293     }
294     #endif
295    
296 pcg 1.6 /*
297     * Write utmp entry
298     */
299 pcg 1.1 #ifdef HAVE_STRUCT_UTMP
300     # ifdef HAVE_UTMP_PID
301 pcg 1.6 if (ut->ut_pid == cmd_pid)
302 pcg 1.7 pututline (ut);
303     endutent ();
304 pcg 1.1 # else
305 root 1.11 memset (ut, 0, sizeof (struct utmp));
306 pcg 1.7 rxvt_write_bsd_utmp (utmp_pos, ut);
307 pcg 1.1 # endif
308     #endif
309     #ifdef HAVE_STRUCT_UTMPX
310 pcg 1.6 if (utx->ut_pid == cmd_pid)
311 pcg 1.7 pututxline (utx);
312     endutxent ();
313 pcg 1.1 #endif
314 root 1.28
315     cmd_pid = 0;
316 pcg 1.1 }
317    
318     /* ------------------------------------------------------------------------- */
319     /*
320     * Write a BSD style utmp entry
321     */
322 root 1.22 #if defined(HAVE_STRUCT_UTMP) && !defined(HAVE_UTMP_PID)
323     static int
324 pcg 1.7 rxvt_write_bsd_utmp (int utmp_pos, struct utmp *wu)
325 pcg 1.1 {
326 pcg 1.6 int fd;
327 pcg 1.1
328 pcg 1.7 if (utmp_pos <= 0 || (fd = open (RXVT_UTMP_FILE, O_WRONLY)) == -1)
329 pcg 1.6 return 0;
330 pcg 1.1
331 pcg 1.7 if (lseek (fd, (off_t) (utmp_pos * sizeof (struct utmp)), SEEK_SET) != -1)
332     write (fd, wu, sizeof (struct utmp));
333     close (fd);
334 pcg 1.6 return 1;
335 pcg 1.1 }
336     #endif
337    
338     /* ------------------------------------------------------------------------- */
339     /*
340     * Update a BSD style wtmp entry
341     */
342 root 1.16 #if defined(WTMP_SUPPORT) && !defined(HAVE_UPDWTMP) && defined(HAVE_STRUCT_UTMP)
343 root 1.22 static void
344 pcg 1.7 rxvt_update_wtmp (const char *fname, const struct utmp *putmp)
345 pcg 1.1 {
346 pcg 1.6 int fd, gotlock, retry;
347     struct flock lck; /* fcntl locking scheme */
348     struct stat sbuf;
349    
350 pcg 1.7 if ((fd = open (fname, O_WRONLY | O_APPEND, 0)) < 0)
351 pcg 1.6 return;
352    
353     lck.l_whence = SEEK_END; /* start lock at current eof */
354     lck.l_len = 0; /* end at ``largest possible eof'' */
355     lck.l_start = 0;
356     lck.l_type = F_WRLCK; /* we want a write lock */
357    
358     /* attempt lock with F_SETLK; F_SETLKW would cause a deadlock! */
359     for (retry = 10, gotlock = 0; retry--;)
360 pcg 1.7 if (fcntl (fd, F_SETLK, &lck) != -1)
361 pcg 1.6 {
362     gotlock = 1;
363     break;
364     }
365     else if (errno != EAGAIN && errno != EACCES)
366     break;
367     if (!gotlock)
368     { /* give it up */
369 pcg 1.7 close (fd);
370 pcg 1.6 return;
371     }
372 pcg 1.7 if (fstat (fd, &sbuf) == 0)
373     if (write (fd, putmp, sizeof (struct utmp)) != sizeof (struct utmp))
374     ftruncate (fd, sbuf.st_size); /* remove bad writes */
375 pcg 1.6
376     lck.l_type = F_UNLCK; /* unlocking the file */
377 pcg 1.7 fcntl (fd, F_SETLK, &lck);
378     close (fd);
379 pcg 1.1 }
380     #endif
381    
382     /* ------------------------------------------------------------------------- */
383     #ifdef LASTLOG_SUPPORT
384 root 1.22 static void
385 pcg 1.7 rxvt_update_lastlog (const char *fname, const char *pty, const char *host)
386 pcg 1.1 {
387     # ifdef HAVE_STRUCT_LASTLOGX
388 pcg 1.6 struct lastlogx llx;
389 pcg 1.1 # endif
390     # ifdef HAVE_STRUCT_LASTLOG
391 pcg 1.6 int fd;
392     struct lastlog ll;
393 pcg 1.1 # ifdef LASTLOG_IS_DIR
394 pcg 1.6 char lastlogfile[256];
395 pcg 1.1 # endif
396 pcg 1.6 struct passwd *pwent;
397 pcg 1.1 # endif
398    
399     # ifdef HAVE_STRUCT_LASTLOGX
400 root 1.11 memset (&llx, 0, sizeof (llx));
401 pcg 1.7 llx.ll_tv.tv_sec = time (NULL);
402 pcg 1.6 llx.ll_tv.tv_usec = 0;
403 root 1.11 strncpy (llx.ll_line, pty, sizeof (llx.ll_line));
404     strncpy (llx.ll_host, host, sizeof (llx.ll_host));
405 pcg 1.7 updlastlogx (RXVT_LASTLOGX_FILE, getuid (), &llx);
406 pcg 1.1 # endif
407    
408     # ifdef HAVE_STRUCT_LASTLOG
409 pcg 1.7 pwent = getpwuid (getuid ());
410 pcg 1.6 if (!pwent)
411     {
412 pcg 1.8 rxvt_warn ("no entry in password file, not updating lastlog.\n");
413 pcg 1.6 return;
414 pcg 1.1 }
415 pcg 1.8
416 root 1.11 memset (&ll, 0, sizeof (ll));
417 pcg 1.7 ll.ll_time = time (NULL);
418 root 1.11 strncpy (ll.ll_line, pty, sizeof (ll.ll_line));
419     strncpy (ll.ll_host, host, sizeof (ll.ll_host));
420 pcg 1.1 # ifdef LASTLOG_IS_DIR
421 pcg 1.7 sprintf (lastlogfile, "%.*s/%.*s",
422     sizeof (lastlogfile) - sizeof (pwent->pw_name) - 2, fname,
423     sizeof (pwent->pw_name),
424 pcg 1.6 (!pwent->pw_name || pwent->pw_name[0] == '\0') ? "unknown"
425     : pwent->pw_name);
426 pcg 1.7 if ((fd = open (lastlogfile, O_WRONLY | O_CREAT, 0644)) >= 0)
427 pcg 1.6 {
428 pcg 1.7 write (fd, &ll, sizeof (ll));
429     close (fd);
430 pcg 1.1 }
431     # else
432 pcg 1.7 if ((fd = open (fname, O_RDWR)) != -1)
433 pcg 1.6 {
434 pcg 1.7 if (lseek (fd, (off_t) ((long)pwent->pw_uid * sizeof (ll)),
435 pcg 1.6 SEEK_SET) != -1)
436 pcg 1.7 write (fd, &ll, sizeof (ll));
437     close (fd);
438 pcg 1.1 }
439     # endif /* LASTLOG_IS_DIR */
440     # endif /* HAVE_STRUCT_LASTLOG */
441     }
442     #endif /* LASTLOG_SUPPORT */
443     /* ------------------------------------------------------------------------- */
444    
445     #endif /* UTMP_SUPPORT */