1 6e527fbc 2005-02-13 devnull #include "std.h"
  2 6e527fbc 2005-02-13 devnull #include "dat.h"
  3 6e527fbc 2005-02-13 devnull 
  4 6e527fbc 2005-02-13 devnull Logbuf confbuf;
  5 6e527fbc 2005-02-13 devnull 
  6 6e527fbc 2005-02-13 devnull void
  7 6e527fbc 2005-02-13 devnull confirmread(Req *r)
  8 6e527fbc 2005-02-13 devnull {
  9 6e527fbc 2005-02-13 devnull 	lbread(&confbuf, r);
 10 6e527fbc 2005-02-13 devnull }
 11 6e527fbc 2005-02-13 devnull 
 12 6e527fbc 2005-02-13 devnull void
 13 6e527fbc 2005-02-13 devnull confirmflush(Req *r)
 14 6e527fbc 2005-02-13 devnull {
 15 6e527fbc 2005-02-13 devnull 	lbflush(&confbuf, r);
 16 6e527fbc 2005-02-13 devnull }
 17 6e527fbc 2005-02-13 devnull 
 18 6e527fbc 2005-02-13 devnull int
 19 6e527fbc 2005-02-13 devnull confirmwrite(char *s)
 20 6e527fbc 2005-02-13 devnull {
 21 6e527fbc 2005-02-13 devnull 	char *t, *ans;
 22 6e527fbc 2005-02-13 devnull 	int allow;
 23 6e527fbc 2005-02-13 devnull 	ulong tag;
 24 6e527fbc 2005-02-13 devnull 	Attr *a;
 25 6e527fbc 2005-02-13 devnull 	Conv *c;
 26 6e527fbc 2005-02-13 devnull 
 27 6e527fbc 2005-02-13 devnull 	a = _parseattr(s);
 28 6e527fbc 2005-02-13 devnull 	if(a == nil){
 29 6e527fbc 2005-02-13 devnull 		werrstr("bad attr");
 30 6e527fbc 2005-02-13 devnull 		return -1;
 31 6e527fbc 2005-02-13 devnull 	}
 32 6e527fbc 2005-02-13 devnull 	if((t = _strfindattr(a, "tag")) == nil){
 33 6e527fbc 2005-02-13 devnull 		werrstr("no tag");
 34 6e527fbc 2005-02-13 devnull 		return -1;
 35 6e527fbc 2005-02-13 devnull 	}
 36 6e527fbc 2005-02-13 devnull 	tag = strtoul(t, 0, 0);
 37 6e527fbc 2005-02-13 devnull 	if((ans = _strfindattr(a, "answer")) == nil){
 38 6e527fbc 2005-02-13 devnull 		werrstr("no answer");
 39 6e527fbc 2005-02-13 devnull 		return -1;
 40 6e527fbc 2005-02-13 devnull 	}
 41 6e527fbc 2005-02-13 devnull 	if(strcmp(ans, "yes") == 0)
 42 6e527fbc 2005-02-13 devnull 		allow = 1;
 43 6e527fbc 2005-02-13 devnull 	else if(strcmp(ans, "no") == 0)
 44 6e527fbc 2005-02-13 devnull 		allow = 0;
 45 6e527fbc 2005-02-13 devnull 	else{
 46 6e527fbc 2005-02-13 devnull 		werrstr("bad answer");
 47 6e527fbc 2005-02-13 devnull 		return -1;
 48 6e527fbc 2005-02-13 devnull 	}
 49 6e527fbc 2005-02-13 devnull 	for(c=conv; c; c=c->next){
 50 6e527fbc 2005-02-13 devnull 		if(tag == c->tag){
 51 6e527fbc 2005-02-13 devnull 			nbsendul(c->keywait, allow);
 52 6e527fbc 2005-02-13 devnull 			break;
 53 6e527fbc 2005-02-13 devnull 		}
 54 6e527fbc 2005-02-13 devnull 	}
 55 6e527fbc 2005-02-13 devnull 	if(c == nil){
 56 6e527fbc 2005-02-13 devnull 		werrstr("tag not found");
 57 6e527fbc 2005-02-13 devnull 		return -1;
 58 6e527fbc 2005-02-13 devnull 	}
 59 6e527fbc 2005-02-13 devnull 	return 0;
 60 6e527fbc 2005-02-13 devnull }
 61 6e527fbc 2005-02-13 devnull 
 62 6e527fbc 2005-02-13 devnull int
 63 6e527fbc 2005-02-13 devnull confirmkey(Conv *c, Key *k)
 64 6e527fbc 2005-02-13 devnull {
 65 6e527fbc 2005-02-13 devnull 	if(*confirminuse == 0)
 66 6e527fbc 2005-02-13 devnull 		return -1;
 67 6e527fbc 2005-02-13 devnull 
 68 6e527fbc 2005-02-13 devnull 	lbappend(&confbuf, "confirm tag=%lud %A %N", c->tag, k->attr, k->privattr);
 69 6e527fbc 2005-02-13 devnull 	c->state = "keyconfirm";
 70 6e527fbc 2005-02-13 devnull 	return recvul(c->keywait);
 71 6e527fbc 2005-02-13 devnull }
 72 6e527fbc 2005-02-13 devnull 
 73 6e527fbc 2005-02-13 devnull Logbuf needkeybuf;
 74 6e527fbc 2005-02-13 devnull 
 75 6e527fbc 2005-02-13 devnull void
 76 6e527fbc 2005-02-13 devnull needkeyread(Req *r)
 77 6e527fbc 2005-02-13 devnull {
 78 6e527fbc 2005-02-13 devnull 	lbread(&needkeybuf, r);
 79 6e527fbc 2005-02-13 devnull }
 80 6e527fbc 2005-02-13 devnull 
 81 6e527fbc 2005-02-13 devnull void
 82 6e527fbc 2005-02-13 devnull needkeyflush(Req *r)
 83 6e527fbc 2005-02-13 devnull {
 84 6e527fbc 2005-02-13 devnull 	lbflush(&needkeybuf, r);
 85 6e527fbc 2005-02-13 devnull }
 86 6e527fbc 2005-02-13 devnull 
 87 6e527fbc 2005-02-13 devnull int
 88 6e527fbc 2005-02-13 devnull needkeywrite(char *s)
 89 6e527fbc 2005-02-13 devnull {
 90 6e527fbc 2005-02-13 devnull 	char *t;
 91 6e527fbc 2005-02-13 devnull 	ulong tag;
 92 6e527fbc 2005-02-13 devnull 	Attr *a;
 93 6e527fbc 2005-02-13 devnull 	Conv *c;
 94 6e527fbc 2005-02-13 devnull 
 95 6e527fbc 2005-02-13 devnull 	a = _parseattr(s);
 96 6e527fbc 2005-02-13 devnull 	if(a == nil){
 97 6e527fbc 2005-02-13 devnull 		werrstr("empty write");
 98 6e527fbc 2005-02-13 devnull 		return -1;
 99 6e527fbc 2005-02-13 devnull 	}
100 6e527fbc 2005-02-13 devnull 	if((t = _strfindattr(a, "tag")) == nil){
101 6e527fbc 2005-02-13 devnull 		werrstr("no tag");
102 6e527fbc 2005-02-13 devnull 		freeattr(a);
103 6e527fbc 2005-02-13 devnull 		return -1;
104 6e527fbc 2005-02-13 devnull 	}
105 6e527fbc 2005-02-13 devnull 	tag = strtoul(t, 0, 0);
106 6e527fbc 2005-02-13 devnull 	for(c=conv; c; c=c->next)
107 6e527fbc 2005-02-13 devnull 		if(c->tag == tag){
108 6e527fbc 2005-02-13 devnull 			nbsendul(c->keywait, 0);
109 6e527fbc 2005-02-13 devnull 			break;
110 6e527fbc 2005-02-13 devnull 		}
111 6e527fbc 2005-02-13 devnull 	if(c == nil){
112 6e527fbc 2005-02-13 devnull 		werrstr("tag not found");
113 6e527fbc 2005-02-13 devnull 		freeattr(a);
114 6e527fbc 2005-02-13 devnull 		return -1;
115 6e527fbc 2005-02-13 devnull 	}
116 6e527fbc 2005-02-13 devnull 	freeattr(a);
117 6e527fbc 2005-02-13 devnull 	return 0;
118 6e527fbc 2005-02-13 devnull }
119 6e527fbc 2005-02-13 devnull 
120 6e527fbc 2005-02-13 devnull int
121 6e527fbc 2005-02-13 devnull needkey(Conv *c, Attr *a)
122 6e527fbc 2005-02-13 devnull {
123 6e527fbc 2005-02-13 devnull 	if(c == nil || *needkeyinuse == 0)
124 6e527fbc 2005-02-13 devnull 		return -1;
125 6e527fbc 2005-02-13 devnull 
126 6e527fbc 2005-02-13 devnull 	lbappend(&needkeybuf, "needkey tag=%lud %A", c->tag, a);
127 6e527fbc 2005-02-13 devnull 	return nbrecvul(c->keywait);
128 6e527fbc 2005-02-13 devnull }
129 6e527fbc 2005-02-13 devnull 
130 6e527fbc 2005-02-13 devnull int
131 6e527fbc 2005-02-13 devnull badkey(Conv *c, Key *k, char *msg, Attr *a)
132 6e527fbc 2005-02-13 devnull {
133 6e527fbc 2005-02-13 devnull 	if(c == nil || *needkeyinuse == 0)
134 6e527fbc 2005-02-13 devnull 		return -1;
135 6e527fbc 2005-02-13 devnull 
136 6e527fbc 2005-02-13 devnull 	lbappend(&needkeybuf, "badkey tag=%lud %A %N\n%s\n%A",
137 6e527fbc 2005-02-13 devnull 		c->tag, k->attr, k->privattr, msg, a);
138 6e527fbc 2005-02-13 devnull 	return nbrecvul(c->keywait);
139 6e527fbc 2005-02-13 devnull }