![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to lprint.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 43BSDReno / usr.bin / finger|
Return to lprint.c CVS log | Up to [CSRG BSD Unix] / 43BSDReno / usr.bin / finger |
1.1 root 1: /*
2: * Copyright (c) 1989 The Regents of the University of California.
3: * All rights reserved.
4: *
5: * This code is derived from software contributed to Berkeley by
6: * Tony Nardo of the Johns Hopkins University/Applied Physics Lab.
7: *
8: * Redistribution and use in source and binary forms are permitted provided
9: * that: (1) source distributions retain this entire copyright notice and
10: * comment, and (2) distributions including binaries display the following
11: * acknowledgement: ``This product includes software developed by the
12: * University of California, Berkeley and its contributors'' in the
13: * documentation or other materials provided with the distribution and in
14: * all advertising materials mentioning features or use of this software.
15: * Neither the name of the University nor the names of its contributors may
16: * be used to endorse or promote products derived from this software without
17: * specific prior written permission.
18: * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR IMPLIED
19: * WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
20: * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
21: */
22:
23: #ifndef lint
24: static char sccsid[] = "@(#)lprint.c 5.12 (Berkeley) 6/24/90";
25: #endif /* not lint */
26:
27: #include <sys/types.h>
28: #include <sys/file.h>
29: #include <sys/stat.h>
30: #include <sys/time.h>
31: #include <tzfile.h>
32: #include <stdio.h>
33: #include <ctype.h>
34: #include <paths.h>
35: #include "finger.h"
36:
37: #define LINE_LEN 80
38: #define TAB_LEN 8 /* 8 spaces between tabs */
39: #define _PATH_PLAN ".plan"
40: #define _PATH_PROJECT ".project"
41:
42: lflag_print()
43: {
44: extern int pplan;
45: register PERSON *pn;
46:
47: for (pn = phead;;) {
48: lprint(pn);
49: if (!pplan) {
50: (void)show_text(pn->dir, _PATH_PROJECT, "Project:");
51: if (!show_text(pn->dir, _PATH_PLAN, "Plan:"))
52: (void)printf("No Plan.\n");
53: }
54: if (!(pn = pn->next))
55: break;
56: putchar('\n');
57: }
58: }
59:
60: lprint(pn)
61: register PERSON *pn;
62: {
63: extern time_t now;
64: register struct tm *delta;
65: register WHERE *w;
66: register int cpr, len, maxlen;
67: struct tm *tp;
68: int oddfield;
69: time_t time();
70: char *t, *tzn, *prphone();
71:
72: /*
73: * long format --
74: * login name
75: * real name
76: * home directory
77: * shell
78: * office, office phone, home phone if available
79: */
80: (void)printf("Login: %-15s\t\t\tName: %s\nDirectory: %-25s",
81: pn->name, pn->realname, pn->dir);
82: (void)printf("\tShell: %-s\n", *pn->shell ? pn->shell : _PATH_BSHELL);
83:
84: /*
85: * try and print office, office phone, and home phone on one line;
86: * if that fails, do line filling so it looks nice.
87: */
88: #define OFFICE_TAG "Office"
89: #define OFFICE_PHONE_TAG "Office Phone"
90: oddfield = 0;
91: if (pn->office && pn->officephone &&
92: strlen(pn->office) + strlen(pn->officephone) +
93: sizeof(OFFICE_TAG) + 2 <= 5 * TAB_LEN) {
94: (void)sprintf(tbuf, "%s: %s, %s", OFFICE_TAG, pn->office,
95: prphone(pn->officephone));
96: oddfield = demi_print(tbuf, oddfield);
97: } else {
98: if (pn->office) {
99: (void)sprintf(tbuf, "%s: %s", OFFICE_TAG, pn->office);
100: oddfield = demi_print(tbuf, oddfield);
101: }
102: if (pn->officephone) {
103: (void)sprintf(tbuf, "%s: %s", OFFICE_PHONE_TAG,
104: prphone(pn->officephone));
105: oddfield = demi_print(tbuf, oddfield);
106: }
107: }
108: if (pn->homephone) {
109: (void)sprintf(tbuf, "%s: %s", "Home Phone",
110: prphone(pn->homephone));
111: oddfield = demi_print(tbuf, oddfield);
112: }
113: if (oddfield)
114: putchar('\n');
115:
116: /*
117: * long format con't: * if logged in
118: * terminal
119: * idle time
120: * if messages allowed
121: * where logged in from
122: * if not logged in
123: * when last logged in
124: */
125: /* find out longest device name for this user for formatting */
126: for (w = pn->whead, maxlen = -1; w != NULL; w = w->next)
127: if ((len = strlen(w->tty)) > maxlen)
128: maxlen = len;
129: /* find rest of entries for user */
130: for (w = pn->whead; w != NULL; w = w->next) {
131: switch (w->info) {
132: case LOGGEDIN:
133: tp = localtime(&w->loginat);
134: t = asctime(tp);
135: tzn = tp->tm_zone;
136: cpr = printf("On since %16.16s (%s) on %s",
137: t, tzn, w->tty);
138: /*
139: * idle time is tough; if have one, print a comma,
140: * then spaces to pad out the device name, then the
141: * idle time. Follow with a comma if a remote login.
142: */
143: delta = gmtime(&w->idletime);
144: if (delta->tm_yday || delta->tm_hour || delta->tm_min) {
145: cpr += printf("%-*s idle ",
146: maxlen - strlen(w->tty) + 1, ",");
147: if (delta->tm_yday > 0) {
148: cpr += printf("%d day%s ",
149: delta->tm_yday,
150: delta->tm_yday == 1 ? "" : "s");
151: }
152: cpr += printf("%d:%02d",
153: delta->tm_hour, delta->tm_min);
154: if (*w->host) {
155: putchar(',');
156: ++cpr;
157: }
158: }
159: if (!w->writable)
160: cpr += printf(" (messages off)");
161: break;
162: case LASTLOG:
163: if (w->loginat == 0) {
164: (void)printf("Never logged in.");
165: break;
166: }
167: tp = localtime(&w->loginat);
168: t = asctime(tp);
169: tzn = tp->tm_zone;
170: if (now - w->loginat > SECSPERDAY * DAYSPERNYEAR / 2)
171: cpr = printf("Last login %10.10s (%s), %4.4s on %s",
172: t, t + 20, tzn, w->tty);
173: else
174: cpr = printf("Last login %16.16s (%s) on %s",
175: t, tzn, w->tty);
176: break;
177: }
178: if (*w->host) {
179: if (LINE_LEN < (cpr + 6 + strlen(w->host)))
180: (void)printf("\n ");
181: (void)printf(" from %s", w->host);
182: }
183: putchar('\n');
184: }
185: }
186:
187: demi_print(str, oddfield)
188: char *str;
189: int oddfield;
190: {
191: static int lenlast;
192: int lenthis, maxlen;
193:
194: lenthis = strlen(str);
195: if (oddfield) {
196: /*
197: * We left off on an odd number of fields. If we haven't
198: * crossed the midpoint of the screen, and we have room for
199: * the next field, print it on the same line; otherwise,
200: * print it on a new line.
201: *
202: * Note: we insist on having the right hand fields start
203: * no less than 5 tabs out.
204: */
205: maxlen = 5 * TAB_LEN;
206: if (maxlen < lenlast)
207: maxlen = lenlast;
208: if (((((maxlen / TAB_LEN) + 1) * TAB_LEN) +
209: lenthis) <= LINE_LEN) {
210: while(lenlast < (4 * TAB_LEN)) {
211: putchar('\t');
212: lenlast += TAB_LEN;
213: }
214: (void)printf("\t%s\n", str); /* force one tab */
215: } else {
216: (void)printf("\n%s", str); /* go to next line */
217: oddfield = !oddfield; /* this'll be undone below */
218: }
219: } else
220: (void)printf("%s", str);
221: oddfield = !oddfield; /* toggle odd/even marker */
222: lenlast = lenthis;
223: return(oddfield);
224: }
225:
226: show_text(directory, file_name, header)
227: char *directory, *file_name, *header;
228: {
229: register int ch, lastc;
230: register FILE *fp;
231:
232: (void)sprintf(tbuf, "%s/%s", directory, file_name);
233: if ((fp = fopen(tbuf, "r")) == NULL)
234: return(0);
235: (void)printf("%s\n", header);
236: while ((ch = getc(fp)) != EOF)
237: vputc(lastc = ch);
238: if (lastc != '\n')
239: (void)putchar('\n');
240: (void)fclose(fp);
241: return(1);
242: }
243:
244: vputc(ch)
245: register int ch;
246: {
247: int meta;
248:
249: if (!isascii(ch)) {
250: (void)putchar('M');
251: (void)putchar('-');
252: ch = toascii(ch);
253: meta = 1;
254: } else
255: meta = 0;
256: if (isprint(ch) || !meta && (ch == ' ' || ch == '\t' || ch == '\n'))
257: (void)putchar(ch);
258: else {
259: (void)putchar('^');
260: (void)putchar(ch == '\177' ? '?' : ch | 0100);
261: }
262: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.