ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/logging.C
Revision: 1.5
Committed: Sat Jan 31 03:27:45 2004 UTC (20 years, 4 months ago) by pcg
Content type: text/plain
Branch: MAIN
CVS Tags: before_astyle
Changes since 1.4: +0 -1 lines
Log Message:
*** empty log message ***

File Contents

# Content
1 /*--------------------------------*-C-*---------------------------------*
2 * File: logging.c
3 *----------------------------------------------------------------------*
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 *
18 * This program is free software; you can redistribute it and/or modify
19 * it under the terms of the GNU General Public License as published by
20 * the Free Software Foundation; either version 2 of the License, or
21 * (at your option) any later version.
22 *
23 * This program is distributed in the hope that it will be useful,
24 * but WITHOUT ANY WARRANTY; without even the implied warranty of
25 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
26 * GNU General Public License for more details.
27 *
28 * You should have received a copy of the GNU General Public License
29 * along with this program; if not, write to the Free Software
30 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
31 *----------------------------------------------------------------------*/
32 /*----------------------------------------------------------------------*
33 * Public:
34 * extern void cleanutent (void);
35 * extern void makeutent (const char * pty, const char * hostname);
36 *
37 * Private:
38 * rxvt_update_wtmp ();
39 *----------------------------------------------------------------------*/
40
41 #include "../config.h" /* NECESSARY */
42 #include "rxvt.h" /* NECESSARY */
43 #include "logging.h"
44 #ifdef UTMP_SUPPORT
45
46 /*
47 * BSD style utmp entry
48 * ut_line, ut_name, ut_host, ut_time
49 * SYSV style utmp (and utmpx) entry
50 * ut_user, ut_id, ut_line, ut_pid, ut_type, ut_exit, ut_time
51 */
52
53 /* ------------------------------------------------------------------------- */
54
55 /*
56 * make and write utmp and wtmp entries
57 */
58 void
59 rxvt_term::makeutent (const char *pty, const char *hostname)
60 {
61 #ifdef HAVE_STRUCT_UTMP
62 struct utmp *ut = &(this->ut);
63 #endif
64 #ifdef HAVE_STRUCT_UTMPX
65 struct utmpx *utx = &(this->utx);
66 #endif
67 #ifdef HAVE_UTMP_PID
68 int i;
69 #endif
70 char ut_id[5];
71 struct passwd *pwent = getpwuid(getuid());
72
73 if (!STRNCMP(pty, "/dev/", 5))
74 pty += 5; /* skip /dev/ prefix */
75
76 if (!STRNCMP(pty, "pty", 3) || !STRNCMP(pty, "tty", 3)) {
77 STRNCPY(ut_id, (pty + 3), sizeof(ut_id));
78 }
79 #ifdef HAVE_UTMP_PID
80 else if (sscanf(pty, "pts/%d", &i) == 1)
81 sprintf(ut_id, "vt%02x", (i & 0xff)); /* sysv naming */
82 #endif
83 else if (STRNCMP(pty, "pty", 3) && STRNCMP(pty, "tty", 3)) {
84 rxvt_print_error("can't parse tty name \"%s\"", pty);
85 return;
86 }
87
88 #ifdef HAVE_STRUCT_UTMP
89 MEMSET(ut, 0, sizeof(struct utmp));
90 # ifdef HAVE_UTMP_PID
91 setutent();
92 STRNCPY(ut->ut_id, ut_id, sizeof(ut->ut_id));
93 ut->ut_type = DEAD_PROCESS;
94 getutid(ut); /* position to entry in utmp file */
95 STRNCPY(ut_id, ut_id, sizeof(ut_id));
96 # endif
97 #endif
98
99 #ifdef HAVE_STRUCT_UTMPX
100 MEMSET(utx, 0, sizeof(struct utmpx));
101 setutxent();
102 STRNCPY(utx->ut_id, ut_id, sizeof(utx->ut_id));
103 utx->ut_type = DEAD_PROCESS;
104 getutxid(utx); /* position to entry in utmp file */
105 STRNCPY(ut_id, ut_id, sizeof(ut_id));
106 #endif
107
108 #ifdef HAVE_STRUCT_UTMP
109 STRNCPY(ut->ut_line, pty, sizeof(ut->ut_line));
110 ut->ut_time = time(NULL);
111 # ifdef HAVE_UTMP_PID
112 STRNCPY(ut->ut_user, (pwent && pwent->pw_name) ? pwent->pw_name : "?",
113 sizeof(ut->ut_user));
114 STRNCPY(ut->ut_id, ut_id, sizeof(ut->ut_id));
115 ut->ut_time = time(NULL);
116 ut->ut_pid = cmd_pid;
117 # ifdef HAVE_UTMP_HOST
118 STRNCPY(ut->ut_host, hostname, sizeof(ut->ut_host));
119 # endif
120 ut->ut_type = USER_PROCESS;
121 pututline(ut);
122 endutent(); /* close the file */
123 utmp_pos = 0;
124 # else
125 STRNCPY(ut->ut_name, (pwent && pwent->pw_name) ? pwent->pw_name : "?",
126 sizeof(ut->ut_name));
127 # ifdef HAVE_UTMP_HOST
128 STRNCPY(ut->ut_host, hostname, sizeof(ut->ut_host));
129 # endif
130 # endif
131 #endif
132
133 #ifdef HAVE_STRUCT_UTMPX
134 STRNCPY(utx->ut_line, pty, sizeof(utx->ut_line));
135 STRNCPY(utx->ut_user, (pwent && pwent->pw_name) ? pwent->pw_name : "?",
136 sizeof(utx->ut_user));
137 STRNCPY(utx->ut_id, ut_id, sizeof(utx->ut_id));
138 utx->ut_session = getsid(0);
139 utx->ut_tv.tv_sec = time(NULL);
140 utx->ut_tv.tv_usec = 0;
141 utx->ut_pid = cmd_pid;
142 # ifdef HAVE_UTMPX_HOST
143 STRNCPY(utx->ut_host, hostname, sizeof(utx->ut_host));
144 # if 0
145 {
146 char *colon;
147
148 if ((colon = STRRCHR(ut->ut_host, ':')) != NULL)
149 *colon = '\0';
150 }
151 # endif
152 # endif
153 utx->ut_type = USER_PROCESS;
154 pututxline(utx);
155 endutxent(); /* close the file */
156 utmp_pos = 0;
157 #endif
158
159 #if defined(HAVE_STRUCT_UTMP) && !defined(HAVE_UTMP_PID)
160 {
161 int i;
162 # ifdef HAVE_TTYSLOT
163 i = ttyslot();
164 if (rxvt_write_bsd_utmp(i, ut))
165 utmp_pos = i;
166 # else
167 FILE *fd0;
168
169 if ((fd0 = fopen(TTYTAB_FILENAME, "r")) != NULL) {
170 char buf[256], name[256];
171
172 buf[sizeof(buf) - 1] = '\0';
173 for (i = 1; (fgets(buf, sizeof(buf) - 1, fd0) != NULL);) {
174 if (*buf == '#' || sscanf(buf, "%s", name) != 1)
175 continue;
176 if (!STRCMP(ut->ut_line, name)) {
177 if (!rxvt_write_bsd_utmp(i, ut))
178 i = 0;
179 utmp_pos = i;
180 fclose(fd0);
181 break;
182 }
183 i++;
184 }
185 fclose(fd0);
186 }
187 # endif
188 }
189 #endif
190
191 #ifdef WTMP_SUPPORT
192 # ifdef WTMP_ONLY_ON_LOGIN
193 if (Options & Opt_loginShell)
194 # endif
195 {
196 # ifdef HAVE_STRUCT_UTMP
197 # ifdef HAVE_UPDWTMP
198 updwtmp(RXVT_WTMP_FILE, ut);
199 # else
200 rxvt_update_wtmp(RXVT_WTMP_FILE, ut);
201 # endif
202 # endif
203 # ifdef HAVE_STRUCT_UTMPX
204 updwtmpx(RXVT_WTMPX_FILE, utx);
205 # endif
206 }
207 #endif
208 #if defined(LASTLOG_SUPPORT) && defined(RXVT_LASTLOG_FILE)
209 if (Options & Opt_loginShell)
210 rxvt_update_lastlog(RXVT_LASTLOG_FILE, pty, hostname);
211 #endif
212 }
213
214 /* ------------------------------------------------------------------------- */
215 /*
216 * remove utmp and wtmp entries
217 */
218 void
219 rxvt_term::cleanutent ()
220 {
221 #ifdef HAVE_STRUCT_UTMP
222 struct utmp *ut = &(this->ut);
223 #endif
224 #ifdef HAVE_STRUCT_UTMPX
225 struct utmpx *tmputx, *utx = &(this->utx);
226 #endif
227
228 #ifdef HAVE_STRUCT_UTMP
229 # ifdef HAVE_UTMP_PID
230 MEMSET(ut, 0, sizeof(struct utmp));
231 setutent();
232 STRNCPY(ut->ut_id, ut_id, sizeof(ut->ut_id));
233 ut->ut_type = USER_PROCESS;
234 {
235 struct utmp *tmput = getutid(ut);
236
237 if (tmput) /* position to entry in utmp file */
238 ut = tmput;
239 }
240 ut->ut_type = DEAD_PROCESS;
241 # else
242 MEMSET(ut->ut_name, 0, sizeof(ut->ut_name));
243 # ifdef HAVE_UTMP_HOST
244 MEMSET(ut->ut_host, 0, sizeof(ut->ut_host));
245 # endif
246 # endif
247 ut->ut_time = time(NULL);
248 #endif
249
250 #ifdef HAVE_STRUCT_UTMPX
251 MEMSET(utx, 0, sizeof(struct utmpx));
252 setutxent();
253 STRNCPY(utx->ut_id, ut_id, sizeof(utx->ut_id));
254 utx->ut_type = USER_PROCESS;
255 if ((tmputx = getutxid(utx))) /* position to entry in utmp file */
256 utx = tmputx;
257 utx->ut_type = DEAD_PROCESS;
258 utx->ut_session = getsid(0);
259 utx->ut_tv.tv_sec = time(NULL);
260 utx->ut_tv.tv_usec = 0;
261 #endif
262
263 /*
264 * Write ending wtmp entry
265 */
266 #ifdef WTMP_SUPPORT
267 # ifdef WTMP_ONLY_ON_LOGIN
268 if (Options & Opt_loginShell)
269 # endif
270 {
271 # ifdef HAVE_STRUCT_UTMP
272 # ifdef HAVE_UPDWTMP
273 updwtmp(RXVT_WTMP_FILE, ut);
274 # else
275 rxvt_update_wtmp(RXVT_WTMP_FILE, ut);
276 # endif
277 # endif
278 # ifdef HAVE_STRUCT_UTMPX
279 updwtmpx(RXVT_WTMPX_FILE, utx);
280 # endif
281 }
282 #endif
283
284 /*
285 * Write utmp entry
286 */
287 #ifdef HAVE_STRUCT_UTMP
288 # ifdef HAVE_UTMP_PID
289 if (ut->ut_pid == cmd_pid)
290 pututline(ut);
291 endutent();
292 # else
293 MEMSET(ut, 0, sizeof(struct utmp));
294 rxvt_write_bsd_utmp(utmp_pos, ut);
295 # endif
296 #endif
297 #ifdef HAVE_STRUCT_UTMPX
298 if (utx->ut_pid == cmd_pid)
299 pututxline(utx);
300 endutxent();
301 #endif
302 }
303
304 /* ------------------------------------------------------------------------- */
305 /*
306 * Write a BSD style utmp entry
307 */
308 #ifdef HAVE_UTMP_H
309 /* INTPROTO */
310 int
311 rxvt_write_bsd_utmp(int utmp_pos, struct utmp *wu)
312 {
313 int fd;
314
315 if (utmp_pos <= 0 || (fd = open(RXVT_UTMP_FILE, O_WRONLY)) == -1)
316 return 0;
317
318 if (lseek(fd, (off_t) (utmp_pos * sizeof(struct utmp)), SEEK_SET) != -1)
319 write(fd, wu, sizeof(struct utmp));
320 close(fd);
321 return 1;
322 }
323 #endif
324
325 /* ------------------------------------------------------------------------- */
326 /*
327 * Update a BSD style wtmp entry
328 */
329 #if defined(WTMP_SUPPORT) && !defined(HAVE_UPDWTMP)
330 /* INTPROTO */
331 void
332 rxvt_update_wtmp(const char *fname, const struct utmp *putmp)
333 {
334 int fd, gotlock, retry;
335 struct flock lck; /* fcntl locking scheme */
336 struct stat sbuf;
337
338 if ((fd = open(fname, O_WRONLY | O_APPEND, 0)) < 0)
339 return;
340
341 lck.l_whence = SEEK_END; /* start lock at current eof */
342 lck.l_len = 0; /* end at ``largest possible eof'' */
343 lck.l_start = 0;
344 lck.l_type = F_WRLCK; /* we want a write lock */
345
346 /* attempt lock with F_SETLK; F_SETLKW would cause a deadlock! */
347 for (retry = 10, gotlock = 0; retry--;)
348 if (fcntl(fd, F_SETLK, &lck) != -1) {
349 gotlock = 1;
350 break;
351 } else if (errno != EAGAIN && errno != EACCES)
352 break;
353 if (!gotlock) { /* give it up */
354 close(fd);
355 return;
356 }
357 if (fstat(fd, &sbuf) == 0)
358 if (write(fd, putmp, sizeof(struct utmp)) != sizeof(struct utmp))
359 ftruncate(fd, sbuf.st_size); /* remove bad writes */
360
361 lck.l_type = F_UNLCK; /* unlocking the file */
362 fcntl(fd, F_SETLK, &lck);
363 close(fd);
364 }
365 #endif
366
367 /* ------------------------------------------------------------------------- */
368 #ifdef LASTLOG_SUPPORT
369 /* INTPROTO */
370 void
371 rxvt_update_lastlog(const char *fname, const char *pty, const char *host)
372 {
373 # ifdef HAVE_STRUCT_LASTLOGX
374 struct lastlogx llx;
375 # endif
376 # ifdef HAVE_STRUCT_LASTLOG
377 int fd;
378 struct lastlog ll;
379 # ifdef LASTLOG_IS_DIR
380 char lastlogfile[256];
381 # endif
382 struct passwd *pwent;
383 # endif
384
385 # ifdef HAVE_STRUCT_LASTLOGX
386 MEMSET(&llx, 0, sizeof(llx));
387 llx.ll_tv.tv_sec = time(NULL);
388 llx.ll_tv.tv_usec = 0;
389 STRNCPY(llx.ll_line, pty, sizeof(llx.ll_line));
390 STRNCPY(llx.ll_host, host, sizeof(llx.ll_host));
391 updlastlogx(RXVT_LASTLOGX_FILE, getuid(), &llx);
392 # endif
393
394 # ifdef HAVE_STRUCT_LASTLOG
395 pwent = getpwuid(getuid());
396 if (!pwent) {
397 rxvt_print_error("no entry in password file");
398 return;
399 }
400 MEMSET(&ll, 0, sizeof(ll));
401 ll.ll_time = time(NULL);
402 STRNCPY(ll.ll_line, pty, sizeof(ll.ll_line));
403 STRNCPY(ll.ll_host, host, sizeof(ll.ll_host));
404 # ifdef LASTLOG_IS_DIR
405 sprintf(lastlogfile, "%.*s/%.*s",
406 sizeof(lastlogfile) - sizeof(pwent->pw_name) - 2, fname,
407 sizeof(pwent->pw_name),
408 (!pwent->pw_name || pwent->pw_name[0] == '\0') ? "unknown"
409 : pwent->pw_name);
410 if ((fd = open(lastlogfile, O_WRONLY | O_CREAT, 0644)) >= 0) {
411 write(fd, &ll, sizeof(ll));
412 close(fd);
413 }
414 # else
415 if ((fd = open(fname, O_RDWR)) != -1) {
416 if (lseek(fd, (off_t) ((long)pwent->pw_uid * sizeof(ll)),
417 SEEK_SET) != -1)
418 write(fd, &ll, sizeof(ll));
419 close(fd);
420 }
421 # endif /* LASTLOG_IS_DIR */
422 # endif /* HAVE_STRUCT_LASTLOG */
423 }
424 #endif /* LASTLOG_SUPPORT */
425 /* ------------------------------------------------------------------------- */
426
427 #endif /* UTMP_SUPPORT */