ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/logging.C
Revision: 1.47
Committed: Sun May 3 21:48:53 2009 UTC (15 years ago) by root
Content type: text/plain
Branch: MAIN
CVS Tags: before_dynamic_fontidx, dynamic_fontidx, rel-9_07
Changes since 1.46: +1 -0 lines
Log Message:
*** empty log message ***

File Contents

# 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 root 1.40 * Copyright (c) 2006 Emanuele Giaquinta <e.giaquinta@glauco.it>
22 pcg 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 root 1.20 #include "../config.h"
39 root 1.36
40 root 1.41 #include "ptytty.h"
41    
42     #if UTMP_SUPPORT
43    
44 root 1.38 #include <cstdio>
45 root 1.47 #include <cstring>
46 root 1.38
47     #include <sys/types.h>
48     #include <sys/stat.h>
49 ayin 1.45 #include <fcntl.h>
50 root 1.38 #include <unistd.h>
51     #include <time.h>
52 root 1.46 #include <errno.h>
53 root 1.38
54 pcg 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.42 /*
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     int fd, gotlock, retry;
90     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     for (retry = 10, gotlock = 0; retry--;)
103     if (fcntl (fd, F_SETLK, &lck) != -1)
104     {
105     gotlock = 1;
106     break;
107     }
108     else if (errno != EAGAIN && errno != EACCES)
109     break;
110     if (!gotlock)
111 ayin 1.44 {
112     /* give it up */
113 ayin 1.42 close (fd);
114     return;
115     }
116     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     update_lastlog (const char *fname, const char *pty, const char *host)
130     {
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     struct stat st;
140     # 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     if (stat (fname, &st) != 0)
164     return;
165     if (S_ISDIR (st.st_mode))
166     {
167     sprintf (lastlogfile, "%.*s/%.*s",
168 ayin 1.43 (int)(sizeof (lastlogfile) - sizeof (pwent->pw_name) - 2), fname,
169     (int)sizeof (pwent->pw_name),
170 ayin 1.42 (!pwent->pw_name || pwent->pw_name[0] == '\0') ? "unknown"
171     : pwent->pw_name);
172     if ((fd = open (lastlogfile, O_WRONLY | O_CREAT, 0644)) >= 0)
173     {
174     write (fd, &ll, sizeof (ll));
175     close (fd);
176     }
177     }
178     else if (S_ISREG (st.st_mode))
179     if ((fd = open (fname, O_RDWR)) != -1)
180     {
181     if (lseek (fd, (off_t) ((long)pwent->pw_uid * sizeof (ll)),
182     SEEK_SET) != -1)
183     write (fd, &ll, sizeof (ll));
184     close (fd);
185     }
186 ayin 1.43 # endif /* HAVE_STRUCT_LASTLOG */
187 ayin 1.42 }
188 ayin 1.43 #endif /* LASTLOG_SUPPORT */
189 ayin 1.42
190     /* ------------------------------------------------------------------------- */
191 pcg 1.1
192     /*
193     * make and write utmp and wtmp entries
194     */
195     void
196 root 1.36 ptytty_unix::login (int cmd_pid, bool login_shell, const char *hostname)
197 pcg 1.1 {
198 root 1.28 const char *pty = name;
199    
200     if (!pty || !*pty)
201     return;
202    
203 root 1.25 this->cmd_pid = cmd_pid;
204     this->login_shell = login_shell;
205    
206 pcg 1.1 #ifdef HAVE_STRUCT_UTMP
207 root 1.12 struct utmp *ut = &this->ut;
208 pcg 1.1 #endif
209     #ifdef HAVE_STRUCT_UTMPX
210 root 1.12 struct utmpx *utx = &this->utx;
211 pcg 1.1 #endif
212 root 1.12 int i;
213 root 1.17 struct passwd *pwent = getpwuid (getuid ());
214 ayin 1.43 const char *name = (pwent && pwent->pw_name) ? pwent->pw_name : "?";
215 pcg 1.1
216 root 1.11 if (!strncmp (pty, "/dev/", 5))
217 pcg 1.6 pty += 5; /* skip /dev/ prefix */
218 pcg 1.1
219 root 1.22 #if defined(HAVE_UTMP_PID) || defined(HAVE_STRUCT_UTMPX)
220 root 1.11 if (!strncmp (pty, "pty", 3) || !strncmp (pty, "tty", 3))
221 root 1.13 strncpy (ut_id, pty + 3, sizeof (ut_id));
222 pcg 1.7 else if (sscanf (pty, "pts/%d", &i) == 1)
223     sprintf (ut_id, "vt%02x", (i & 0xff)); /* sysv naming */
224 ayin 1.44 else
225 pcg 1.6 {
226 root 1.38 ptytty_warn ("can't parse tty name \"%s\", not adding utmp entry.\n", pty);
227 pcg 1.6 return;
228 pcg 1.1 }
229 root 1.13 #endif
230 pcg 1.1
231     #ifdef HAVE_STRUCT_UTMP
232 root 1.11 memset (ut, 0, sizeof (struct utmp));
233 pcg 1.1 # ifdef HAVE_UTMP_PID
234 pcg 1.7 setutent ();
235 root 1.11 strncpy (ut->ut_id, ut_id, sizeof (ut->ut_id));
236 pcg 1.6 ut->ut_type = DEAD_PROCESS;
237 pcg 1.7 getutid (ut); /* position to entry in utmp file */
238 pcg 1.1 # endif
239     #endif
240    
241     #ifdef HAVE_STRUCT_UTMPX
242 root 1.11 memset (utx, 0, sizeof (struct utmpx));
243 pcg 1.7 setutxent ();
244 root 1.11 strncpy (utx->ut_id, ut_id, sizeof (utx->ut_id));
245 pcg 1.6 utx->ut_type = DEAD_PROCESS;
246 pcg 1.7 getutxid (utx); /* position to entry in utmp file */
247 pcg 1.1 #endif
248    
249     #ifdef HAVE_STRUCT_UTMP
250 root 1.11 strncpy (ut->ut_line, pty, sizeof (ut->ut_line));
251 ayin 1.44 # ifdef HAVE_UTMP_HOST
252     strncpy (ut->ut_host, hostname, sizeof (ut->ut_host));
253     # endif
254 pcg 1.7 ut->ut_time = time (NULL);
255 pcg 1.1 # ifdef HAVE_UTMP_PID
256 ayin 1.43 strncpy (ut->ut_user, name, sizeof (ut->ut_user));
257 root 1.11 strncpy (ut->ut_id, ut_id, sizeof (ut->ut_id));
258 pcg 1.6 ut->ut_pid = cmd_pid;
259     ut->ut_type = USER_PROCESS;
260 pcg 1.7 pututline (ut);
261     endutent (); /* close the file */
262 pcg 1.6 utmp_pos = 0;
263 pcg 1.1 # else
264 ayin 1.43 strncpy (ut->ut_name, name, sizeof (ut->ut_name));
265 pcg 1.1 # endif
266     #endif
267    
268     #ifdef HAVE_STRUCT_UTMPX
269 root 1.11 strncpy (utx->ut_line, pty, sizeof (utx->ut_line));
270 ayin 1.43 strncpy (utx->ut_user, name, sizeof (utx->ut_user));
271 root 1.11 strncpy (utx->ut_id, ut_id, sizeof (utx->ut_id));
272 root 1.15 # if HAVE_UTMPX_SESSION
273 pcg 1.7 utx->ut_session = getsid (0);
274 root 1.15 # endif
275 pcg 1.7 utx->ut_tv.tv_sec = time (NULL);
276 pcg 1.6 utx->ut_tv.tv_usec = 0;
277     utx->ut_pid = cmd_pid;
278 pcg 1.1 # ifdef HAVE_UTMPX_HOST
279 root 1.11 strncpy (utx->ut_host, hostname, sizeof (utx->ut_host));
280 pcg 1.1 # if 0
281 pcg 1.6 {
282     char *colon;
283 pcg 1.1
284 root 1.11 if ((colon = strrchr (ut->ut_host, ':')) != NULL)
285 pcg 1.6 *colon = '\0';
286     }
287 pcg 1.1 # endif
288     # endif
289 pcg 1.6 utx->ut_type = USER_PROCESS;
290 pcg 1.7 pututxline (utx);
291     endutxent (); /* close the file */
292 pcg 1.6 utmp_pos = 0;
293 pcg 1.1 #endif
294    
295     #if defined(HAVE_STRUCT_UTMP) && !defined(HAVE_UTMP_PID)
296 pcg 1.6 {
297 ayin 1.42 # if 1
298 root 1.31 int fdstdin = dup (STDIN_FILENO);
299 root 1.33 dup2 (tty, STDIN_FILENO);
300 root 1.31
301 pcg 1.7 i = ttyslot ();
302 root 1.36 if (write_bsd_utmp (i, ut))
303 pcg 1.6 utmp_pos = i;
304 root 1.31
305     dup2 (fdstdin, STDIN_FILENO);
306     close (fdstdin);
307 pcg 1.6 # endif
308     }
309 pcg 1.1 #endif
310    
311     #ifdef WTMP_SUPPORT
312 ayin 1.34 #ifdef LOG_ONLY_ON_LOGIN
313 root 1.25 if (login_shell)
314 ayin 1.34 #endif
315 pcg 1.1 {
316     # ifdef HAVE_STRUCT_UTMP
317     # ifdef HAVE_UPDWTMP
318 root 1.36 updwtmp (WTMP_FILE, ut);
319 pcg 1.1 # else
320 root 1.36 update_wtmp (WTMP_FILE, ut);
321 pcg 1.1 # endif
322     # endif
323 root 1.23 # if defined(HAVE_STRUCT_UTMPX) && defined(HAVE_UPDWTMPX)
324 root 1.36 updwtmpx (WTMPX_FILE, utx);
325 pcg 1.1 # endif
326     }
327     #endif
328 root 1.36 #if defined(LASTLOG_SUPPORT) && defined(LASTLOG_FILE)
329 ayin 1.34 #ifdef LOG_ONLY_ON_LOGIN
330 root 1.25 if (login_shell)
331 ayin 1.34 #endif
332 root 1.36 update_lastlog (LASTLOG_FILE, pty, hostname);
333 pcg 1.1 #endif
334     }
335    
336     /* ------------------------------------------------------------------------- */
337     /*
338     * remove utmp and wtmp entries
339     */
340     void
341 root 1.36 ptytty_unix::logout ()
342 pcg 1.1 {
343 root 1.28 if (!cmd_pid)
344     return;
345    
346 pcg 1.1 #ifdef HAVE_STRUCT_UTMP
347 ayin 1.26 struct utmp *tmput, *ut = &this->ut;
348 pcg 1.1 #endif
349     #ifdef HAVE_STRUCT_UTMPX
350 root 1.12 struct utmpx *tmputx, *utx = &this->utx;
351 pcg 1.1 #endif
352    
353     #ifdef HAVE_STRUCT_UTMP
354     # ifdef HAVE_UTMP_PID
355 root 1.11 memset (ut, 0, sizeof (struct utmp));
356 pcg 1.7 setutent ();
357 root 1.21 strncpy (ut->ut_id, this->ut_id, sizeof (ut->ut_id));
358 pcg 1.6 ut->ut_type = USER_PROCESS;
359 ayin 1.26 if ((tmput = getutid (ut))) /* position to entry in utmp file */
360     ut = tmput;
361 pcg 1.6 ut->ut_type = DEAD_PROCESS;
362     # else
363 root 1.11 memset (ut->ut_name, 0, sizeof (ut->ut_name));
364 pcg 1.1 # ifdef HAVE_UTMP_HOST
365 root 1.11 memset (ut->ut_host, 0, sizeof (ut->ut_host));
366 pcg 1.1 # endif
367     # endif
368 pcg 1.7 ut->ut_time = time (NULL);
369 pcg 1.1 #endif
370    
371     #ifdef HAVE_STRUCT_UTMPX
372 root 1.11 memset (utx, 0, sizeof (struct utmpx));
373 pcg 1.7 setutxent ();
374 root 1.21 strncpy (utx->ut_id, this->ut_id, sizeof (utx->ut_id));
375 pcg 1.6 utx->ut_type = USER_PROCESS;
376 pcg 1.7 if ((tmputx = getutxid (utx))) /* position to entry in utmp file */
377 pcg 1.6 utx = tmputx;
378     utx->ut_type = DEAD_PROCESS;
379 root 1.15 # if HAVE_UTMPX_SESSION
380 pcg 1.7 utx->ut_session = getsid (0);
381 root 1.15 # endif
382 pcg 1.7 utx->ut_tv.tv_sec = time (NULL);
383 pcg 1.6 utx->ut_tv.tv_usec = 0;
384 pcg 1.1 #endif
385    
386 pcg 1.6 /*
387     * Write ending wtmp entry
388     */
389 pcg 1.1 #ifdef WTMP_SUPPORT
390 ayin 1.34 #ifdef LOG_ONLY_ON_LOGIN
391 root 1.25 if (login_shell)
392 ayin 1.34 #endif
393 pcg 1.1 {
394     # ifdef HAVE_STRUCT_UTMP
395     # ifdef HAVE_UPDWTMP
396 root 1.36 updwtmp (WTMP_FILE, ut);
397 pcg 1.1 # else
398 root 1.36 update_wtmp (WTMP_FILE, ut);
399 pcg 1.1 # endif
400     # endif
401 root 1.24 # if defined(HAVE_STRUCT_UTMPX) && defined(HAVE_UPDWTMPX)
402 root 1.36 updwtmpx (WTMPX_FILE, utx);
403 pcg 1.1 # endif
404     }
405     #endif
406    
407 pcg 1.6 /*
408     * Write utmp entry
409     */
410 pcg 1.1 #ifdef HAVE_STRUCT_UTMP
411     # ifdef HAVE_UTMP_PID
412 pcg 1.6 if (ut->ut_pid == cmd_pid)
413 pcg 1.7 pututline (ut);
414     endutent ();
415 pcg 1.1 # else
416 root 1.11 memset (ut, 0, sizeof (struct utmp));
417 root 1.36 write_bsd_utmp (utmp_pos, ut);
418 pcg 1.1 # endif
419     #endif
420     #ifdef HAVE_STRUCT_UTMPX
421 pcg 1.6 if (utx->ut_pid == cmd_pid)
422 pcg 1.7 pututxline (utx);
423     endutxent ();
424 pcg 1.1 #endif
425 root 1.28
426     cmd_pid = 0;
427 pcg 1.1 }
428    
429 root 1.35 #else
430     void
431 root 1.36 ptytty_unix::login (int cmd_pid, bool login_shell, const char *hostname)
432 root 1.35 {
433     }
434 root 1.36 #endif
435