2 * Copyright (c) 1989, 1993
3 * The Regents of the University of California. All rights reserved.
5 * This code is derived from software contributed to Berkeley by
6 * Tony Nardo of the Johns Hopkins University/Applied Physics Lab.
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 * 4. Neither the name of the University nor the names of its contributors
17 * may be used to endorse or promote products derived from this software
18 * without specific prior written permission.
20 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
21 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
24 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34 * Luke Mewburn <lm@rmit.edu.au> added the following on 940622:
35 * - mail status ("No Mail", "Mail read:...", or "New Mail ...,
37 * - 4 digit phone extensions (3210 is printed as x3210.)
38 * - host/office toggling in short format with -h & -o.
39 * - short day names (`Tue' printed instead of `Jun 21' if the
40 * login time is < 6 days.
44 static const char copyright
[] =
45 "@(#) Copyright (c) 1989, 1993\n\
46 The Regents of the University of California. All rights reserved.\n";
51 static char sccsid
[] = "@(#)finger.c 8.5 (Berkeley) 5/4/95";
55 #include <sys/cdefs.h>
56 __FBSDID("$FreeBSD$");
59 * Finger prints out information about users. It is not portable since
60 * certain fields (e.g. the full user name, office, and phone numbers) are
61 * extracted from the gecos field of the passwd file which other UNIXes
62 * may not have or may use for other things.
64 * There are currently two output formats; the short format is one line
65 * per user and displays login name, tty, login time, real name, idle time,
66 * and either remote host information (default) or office location/phone
67 * number, depending on if -h or -o is used respectively.
68 * The long format gives the same information (in a more legible format) as
69 * well as home directory, shell, mail info, and .plan/.project files.
72 #include <sys/types.h>
73 #include <sys/socket.h>
86 #include "pathnames.h"
90 static int kflag
, mflag
, sflag
;
91 int entries
, gflag
, lflag
, pplan
, oflag
;
92 sa_family_t family
= PF_UNSPEC
;
97 static void loginlist(void);
98 static int option(int, char **);
99 static void usage(void);
100 static void userlist(int, char **);
103 option(int argc
, char **argv
)
107 optind
= 1; /* reset getopt */
109 while ((ch
= getopt(argc
, argv
, "46gklmpsho")) != -1)
121 kflag
= 1; /* keep going without utmp */
124 lflag
= 1; /* long format */
127 mflag
= 1; /* force exact match of names */
130 pplan
= 1; /* don't show .plan/.project */
133 sflag
= 1; /* short format */
136 oflag
= 0; /* remote host info */
139 oflag
= 1; /* office info */
152 (void)fprintf(stderr
,
153 "usage: finger [-46gklmpsho] [user ...] [user@host ...]\n");
158 main(int argc
, char **argv
)
163 static char myname
[] = "finger";
165 if (getuid() == 0 || geteuid() == 0) {
167 if ((pw
= getpwnam(UNPRIV_NAME
)) && pw
->pw_uid
> 0) {
168 if (setgid(pw
->pw_gid
) != 0)
170 if (setuid(pw
->pw_uid
) != 0)
173 if (setgid(UNPRIV_UGID
) != 0)
175 if (setuid(UNPRIV_UGID
) != 0)
180 (void) setlocale(LC_ALL
, "");
182 /* remove this line to get remote host */
183 oflag
= 1; /* default to old "office" behavior */
186 * Process environment variables followed by command line arguments.
188 if ((envargv
[1] = getenv("FINGER"))) {
192 (void) option(envargc
, envargv
);
195 argcnt
= option(argc
, argv
);
203 * Assign explicit "small" format if no names given and -l
204 * not selected. Force the -s BEFORE we get names so proper
205 * screening will be done.
208 sflag
= 1; /* if -l not explicit, force -s */
211 (void)printf("No one logged on.\n");
213 userlist(argc
, argv
);
215 * Assign explicit "large" format if names given and -s not
216 * explicitly stated. Force the -l AFTER we get names so any
217 * remote finger attempts specified won't be mishandled.
220 lflag
= 1; /* if -s not explicit, force -l */
241 errx(1, "can't list logins without reading utmp");
244 while ((user
= getutxent()) != NULL
) {
245 if (user
->ut_type
!= USER_PROCESS
)
247 if ((pn
= find_person(user
->ut_user
)) == NULL
) {
248 if ((pw
= getpwnam(user
->ut_user
)) == NULL
)
252 pn
= enter_person(pw
);
254 enter_where(user
, pn
);
258 for (sflag1
= R_FIRST
;; sflag1
= R_NEXT
) {
261 r
= (*db
->seq
)(db
, &key
, &data
, sflag1
);
266 memmove(&tmp
, data
.data
, sizeof tmp
);
272 userlist(int argc
, char **argv
)
278 int r
, sflag1
, *used
, *ip
;
279 char **ap
, **nargv
, **np
, **p
;
281 char conf_alias
[LINE_MAX
];
285 if ((nargv
= malloc((argc
+1) * sizeof(char *))) == NULL
||
286 (used
= calloc(argc
, sizeof(int))) == NULL
)
289 /* Pull out all network requests. */
290 for (ap
= p
= argv
, np
= nargv
; *p
; ++p
)
303 * Mark any arguments beginning with '/' as invalid so that we
304 * don't accidentally confuse them with expansions from finger.conf
306 for (p
= argv
, ip
= used
; *p
; ++p
, ++ip
)
309 warnx("%s: no such user", *p
);
313 * Traverse the finger alias configuration file of the form
314 * alias:(user|alias), ignoring comment lines beginning '#'.
316 if ((conf_fp
= fopen(_PATH_FINGERCONF
, "r")) != NULL
) {
317 while(fgets(conf_alias
, sizeof(conf_alias
), conf_fp
) != NULL
) {
318 conf_length
= strlen(conf_alias
);
319 if (*conf_alias
== '#' || conf_alias
[--conf_length
] != '\n')
321 conf_alias
[conf_length
] = '\0'; /* Remove trailing LF */
322 if ((conf_realname
= strchr(conf_alias
, ':')) == NULL
)
324 *conf_realname
= '\0'; /* Replace : with NUL */
325 for (p
= argv
; *p
; ++p
) {
326 if (strcmp(*p
, conf_alias
) == 0) {
327 if ((*p
= strdup(conf_realname
+1)) == NULL
) {
333 (void)fclose(conf_fp
);
337 * Traverse the list of possible login names and check the login name
338 * and real name against the name specified by the user. If the name
339 * begins with a '/', try to read the file of that name instead of
340 * gathering the traditional finger information.
343 for (p
= argv
, ip
= used
; *p
; ++p
, ++ip
) {
344 if (**p
!= '/' || *ip
== 1 || !show_text("", *p
, "")) {
345 if (((pw
= getpwnam(*p
)) != NULL
) && !hide(pw
))
348 warnx("%s: no such user", *p
);
352 while ((pw
= getpwent()) != NULL
) {
353 for (p
= argv
, ip
= used
; *p
; ++p
, ++ip
)
354 if (**p
== '/' && *ip
!= 1
355 && show_text("", *p
, ""))
357 else if (match(pw
, *p
) && !hide(pw
)) {
362 for (p
= argv
, ip
= used
; *p
; ++p
, ++ip
)
364 warnx("%s: no such user", *p
);
367 /* Handle network requests. */
368 net
: for (p
= nargv
; *p
;) {
382 * Scan thru the list of users currently logged in, saving
383 * appropriate data whenever a match occurs.
386 while ((user
= getutxent()) != NULL
) {
387 if (user
->ut_type
!= USER_PROCESS
)
389 if ((pn
= find_person(user
->ut_user
)) == NULL
)
391 enter_where(user
, pn
);
395 for (sflag1
= R_FIRST
;; sflag1
= R_NEXT
) {
398 r
= (*db
->seq
)(db
, &key
, &data
, sflag1
);
403 memmove(&tmp
, data
.data
, sizeof tmp
);