ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/cvsroot/libptytty/src/logging.C
Revision: 1.24
Committed: Fri Dec 14 09:52:51 2007 UTC (18 years, 9 months ago) by ayin
Content type: text/plain
Branch: MAIN
Changes since 1.23: +1 -0 lines
Log Message:
Include errno.h for errno.

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