ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/cvsroot/libptytty/src/logging.C
Revision: 1.46
Committed: Sat Jul 9 11:26:22 2011 UTC (15 years, 2 months ago) by sf-exg
Content type: text/plain
Branch: MAIN
Changes since 1.45: +3 -12 lines
Log Message:
Merge ifdef blocks.

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 sf-exg 1.30 * Copyright (c) 2004-2006 Marc Lehmann <schmorp@schmorp.de>
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 sf-exg 1.26 #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 root 1.25 #include <cstring>
46 root 1.7
47     #include <sys/types.h>
48     #include <sys/stat.h>
49 ayin 1.23 #include <fcntl.h>
50 root 1.7 #include <unistd.h>
51     #include <time.h>
52 ayin 1.24 #include <errno.h>
53 root 1.7
54 root 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.12 /*
63     * Write a BSD style utmp entry
64     */
65     #if defined(HAVE_STRUCT_UTMP) && !defined(HAVE_UTMP_PID)
66     static int
67 sf-exg 1.43 write_bsd_utmp (int utmp_pos, struct utmp *ut)
68 ayin 1.12 {
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 sf-exg 1.43 write (fd, ut, sizeof (struct utmp));
76 ayin 1.12 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 sf-exg 1.43 update_wtmp (const char *fname, const struct utmp *ut)
88 ayin 1.12 {
89 sf-exg 1.29 int fd, gotlock, retry;
90 ayin 1.12 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 sf-exg 1.29 for (retry = 10, gotlock = 0; retry--;)
103 ayin 1.12 if (fcntl (fd, F_SETLK, &lck) != -1)
104     {
105 sf-exg 1.29 gotlock = 1;
106 ayin 1.12 break;
107     }
108     else if (errno != EAGAIN && errno != EACCES)
109 sf-exg 1.29 break;
110     if (!gotlock)
111     {
112     /* give it up */
113     close (fd);
114     return;
115     }
116 ayin 1.12 if (fstat (fd, &sbuf) == 0)
117 sf-exg 1.43 if (write (fd, ut, sizeof (struct utmp)) != sizeof (struct utmp))
118 ayin 1.12 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 sf-exg 1.31 update_lastlog (const char *pty, const char *host)
130 ayin 1.12 {
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 ayin 1.13 struct stat st;
140 ayin 1.12 # 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 sf-exg 1.44 PTYTTY_WARN ("no entry in password file, not updating lastlog.\n", 0);
156 ayin 1.12 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 sf-exg 1.31 if (stat (LASTLOG_FILE, &st) != 0)
164 ayin 1.13 return;
165     if (S_ISDIR (st.st_mode))
166     {
167 sf-exg 1.31 snprintf (lastlogfile, sizeof (lastlogfile), "%s/%s", LASTLOG_FILE,
168 ayin 1.14 (!pwent->pw_name || pwent->pw_name[0] == '\0') ? "unknown"
169     : pwent->pw_name);
170     if ((fd = open (lastlogfile, O_WRONLY | O_CREAT, 0644)) >= 0)
171     {
172     write (fd, &ll, sizeof (ll));
173     close (fd);
174     }
175 ayin 1.13 }
176     else if (S_ISREG (st.st_mode))
177 sf-exg 1.31 if ((fd = open (LASTLOG_FILE, O_RDWR)) != -1)
178 ayin 1.14 {
179     if (lseek (fd, (off_t) ((long)pwent->pw_uid * sizeof (ll)),
180     SEEK_SET) != -1)
181     write (fd, &ll, sizeof (ll));
182     close (fd);
183     }
184 ayin 1.17 # endif /* HAVE_STRUCT_LASTLOG */
185 ayin 1.12 }
186 ayin 1.17 #endif /* LASTLOG_SUPPORT */
187 ayin 1.12
188 sf-exg 1.45 #if defined(HAVE_UTMP_PID) || defined(HAVE_STRUCT_UTMPX)
189     static void
190     fill_id (char *id, const char *line, size_t id_size)
191     {
192     size_t len = strlen (line);
193    
194     if (len > id_size)
195     line += len - id_size;
196     strncpy (id, line, id_size);
197     }
198     #endif
199    
200 sf-exg 1.32 #ifdef HAVE_STRUCT_UTMP
201     static void
202 sf-exg 1.45 fill_utmp (struct utmp *ut, bool login, int pid, const char *line, const char *user, const char *host)
203 sf-exg 1.32 {
204     memset (ut, 0, sizeof (struct utmp));
205    
206 sf-exg 1.40 strncpy (ut->ut_line, line, sizeof (ut->ut_line));
207 sf-exg 1.32 # ifdef HAVE_UTMP_PID
208 sf-exg 1.45 fill_id (ut->ut_id, line, sizeof (ut->ut_id));
209 sf-exg 1.32 ut->ut_pid = pid;
210 sf-exg 1.35 ut->ut_type = login ? USER_PROCESS : DEAD_PROCESS;
211 sf-exg 1.32 # endif
212     ut->ut_time = time (NULL);
213    
214     if (login)
215     {
216     # ifdef HAVE_UTMP_PID
217     strncpy (ut->ut_user, user, sizeof (ut->ut_user));
218     # else
219     strncpy (ut->ut_name, user, sizeof (ut->ut_name));
220     # endif
221     # ifdef HAVE_UTMP_HOST
222     strncpy (ut->ut_host, host, sizeof (ut->ut_host));
223     # endif
224     }
225     }
226     #endif
227    
228     #ifdef HAVE_STRUCT_UTMPX
229     static void
230 sf-exg 1.45 fill_utmpx (struct utmpx *utx, bool login, int pid, const char *line, const char *user, const char *host)
231 sf-exg 1.32 {
232     memset (utx, 0, sizeof (struct utmpx));
233    
234 sf-exg 1.40 // posix says that ut_line is not meaningful for DEAD_PROCESS
235 sf-exg 1.41 // records, but most implementations of last use ut_line to
236 sf-exg 1.40 // associate records in wtmp file
237     strncpy (utx->ut_line, line, sizeof (utx->ut_line));
238 sf-exg 1.45 fill_id (utx->ut_id, line, sizeof (utx->ut_id));
239 sf-exg 1.32 utx->ut_pid = pid;
240 sf-exg 1.35 utx->ut_type = login ? USER_PROCESS : DEAD_PROCESS;
241 sf-exg 1.32 utx->ut_tv.tv_sec = time (NULL);
242     utx->ut_tv.tv_usec = 0;
243     # if HAVE_UTMPX_SESSION
244     utx->ut_session = getsid (0);
245     # endif
246    
247     if (login)
248     {
249     strncpy (utx->ut_user, user, sizeof (utx->ut_user));
250     # ifdef HAVE_UTMPX_HOST
251     strncpy (utx->ut_host, host, sizeof (utx->ut_host));
252     # endif
253     }
254     }
255     #endif
256    
257 ayin 1.12 /* ------------------------------------------------------------------------- */
258 root 1.1
259     /*
260     * make and write utmp and wtmp entries
261     */
262     void
263 root 1.3 ptytty_unix::login (int cmd_pid, bool login_shell, const char *hostname)
264 root 1.1 {
265 root 1.2 const char *pty = name;
266    
267     if (!pty || !*pty)
268     return;
269    
270     this->cmd_pid = cmd_pid;
271     this->login_shell = login_shell;
272    
273 root 1.1 struct passwd *pwent = getpwuid (getuid ());
274 sf-exg 1.39 const char *user = (pwent && pwent->pw_name) ? pwent->pw_name : "?";
275 root 1.1
276     if (!strncmp (pty, "/dev/", 5))
277     pty += 5; /* skip /dev/ prefix */
278    
279     #ifdef HAVE_STRUCT_UTMP
280 sf-exg 1.46 struct utmp *ut = &this->ut;
281 sf-exg 1.45 fill_utmp (ut, true, cmd_pid, pty, user, hostname);
282 root 1.1 #endif
283    
284     #ifdef HAVE_STRUCT_UTMPX
285 sf-exg 1.46 struct utmpx *utx = &this->utx;
286 sf-exg 1.45 fill_utmpx (utx, true, cmd_pid, pty, user, hostname);
287 root 1.1 #endif
288    
289     #ifdef HAVE_STRUCT_UTMP
290     # ifdef HAVE_UTMP_PID
291 sf-exg 1.37 setutent ();
292 root 1.1 pututline (ut);
293 sf-exg 1.42 endutent ();
294 sf-exg 1.38 # else
295     int fd_stdin = dup (STDIN_FILENO);
296     dup2 (tty, STDIN_FILENO);
297    
298     utmp_pos = ttyslot ();
299     if (!write_bsd_utmp (utmp_pos, ut))
300     utmp_pos = 0;
301    
302     dup2 (fd_stdin, STDIN_FILENO);
303     close (fd_stdin);
304 root 1.1 # endif
305     #endif
306    
307     #ifdef HAVE_STRUCT_UTMPX
308 sf-exg 1.37 setutxent ();
309 root 1.1 pututxline (utx);
310 sf-exg 1.42 endutxent ();
311 root 1.1 #endif
312    
313     #ifdef WTMP_SUPPORT
314 root 1.2 #ifdef LOG_ONLY_ON_LOGIN
315     if (login_shell)
316     #endif
317 root 1.1 {
318     # ifdef HAVE_STRUCT_UTMP
319     # ifdef HAVE_UPDWTMP
320 root 1.3 updwtmp (WTMP_FILE, ut);
321 root 1.1 # else
322 root 1.3 update_wtmp (WTMP_FILE, ut);
323 root 1.1 # endif
324     # endif
325 root 1.2 # if defined(HAVE_STRUCT_UTMPX) && defined(HAVE_UPDWTMPX)
326 root 1.3 updwtmpx (WTMPX_FILE, utx);
327 root 1.1 # endif
328     }
329     #endif
330 sf-exg 1.31 #ifdef LASTLOG_SUPPORT
331 root 1.2 #ifdef LOG_ONLY_ON_LOGIN
332     if (login_shell)
333     #endif
334 sf-exg 1.31 update_lastlog (pty, hostname);
335 root 1.1 #endif
336     }
337    
338     /* ------------------------------------------------------------------------- */
339     /*
340     * remove utmp and wtmp entries
341     */
342     void
343 root 1.3 ptytty_unix::logout ()
344 root 1.1 {
345 root 1.2 if (!cmd_pid)
346     return;
347    
348 sf-exg 1.40 const char *pty = name;
349    
350     if (!strncmp (pty, "/dev/", 5))
351     pty += 5;
352    
353 root 1.1 #ifdef HAVE_STRUCT_UTMP
354 root 1.2 struct utmp *tmput, *ut = &this->ut;
355 sf-exg 1.45 fill_utmp (ut, false, cmd_pid, pty, 0, 0);
356 root 1.1 #endif
357    
358     #ifdef HAVE_STRUCT_UTMPX
359 sf-exg 1.46 struct utmpx *tmputx, *utx = &this->utx;
360 sf-exg 1.45 fill_utmpx (utx, false, cmd_pid, pty, 0, 0);
361 root 1.1 #endif
362    
363     /*
364     * Write ending wtmp entry
365     */
366     #ifdef WTMP_SUPPORT
367 root 1.2 #ifdef LOG_ONLY_ON_LOGIN
368     if (login_shell)
369     #endif
370 root 1.1 {
371     # ifdef HAVE_STRUCT_UTMP
372     # ifdef HAVE_UPDWTMP
373 root 1.3 updwtmp (WTMP_FILE, ut);
374 root 1.1 # else
375 root 1.3 update_wtmp (WTMP_FILE, ut);
376 root 1.1 # endif
377     # endif
378 root 1.2 # if defined(HAVE_STRUCT_UTMPX) && defined(HAVE_UPDWTMPX)
379 root 1.3 updwtmpx (WTMPX_FILE, utx);
380 root 1.1 # endif
381     }
382     #endif
383    
384     /*
385     * Write utmp entry
386     */
387     #ifdef HAVE_STRUCT_UTMP
388     # ifdef HAVE_UTMP_PID
389 sf-exg 1.37 setutent ();
390 sf-exg 1.42 tmput = getutid (ut);
391 sf-exg 1.32 if (tmput && tmput->ut_pid == cmd_pid)
392 root 1.1 pututline (ut);
393     endutent ();
394     # else
395 root 1.3 write_bsd_utmp (utmp_pos, ut);
396 root 1.1 # endif
397     #endif
398     #ifdef HAVE_STRUCT_UTMPX
399 sf-exg 1.37 setutxent ();
400 sf-exg 1.42 tmputx = getutxid (utx);
401 sf-exg 1.32 if (tmputx && tmputx->ut_pid == cmd_pid)
402 root 1.1 pututxline (utx);
403     endutxent ();
404     #endif
405 root 1.2
406     cmd_pid = 0;
407 root 1.1 }
408    
409 root 1.5 #else
410     void
411     ptytty_unix::login (int cmd_pid, bool login_shell, const char *hostname)
412     {
413     }
414     #endif
415