Annotation of src/usr.bin/finger/lprint.c, Revision 1.12
1.12 ! millert 1: /* $OpenBSD: lprint.c,v 1.11 2014/10/17 20:19:15 millert Exp $ */
1.2 deraadt 2:
1.1 deraadt 3: /*
4: * Copyright (c) 1989 The Regents of the University of California.
5: * All rights reserved.
6: *
7: * This code is derived from software contributed to Berkeley by
8: * Tony Nardo of the Johns Hopkins University/Applied Physics Lab.
9: *
10: * Redistribution and use in source and binary forms, with or without
11: * modification, are permitted provided that the following conditions
12: * are met:
13: * 1. Redistributions of source code must retain the above copyright
14: * notice, this list of conditions and the following disclaimer.
15: * 2. Redistributions in binary form must reproduce the above copyright
16: * notice, this list of conditions and the following disclaimer in the
17: * documentation and/or other materials provided with the distribution.
1.6 millert 18: * 3. Neither the name of the University nor the names of its contributors
1.1 deraadt 19: * may be used to endorse or promote products derived from this software
20: * without specific prior written permission.
21: *
22: * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
23: * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24: * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25: * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
26: * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27: * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28: * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29: * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30: * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31: * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32: * SUCH DAMAGE.
33: */
34:
35: #include <sys/types.h>
36: #include <sys/file.h>
37: #include <sys/stat.h>
38: #include <sys/time.h>
39: #include <stdio.h>
40: #include <string.h>
1.4 kstailey 41: #include <time.h>
1.1 deraadt 42: #include <ctype.h>
43: #include <paths.h>
1.3 deraadt 44: #include <vis.h>
1.1 deraadt 45: #include "finger.h"
1.4 kstailey 46: #include "extern.h"
1.1 deraadt 47:
48: #define LINE_LEN 80
49: #define TAB_LEN 8 /* 8 spaces between tabs */
50: #define _PATH_PLAN ".plan"
51: #define _PATH_PROJECT ".project"
52:
1.4 kstailey 53: void
1.7 deraadt 54: lflag_print(void)
1.1 deraadt 55: {
1.4 kstailey 56: PERSON *pn;
1.1 deraadt 57:
58: for (pn = phead;;) {
59: lprint(pn);
60: if (!pplan) {
61: (void)show_text(pn->dir, _PATH_PROJECT, "Project:");
62: if (!show_text(pn->dir, _PATH_PLAN, "Plan:"))
63: (void)printf("No Plan.\n");
64: }
65: if (!(pn = pn->next))
66: break;
67: putchar('\n');
68: }
69: }
70:
1.4 kstailey 71: void
1.7 deraadt 72: lprint(PERSON *pn)
1.1 deraadt 73: {
1.4 kstailey 74: struct tm *delta;
75: WHERE *w;
76: int cpr, len, maxlen;
1.1 deraadt 77: struct tm *tp;
78: int oddfield;
1.4 kstailey 79: char *t, *tzn;
1.1 deraadt 80:
1.4 kstailey 81: cpr = 0;
1.1 deraadt 82: /*
83: * long format --
84: * login name
85: * real name
86: * home directory
87: * shell
88: * office, office phone, home phone if available
1.4 kstailey 89: * mail status
1.1 deraadt 90: */
91: (void)printf("Login: %-15s\t\t\tName: %s\nDirectory: %-25s",
1.11 millert 92: pn->name, pn->realname, pn->dir);
1.1 deraadt 93: (void)printf("\tShell: %-s\n", *pn->shell ? pn->shell : _PATH_BSHELL);
94:
95: /*
96: * try and print office, office phone, and home phone on one line;
97: * if that fails, do line filling so it looks nice.
98: */
99: #define OFFICE_TAG "Office"
100: #define OFFICE_PHONE_TAG "Office Phone"
101: oddfield = 0;
102: if (pn->office && pn->officephone &&
103: strlen(pn->office) + strlen(pn->officephone) +
104: sizeof(OFFICE_TAG) + 2 <= 5 * TAB_LEN) {
1.11 millert 105: (void)snprintf(tbuf, sizeof(tbuf), "%s: %s, %s",
106: OFFICE_TAG, pn->office, prphone(pn->officephone));
1.1 deraadt 107: oddfield = demi_print(tbuf, oddfield);
108: } else {
109: if (pn->office) {
1.11 millert 110: (void)snprintf(tbuf, sizeof(tbuf), "%s: %s",
111: OFFICE_TAG, pn->office);
1.1 deraadt 112: oddfield = demi_print(tbuf, oddfield);
113: }
114: if (pn->officephone) {
1.11 millert 115: (void)snprintf(tbuf, sizeof(tbuf), "%s: %s",
116: OFFICE_PHONE_TAG, prphone(pn->officephone));
1.1 deraadt 117: oddfield = demi_print(tbuf, oddfield);
118: }
119: }
120: if (pn->homephone) {
1.11 millert 121: (void)snprintf(tbuf, sizeof(tbuf), "%s: %s",
122: "Home Phone", prphone(pn->homephone));
1.1 deraadt 123: oddfield = demi_print(tbuf, oddfield);
124: }
125: if (oddfield)
126: putchar('\n');
127:
128: /*
1.4 kstailey 129: * long format con't:
130: * if logged in
1.1 deraadt 131: * terminal
132: * idle time
133: * if messages allowed
134: * where logged in from
135: * if not logged in
136: * when last logged in
137: */
138: /* find out longest device name for this user for formatting */
139: for (w = pn->whead, maxlen = -1; w != NULL; w = w->next)
140: if ((len = strlen(w->tty)) > maxlen)
141: maxlen = len;
142: /* find rest of entries for user */
143: for (w = pn->whead; w != NULL; w = w->next) {
144: switch (w->info) {
145: case LOGGEDIN:
146: tp = localtime(&w->loginat);
147: t = asctime(tp);
148: tzn = tp->tm_zone;
149: cpr = printf("On since %.16s (%s) on %s",
150: t, tzn, w->tty);
151: /*
152: * idle time is tough; if have one, print a comma,
153: * then spaces to pad out the device name, then the
154: * idle time. Follow with a comma if a remote login.
155: */
156: delta = gmtime(&w->idletime);
157: if (delta->tm_yday || delta->tm_hour || delta->tm_min) {
158: cpr += printf("%-*s idle ",
1.5 deraadt 159: (int)(maxlen - strlen(w->tty) + 1), ",");
1.1 deraadt 160: if (delta->tm_yday > 0) {
161: cpr += printf("%d day%s ",
162: delta->tm_yday,
163: delta->tm_yday == 1 ? "" : "s");
164: }
165: cpr += printf("%d:%02d",
166: delta->tm_hour, delta->tm_min);
167: if (*w->host) {
168: putchar(',');
169: ++cpr;
170: }
171: }
172: if (!w->writable)
173: cpr += printf(" (messages off)");
174: break;
175: case LASTLOG:
176: if (w->loginat == 0) {
177: (void)printf("Never logged in.");
178: break;
179: }
180: tp = localtime(&w->loginat);
181: t = asctime(tp);
182: tzn = tp->tm_zone;
1.12 ! millert 183: if (now - w->loginat > SIXMONTHS)
1.1 deraadt 184: cpr =
185: printf("Last login %.16s %.4s (%s) on %s",
186: t, t + 20, tzn, w->tty);
187: else
188: cpr = printf("Last login %.16s (%s) on %s",
189: t, tzn, w->tty);
190: break;
191: }
192: if (*w->host) {
193: if (LINE_LEN < (cpr + 6 + strlen(w->host)))
194: (void)printf("\n ");
195: (void)printf(" from %s", w->host);
196: }
197: putchar('\n');
198: }
199: if (pn->mailrecv == -1)
200: printf("No Mail.\n");
201: else if (pn->mailrecv > pn->mailread) {
202: tp = localtime(&pn->mailrecv);
203: t = asctime(tp);
204: tzn = tp->tm_zone;
205: printf("New mail received %.16s %.4s (%s)\n", t, t + 20, tzn);
206: tp = localtime(&pn->mailread);
207: t = asctime(tp);
208: tzn = tp->tm_zone;
209: printf(" Unread since %.16s %.4s (%s)\n", t, t + 20, tzn);
210: } else {
211: tp = localtime(&pn->mailread);
212: t = asctime(tp);
213: tzn = tp->tm_zone;
214: printf("Mail last read %.16s %.4s (%s)\n", t, t + 20, tzn);
215: }
216: }
217:
1.4 kstailey 218: int
1.7 deraadt 219: demi_print(char *str, int oddfield)
1.1 deraadt 220: {
221: static int lenlast;
222: int lenthis, maxlen;
223:
224: lenthis = strlen(str);
225: if (oddfield) {
226: /*
227: * We left off on an odd number of fields. If we haven't
228: * crossed the midpoint of the screen, and we have room for
229: * the next field, print it on the same line; otherwise,
230: * print it on a new line.
231: *
232: * Note: we insist on having the right hand fields start
233: * no less than 5 tabs out.
234: */
235: maxlen = 5 * TAB_LEN;
236: if (maxlen < lenlast)
237: maxlen = lenlast;
238: if (((((maxlen / TAB_LEN) + 1) * TAB_LEN) +
239: lenthis) <= LINE_LEN) {
240: while(lenlast < (4 * TAB_LEN)) {
241: putchar('\t');
242: lenlast += TAB_LEN;
243: }
244: (void)printf("\t%s\n", str); /* force one tab */
245: } else {
246: (void)printf("\n%s", str); /* go to next line */
247: oddfield = !oddfield; /* this'll be undone below */
248: }
249: } else
250: (void)printf("%s", str);
251: oddfield = !oddfield; /* toggle odd/even marker */
252: lenlast = lenthis;
1.8 tedu 253: return (oddfield);
1.1 deraadt 254: }
255:
1.4 kstailey 256: int
1.7 deraadt 257: show_text(char *directory, char *file_name, char *header)
1.1 deraadt 258: {
1.4 kstailey 259: int ch, lastc;
260: FILE *fp;
1.1 deraadt 261:
1.4 kstailey 262: lastc = 0;
263: (void)snprintf(tbuf, sizeof(tbuf), "%s/%s", directory, file_name);
1.1 deraadt 264: if ((fp = fopen(tbuf, "r")) == NULL)
1.8 tedu 265: return (0);
1.1 deraadt 266: (void)printf("%s\n", header);
267: while ((ch = getc(fp)) != EOF)
268: vputc(lastc = ch);
269: if (lastc != '\n')
270: (void)putchar('\n');
271: (void)fclose(fp);
1.8 tedu 272: return (1);
1.1 deraadt 273: }
274:
1.4 kstailey 275: void
1.7 deraadt 276: vputc(int ch)
1.1 deraadt 277: {
1.4 kstailey 278: char visout[5], *s2;
1.1 deraadt 279:
1.3 deraadt 280: ch = toascii(ch);
281: vis(visout, ch, VIS_SAFE|VIS_NOSLASH, 0);
282: for (s2 = visout; *s2; s2++)
283: (void)putchar(*s2);
1.1 deraadt 284: }