ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/libptytty/src/logging.C
Revision: 1.18
Committed: Mon Nov 19 11:21:43 2007 UTC (18 years, 9 months ago) by ayin
Content type: text/plain
Branch: MAIN
Changes since 1.17: +2 -2 lines
Log Message:
'precision' type is int.

File Contents

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