utmp_update.c revision 1.3 1 1.3 soren /* $NetBSD: utmp_update.c,v 1.3 2002/08/09 10:01:53 soren Exp $ */
2 1.1 christos
3 1.1 christos /*-
4 1.1 christos * Copyright (c) 2002 The NetBSD Foundation, Inc.
5 1.1 christos * All rights reserved.
6 1.1 christos *
7 1.1 christos * This code is derived from software contributed to The NetBSD Foundation
8 1.1 christos * by Christos Zoulas.
9 1.1 christos *
10 1.1 christos * Redistribution and use in source and binary forms, with or without
11 1.1 christos * modification, are permitted provided that the following conditions
12 1.1 christos * are met:
13 1.1 christos * 1. Redistributions of source code must retain the above copyright
14 1.1 christos * notice, this list of conditions and the following disclaimer.
15 1.1 christos * 2. Redistributions in binary form must reproduce the above copyright
16 1.1 christos * notice, this list of conditions and the following disclaimer in the
17 1.1 christos * documentation and/or other materials provided with the distribution.
18 1.1 christos * 3. All advertising materials mentioning features or use of this software
19 1.1 christos * must display the following acknowledgement:
20 1.1 christos * This product includes software developed by the NetBSD
21 1.1 christos * Foundation, Inc. and its contributors.
22 1.1 christos * 4. Neither the name of The NetBSD Foundation nor the names of its
23 1.1 christos * contributors may be used to endorse or promote products derived
24 1.1 christos * from this software without specific prior written permission.
25 1.1 christos *
26 1.1 christos * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27 1.1 christos * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28 1.1 christos * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 1.1 christos * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30 1.1 christos * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 1.1 christos * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 1.1 christos * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 1.1 christos * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 1.1 christos * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 1.1 christos * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 1.1 christos * POSSIBILITY OF SUCH DAMAGE.
37 1.1 christos */
38 1.1 christos
39 1.1 christos #include <sys/stat.h>
40 1.1 christos
41 1.1 christos #include <stdio.h>
42 1.1 christos #include <vis.h>
43 1.1 christos #include <err.h>
44 1.1 christos #include <pwd.h>
45 1.1 christos #include <utmpx.h>
46 1.1 christos #include <stdlib.h>
47 1.2 jmcneill #include <string.h>
48 1.1 christos #include <unistd.h>
49 1.1 christos
50 1.1 christos int main(int, char *[]);
51 1.1 christos
52 1.1 christos int
53 1.1 christos main(int argc, char *argv[])
54 1.1 christos {
55 1.1 christos struct utmpx *utx;
56 1.1 christos size_t len;
57 1.1 christos struct passwd *pwd;
58 1.1 christos struct stat st;
59 1.1 christos
60 1.1 christos if (argc != 1) {
61 1.1 christos (void)fprintf(stderr, "Usage: %s <vis-utmpx-entry>\n",
62 1.1 christos getprogname());
63 1.1 christos exit(1);
64 1.1 christos }
65 1.1 christos
66 1.1 christos len = strlen(argv[1]);
67 1.1 christos
68 1.1 christos if (len > sizeof(*utx) * 4 + 1 || len < sizeof(*utx))
69 1.1 christos errx(1, "Bad argument");
70 1.1 christos
71 1.1 christos if ((utx = malloc(len)) == NULL)
72 1.1 christos err(1, NULL);
73 1.1 christos
74 1.1 christos if (strunvis((char *)utx, argv[1]) != sizeof(*utx))
75 1.1 christos errx(1, "Decoding error");
76 1.1 christos
77 1.1 christos switch (utx->ut_type) {
78 1.1 christos case USER_PROCESS:
79 1.1 christos case DEAD_PROCESS:
80 1.1 christos break;
81 1.1 christos default:
82 1.3 soren errx(1, "Invalid utmpx type %d", (int)utx->ut_type);
83 1.1 christos }
84 1.1 christos
85 1.1 christos if ((pwd = getpwuid(getuid())) == NULL)
86 1.1 christos errx(1, "User %lu does not exist in password database",
87 1.1 christos (long)getuid());
88 1.1 christos
89 1.1 christos if (strcmp(pwd->pw_name, utx->ut_name) != 0)
90 1.1 christos errx(1, "Current user `%s' does not match `%s' in utmpx entry",
91 1.1 christos pwd->pw_name, utx->ut_name);
92 1.1 christos
93 1.1 christos if (stat(utx->ut_line, &st) == -1)
94 1.1 christos err(1, "Cannot stat `%s'", utx->ut_line);
95 1.1 christos
96 1.1 christos if (!S_ISCHR(st.st_mode))
97 1.1 christos errx(1, "%s: Not a character device", utx->ut_line);
98 1.1 christos
99 1.1 christos /*
100 1.1 christos * to check if the tty is writable here is problematic. First we
101 1.1 christos * don't even know if it is a tty, secondly we are setuid so it
102 1.1 christos * is not trivial to use access
103 1.1 christos */
104 1.1 christos
105 1.1 christos pututxline(utx);
106 1.1 christos
107 1.1 christos return 0;
108 1.1 christos }
109