xref: /plan9/sys/src/cmd/auth/factotum/log.c (revision d3c05884522721166d85a4d78bb2a932ad0e3f06)
1 #include "dat.h"
2 
3 void
logbufproc(Logbuf * lb)4 logbufproc(Logbuf *lb)
5 {
6 	char *s;
7 	int n;
8 	Req *r;
9 
10 	while(lb->wait && lb->rp != lb->wp){
11 		r = lb->wait;
12 		lb->wait = r->aux;
13 		if(lb->wait == nil)
14 			lb->waitlast = &lb->wait;
15 		r->aux = nil;
16 		if(r->ifcall.count < 5){
17 			respond(r, "factotum: read request count too short");
18 			continue;
19 		}
20 		s = lb->msg[lb->rp];
21 		lb->msg[lb->rp] = nil;
22 		if(++lb->rp == nelem(lb->msg))
23 			lb->rp = 0;
24 		n = r->ifcall.count;
25 		if(n < strlen(s)+1+1){
26 			memmove(r->ofcall.data, s, n-5);
27 			n -= 5;
28 			r->ofcall.data[n] = '\0';
29 			/* look for first byte of UTF-8 sequence by skipping continuation bytes */
30 			while(n>0 && (r->ofcall.data[--n]&0xC0)==0x80)
31 				;
32 			strcpy(r->ofcall.data+n, "...\n");
33 		}else{
34 			strcpy(r->ofcall.data, s);
35 			strcat(r->ofcall.data, "\n");
36 		}
37 		r->ofcall.count = strlen(r->ofcall.data);
38 		free(s);
39 		respond(r, nil);
40 	}
41 }
42 
43 void
logbufread(Logbuf * lb,Req * r)44 logbufread(Logbuf *lb, Req *r)
45 {
46 	if(lb->waitlast == nil)
47 		lb->waitlast = &lb->wait;
48 	*(lb->waitlast) = r;
49 	lb->waitlast = &r->aux;
50 	r->aux = nil;
51 	logbufproc(lb);
52 }
53 
54 void
logbufflush(Logbuf * lb,Req * r)55 logbufflush(Logbuf *lb, Req *r)
56 {
57 	Req **l;
58 
59 	for(l=&lb->wait; *l; l=&(*l)->aux){
60 		if(*l == r){
61 			*l = r->aux;
62 			r->aux = nil;
63 			if(*l == nil)
64 				lb->waitlast = l;
65 			respond(r, "interrupted");
66 			break;
67 		}
68 	}
69 }
70 
71 void
logbufappend(Logbuf * lb,char * buf)72 logbufappend(Logbuf *lb, char *buf)
73 {
74 	if(debug)
75 		fprint(2, "%s\n", buf);
76 
77 	if(lb->msg[lb->wp])
78 		free(lb->msg[lb->wp]);
79 	lb->msg[lb->wp] = estrdup9p(buf);
80 	if(++lb->wp == nelem(lb->msg))
81 		lb->wp = 0;
82 	logbufproc(lb);
83 }
84 
85 Logbuf logbuf;
86 
87 void
logread(Req * r)88 logread(Req *r)
89 {
90 	logbufread(&logbuf, r);
91 }
92 
93 void
logflush(Req * r)94 logflush(Req *r)
95 {
96 	logbufflush(&logbuf, r);
97 }
98 
99 void
flog(char * fmt,...)100 flog(char *fmt, ...)
101 {
102 	char buf[1024];
103 	va_list arg;
104 
105 	va_start(arg, fmt);
106 	vseprint(buf, buf+sizeof buf, fmt, arg);
107 	va_end(arg);
108 	logbufappend(&logbuf, buf);
109 }
110 
111