Blame

Date:
Message:
needed cast
Actions:
History | Blob | Raw File
   1 ce94dbe6 2005-02-13 devnull /*

   2 ce94dbe6 2005-02-13 devnull  * Present factotum in ssh agent clothing.

   3 ce94dbe6 2005-02-13 devnull  */

   4 ce94dbe6 2005-02-13 devnull #include <u.h>

   5 ce94dbe6 2005-02-13 devnull #include <libc.h>

   6 ce94dbe6 2005-02-13 devnull #include <mp.h>

   7 ce94dbe6 2005-02-13 devnull #include <libsec.h>

   8 ce94dbe6 2005-02-13 devnull #include <auth.h>

   9 ce94dbe6 2005-02-13 devnull #include <thread.h>

  10 ce94dbe6 2005-02-13 devnull #include <9pclient.h>

  11 ce94dbe6 2005-02-13 devnull 

  12 ce94dbe6 2005-02-13 devnull enum

  13 ce94dbe6 2005-02-13 devnull {

  14 ce94dbe6 2005-02-13 devnull 	STACK = 65536

  15 ce94dbe6 2005-02-13 devnull };

  16 ce94dbe6 2005-02-13 devnull enum		/* agent protocol packet types */

  17 ce94dbe6 2005-02-13 devnull {

  18 ce94dbe6 2005-02-13 devnull 	SSH_AGENTC_NONE = 0,

  19 ce94dbe6 2005-02-13 devnull 	SSH_AGENTC_REQUEST_RSA_IDENTITIES,

  20 ce94dbe6 2005-02-13 devnull 	SSH_AGENT_RSA_IDENTITIES_ANSWER,

  21 ce94dbe6 2005-02-13 devnull 	SSH_AGENTC_RSA_CHALLENGE,

  22 ce94dbe6 2005-02-13 devnull 	SSH_AGENT_RSA_RESPONSE,

  23 ce94dbe6 2005-02-13 devnull 	SSH_AGENT_FAILURE,

  24 ce94dbe6 2005-02-13 devnull 	SSH_AGENT_SUCCESS,

  25 ce94dbe6 2005-02-13 devnull 	SSH_AGENTC_ADD_RSA_IDENTITY,

  26 ce94dbe6 2005-02-13 devnull 	SSH_AGENTC_REMOVE_RSA_IDENTITY,

  27 ce94dbe6 2005-02-13 devnull 	SSH_AGENTC_REMOVE_ALL_RSA_IDENTITIES,

  28 ce94dbe6 2005-02-13 devnull 	

  29 ce94dbe6 2005-02-13 devnull 	SSH2_AGENTC_REQUEST_IDENTITIES = 11,

  30 ce94dbe6 2005-02-13 devnull 	SSH2_AGENT_IDENTITIES_ANSWER,

  31 ce94dbe6 2005-02-13 devnull 	SSH2_AGENTC_SIGN_REQUEST,

  32 ce94dbe6 2005-02-13 devnull 	SSH2_AGENT_SIGN_RESPONSE,

  33 ce94dbe6 2005-02-13 devnull 

  34 ce94dbe6 2005-02-13 devnull 	SSH2_AGENTC_ADD_IDENTITY = 17,

  35 ce94dbe6 2005-02-13 devnull 	SSH2_AGENTC_REMOVE_IDENTITY,

  36 ce94dbe6 2005-02-13 devnull 	SSH2_AGENTC_REMOVE_ALL_IDENTITIES,

  37 ce94dbe6 2005-02-13 devnull 	SSH2_AGENTC_ADD_SMARTCARD_KEY,

  38 ce94dbe6 2005-02-13 devnull 	SSH2_AGENTC_REMOVE_SMARTCARD_KEY,

  39 ce94dbe6 2005-02-13 devnull 

  40 ce94dbe6 2005-02-13 devnull 	SSH_AGENTC_LOCK,

  41 ce94dbe6 2005-02-13 devnull 	SSH_AGENTC_UNLOCK,

  42 ce94dbe6 2005-02-13 devnull 	SSH_AGENTC_ADD_RSA_ID_CONSTRAINED,

  43 ce94dbe6 2005-02-13 devnull 	SSH2_AGENTC_ADD_ID_CONSTRAINED,

  44 ce94dbe6 2005-02-13 devnull 	SSH_AGENTC_ADD_SMARTCARD_KEY_CONSTRAINED,

  45 ce94dbe6 2005-02-13 devnull 	

  46 ce94dbe6 2005-02-13 devnull 	SSH_AGENT_CONSTRAIN_LIFETIME = 1,

  47 ce94dbe6 2005-02-13 devnull 	SSH_AGENT_CONSTRAIN_CONFIRM = 2,

  48 ce94dbe6 2005-02-13 devnull 

  49 ce94dbe6 2005-02-13 devnull 	SSH2_AGENT_FAILURE = 30,

  50 ce94dbe6 2005-02-13 devnull 	

  51 ce94dbe6 2005-02-13 devnull 	SSH_COM_AGENT2_FAILURE = 102,

  52 ce94dbe6 2005-02-13 devnull 	SSH_AGENT_OLD_SIGNATURE = 0x01,

  53 ce94dbe6 2005-02-13 devnull };

  54 ce94dbe6 2005-02-13 devnull 

  55 ce94dbe6 2005-02-13 devnull typedef struct Aconn Aconn;

  56 ce94dbe6 2005-02-13 devnull struct Aconn

  57 ce94dbe6 2005-02-13 devnull {

  58 ce94dbe6 2005-02-13 devnull 	uchar *data;

  59 ce94dbe6 2005-02-13 devnull 	uint ndata;

  60 ce94dbe6 2005-02-13 devnull 	int ctl;

  61 ce94dbe6 2005-02-13 devnull 	int fd;

  62 ce94dbe6 2005-02-13 devnull 	char dir[40];

  63 ce94dbe6 2005-02-13 devnull };

  64 ce94dbe6 2005-02-13 devnull 

  65 ce94dbe6 2005-02-13 devnull typedef struct Msg Msg;

  66 ce94dbe6 2005-02-13 devnull struct Msg

  67 ce94dbe6 2005-02-13 devnull {

  68 ce94dbe6 2005-02-13 devnull 	uchar *bp;

  69 ce94dbe6 2005-02-13 devnull 	uchar *p;

  70 ce94dbe6 2005-02-13 devnull 	uchar *ep;

  71 ce94dbe6 2005-02-13 devnull };

  72 ce94dbe6 2005-02-13 devnull 

  73 ce94dbe6 2005-02-13 devnull char adir[40];

  74 ce94dbe6 2005-02-13 devnull int afd;

  75 ce94dbe6 2005-02-13 devnull int chatty;

  76 ce94dbe6 2005-02-13 devnull char *factotum = "factotum";

  77 ce94dbe6 2005-02-13 devnull 

  78 ce94dbe6 2005-02-13 devnull void		agentproc(void *v);

  79 ce94dbe6 2005-02-13 devnull void*	emalloc(int n);

  80 ce94dbe6 2005-02-13 devnull void*	erealloc(void *v, int n);

  81 ce94dbe6 2005-02-13 devnull void		listenproc(void *v);

  82 ce94dbe6 2005-02-13 devnull int		runmsg(Aconn *a);

  83 ce94dbe6 2005-02-13 devnull void		listkeystext(void);

  84 ce94dbe6 2005-02-13 devnull 

  85 ce94dbe6 2005-02-13 devnull void

  86 ce94dbe6 2005-02-13 devnull usage(void)

  87 ce94dbe6 2005-02-13 devnull {

  88 ce94dbe6 2005-02-13 devnull 	fprint(2, "usage: 9 ssh-agent [-D] [factotum]\n");

  89 ce94dbe6 2005-02-13 devnull 	threadexitsall("usage");

  90 ce94dbe6 2005-02-13 devnull }

  91 ce94dbe6 2005-02-13 devnull 

  92 ce94dbe6 2005-02-13 devnull void

  93 ce94dbe6 2005-02-13 devnull threadmain(int argc, char **argv)

  94 ce94dbe6 2005-02-13 devnull {

  95 ce94dbe6 2005-02-13 devnull 	int fd, pid, export, dotextlist;

  96 e3331bf2 2005-03-18 devnull 	char dir[100], *ns;

  97 ce94dbe6 2005-02-13 devnull 	char sock[200], addr[200];

  98 ce94dbe6 2005-02-13 devnull 	uvlong x;

  99 ce94dbe6 2005-02-13 devnull 

 100 ce94dbe6 2005-02-13 devnull 	export = 0;

 101 ce94dbe6 2005-02-13 devnull 	dotextlist = 0;

 102 ce94dbe6 2005-02-13 devnull 	pid = getpid();

 103 ce94dbe6 2005-02-13 devnull 	fmtinstall('B', mpfmt);

 104 ce94dbe6 2005-02-13 devnull 	fmtinstall('H', encodefmt);

 105 ce94dbe6 2005-02-13 devnull 	fmtinstall('[', encodefmt);

 106 e1a22963 2005-02-13 devnull 

 107 ce94dbe6 2005-02-13 devnull 	ARGBEGIN{

 108 e1a22963 2005-02-13 devnull 	case '9':

 109 e1a22963 2005-02-13 devnull 		chatty9pclient++;

 110 e1a22963 2005-02-13 devnull 		break;

 111 ce94dbe6 2005-02-13 devnull 	case 'D':

 112 ce94dbe6 2005-02-13 devnull 		chatty++;

 113 ce94dbe6 2005-02-13 devnull 		break;

 114 ce94dbe6 2005-02-13 devnull 	case 'e':

 115 ce94dbe6 2005-02-13 devnull 		export = 1;

 116 ce94dbe6 2005-02-13 devnull 		break;

 117 ce94dbe6 2005-02-13 devnull 	case 'l':

 118 ce94dbe6 2005-02-13 devnull 		dotextlist = 1;

 119 ce94dbe6 2005-02-13 devnull 		break;

 120 ce94dbe6 2005-02-13 devnull 	default:

 121 ce94dbe6 2005-02-13 devnull 		usage();

 122 ce94dbe6 2005-02-13 devnull 	}ARGEND

 123 ce94dbe6 2005-02-13 devnull 	

 124 ce94dbe6 2005-02-13 devnull 	if(argc > 1)

 125 ce94dbe6 2005-02-13 devnull 		usage();

 126 ce94dbe6 2005-02-13 devnull 	if(argc == 1)

 127 ce94dbe6 2005-02-13 devnull 		factotum = argv[0];

 128 ce94dbe6 2005-02-13 devnull 		

 129 ce94dbe6 2005-02-13 devnull 	if(dotextlist)

 130 ce94dbe6 2005-02-13 devnull 		listkeystext();

 131 ce94dbe6 2005-02-13 devnull 

 132 e3331bf2 2005-03-18 devnull 	ns = getns();

 133 e3331bf2 2005-03-18 devnull 	snprint(sock, sizeof sock, "%s/ssh-agent.socket", ns);

 134 e3331bf2 2005-03-18 devnull 	if(0){

 135 e3331bf2 2005-03-18 devnull 		x = ((uvlong)fastrand()<<32) | fastrand();

 136 e3331bf2 2005-03-18 devnull 		x ^= ((uvlong)fastrand()<<32) | fastrand();

 137 e3331bf2 2005-03-18 devnull 		snprint(dir, sizeof dir, "/tmp/ssh-%llux", x);

 138 e3331bf2 2005-03-18 devnull 		if((fd = create(dir, OREAD, DMDIR|0700)) < 0)

 139 e3331bf2 2005-03-18 devnull 			sysfatal("mkdir %s: %r", dir);

 140 e3331bf2 2005-03-18 devnull 		close(fd);

 141 e3331bf2 2005-03-18 devnull 		snprint(sock, sizeof sock, "%s/agent.%d", dir, pid);

 142 e3331bf2 2005-03-18 devnull 	}

 143 ce94dbe6 2005-02-13 devnull 	snprint(addr, sizeof addr, "unix!%s", sock);

 144 ce94dbe6 2005-02-13 devnull 

 145 ce94dbe6 2005-02-13 devnull 	if((afd = announce(addr, adir)) < 0)

 146 ce94dbe6 2005-02-13 devnull 		sysfatal("announce %s: %r", addr);

 147 ce94dbe6 2005-02-13 devnull 	

 148 ce94dbe6 2005-02-13 devnull 	print("SSH_AUTH_SOCK=%s;\n", sock);

 149 ce94dbe6 2005-02-13 devnull 	if(export)

 150 ce94dbe6 2005-02-13 devnull 		print("export SSH_AUTH_SOCK;\n");

 151 ce94dbe6 2005-02-13 devnull 	print("SSH_AGENT_PID=%d;\n", pid);

 152 ce94dbe6 2005-02-13 devnull 	if(export)

 153 ce94dbe6 2005-02-13 devnull 		print("export SSH_AGENT_PID;\n");

 154 ce94dbe6 2005-02-13 devnull 	close(1);

 155 e1a22963 2005-02-13 devnull 	rfork(RFNOTEG);

 156 e1a22963 2005-02-13 devnull 	proccreate(listenproc, nil, STACK);

 157 ce94dbe6 2005-02-13 devnull 	threadexits(0);

 158 ce94dbe6 2005-02-13 devnull }

 159 ce94dbe6 2005-02-13 devnull 

 160 ce94dbe6 2005-02-13 devnull void

 161 ce94dbe6 2005-02-13 devnull listenproc(void *v)

 162 ce94dbe6 2005-02-13 devnull {

 163 ce94dbe6 2005-02-13 devnull 	Aconn *a;

 164 ce94dbe6 2005-02-13 devnull 

 165 ce94dbe6 2005-02-13 devnull 	USED(v);

 166 ce94dbe6 2005-02-13 devnull 	for(;;){

 167 ce94dbe6 2005-02-13 devnull 		a = emalloc(sizeof *a);

 168 ce94dbe6 2005-02-13 devnull 		a->ctl = listen(adir, a->dir);

 169 ce94dbe6 2005-02-13 devnull 		if(a->ctl < 0)

 170 ce94dbe6 2005-02-13 devnull 			sysfatal("listen: %r");

 171 ce94dbe6 2005-02-13 devnull 		proccreate(agentproc, a, STACK);

 172 ce94dbe6 2005-02-13 devnull 	}

 173 ce94dbe6 2005-02-13 devnull }

 174 ce94dbe6 2005-02-13 devnull 

 175 ce94dbe6 2005-02-13 devnull void

 176 ce94dbe6 2005-02-13 devnull agentproc(void *v)

 177 ce94dbe6 2005-02-13 devnull {

 178 ce94dbe6 2005-02-13 devnull 	Aconn *a;

 179 ce94dbe6 2005-02-13 devnull 	int n;

 180 ce94dbe6 2005-02-13 devnull 	

 181 ce94dbe6 2005-02-13 devnull 	a = v;

 182 ce94dbe6 2005-02-13 devnull 	a->fd = accept(a->ctl, a->dir);

 183 ce94dbe6 2005-02-13 devnull 	close(a->ctl);

 184 ce94dbe6 2005-02-13 devnull 	a->ctl = -1;

 185 ce94dbe6 2005-02-13 devnull 	for(;;){

 186 ce94dbe6 2005-02-13 devnull 		a->data = erealloc(a->data, a->ndata+1024);

 187 ce94dbe6 2005-02-13 devnull 		n = read(a->fd, a->data+a->ndata, 1024);

 188 ce94dbe6 2005-02-13 devnull 		if(n <= 0)

 189 ce94dbe6 2005-02-13 devnull 			break;

 190 ce94dbe6 2005-02-13 devnull 		a->ndata += n;

 191 ce94dbe6 2005-02-13 devnull 		while(runmsg(a))

 192 ce94dbe6 2005-02-13 devnull 			;

 193 ce94dbe6 2005-02-13 devnull 	}

 194 ce94dbe6 2005-02-13 devnull 	close(a->fd);

 195 ce94dbe6 2005-02-13 devnull 	free(a);

 196 ce94dbe6 2005-02-13 devnull 	threadexits(nil);

 197 ce94dbe6 2005-02-13 devnull }

 198 ce94dbe6 2005-02-13 devnull 

 199 ce94dbe6 2005-02-13 devnull int

 200 ce94dbe6 2005-02-13 devnull get1(Msg *m)

 201 ce94dbe6 2005-02-13 devnull {

 202 ce94dbe6 2005-02-13 devnull 	if(m->p >= m->ep)

 203 ce94dbe6 2005-02-13 devnull 		return 0;

 204 ce94dbe6 2005-02-13 devnull 	return *m->p++;

 205 ce94dbe6 2005-02-13 devnull }

 206 ce94dbe6 2005-02-13 devnull 

 207 ce94dbe6 2005-02-13 devnull int

 208 ce94dbe6 2005-02-13 devnull get2(Msg *m)

 209 ce94dbe6 2005-02-13 devnull {

 210 ce94dbe6 2005-02-13 devnull 	uint x;

 211 ce94dbe6 2005-02-13 devnull 	

 212 ce94dbe6 2005-02-13 devnull 	if(m->p+2 > m->ep)

 213 ce94dbe6 2005-02-13 devnull 		return 0;

 214 ce94dbe6 2005-02-13 devnull 	x = (m->p[0]<<8)|m->p[1];

 215 ce94dbe6 2005-02-13 devnull 	m->p += 2;

 216 ce94dbe6 2005-02-13 devnull 	return x;

 217 ce94dbe6 2005-02-13 devnull }

 218 ce94dbe6 2005-02-13 devnull 

 219 ce94dbe6 2005-02-13 devnull int

 220 ce94dbe6 2005-02-13 devnull get4(Msg *m)

 221 ce94dbe6 2005-02-13 devnull {

 222 ce94dbe6 2005-02-13 devnull 	uint x;

 223 ce94dbe6 2005-02-13 devnull 	if(m->p+4 > m->ep)

 224 ce94dbe6 2005-02-13 devnull 		return 0;

 225 ce94dbe6 2005-02-13 devnull 	x = (m->p[0]<<24)|(m->p[1]<<16)|(m->p[2]<<8)|m->p[3];

 226 ce94dbe6 2005-02-13 devnull 	m->p += 4;

 227 ce94dbe6 2005-02-13 devnull 	return x;

 228 ce94dbe6 2005-02-13 devnull }

 229 ce94dbe6 2005-02-13 devnull 

 230 ce94dbe6 2005-02-13 devnull uchar*

 231 ce94dbe6 2005-02-13 devnull getn(Msg *m, uint n)

 232 ce94dbe6 2005-02-13 devnull {

 233 ce94dbe6 2005-02-13 devnull 	uchar *p;

 234 ce94dbe6 2005-02-13 devnull 	

 235 ce94dbe6 2005-02-13 devnull 	if(m->p+n > m->ep)

 236 ce94dbe6 2005-02-13 devnull 		return nil;

 237 ce94dbe6 2005-02-13 devnull 	p = m->p;

 238 ce94dbe6 2005-02-13 devnull 	m->p += n;

 239 ce94dbe6 2005-02-13 devnull 	return p;

 240 ce94dbe6 2005-02-13 devnull }

 241 ce94dbe6 2005-02-13 devnull 

 242 ce94dbe6 2005-02-13 devnull char*

 243 ce94dbe6 2005-02-13 devnull getstr(Msg *m)

 244 ce94dbe6 2005-02-13 devnull {

 245 ce94dbe6 2005-02-13 devnull 	uint n;

 246 ce94dbe6 2005-02-13 devnull 	uchar *p;

 247 ce94dbe6 2005-02-13 devnull 

 248 ce94dbe6 2005-02-13 devnull 	n = get4(m);

 249 ce94dbe6 2005-02-13 devnull 	p = getn(m, n);

 250 ce94dbe6 2005-02-13 devnull 	if(p == nil)

 251 ce94dbe6 2005-02-13 devnull 		return nil;

 252 ce94dbe6 2005-02-13 devnull 	p--;

 253 ce94dbe6 2005-02-13 devnull 	memmove(p, p+1, n);

 254 ce94dbe6 2005-02-13 devnull 	p[n] = 0;

 255 1cab7105 2005-07-13 devnull 	return (char*)p;

 256 ce94dbe6 2005-02-13 devnull }

 257 ce94dbe6 2005-02-13 devnull 

 258 ce94dbe6 2005-02-13 devnull mpint*

 259 ce94dbe6 2005-02-13 devnull getmp(Msg *m)

 260 ce94dbe6 2005-02-13 devnull {

 261 ce94dbe6 2005-02-13 devnull 	int n;

 262 ce94dbe6 2005-02-13 devnull 	uchar *p;

 263 ce94dbe6 2005-02-13 devnull 	

 264 ce94dbe6 2005-02-13 devnull 	n = (get2(m)+7)/8;

 265 ce94dbe6 2005-02-13 devnull 	if((p=getn(m, n)) == nil)

 266 ce94dbe6 2005-02-13 devnull 		return nil;

 267 ce94dbe6 2005-02-13 devnull 	return betomp(p, n, nil);

 268 ce94dbe6 2005-02-13 devnull }

 269 ce94dbe6 2005-02-13 devnull 

 270 ce94dbe6 2005-02-13 devnull mpint*

 271 ce94dbe6 2005-02-13 devnull getmp2(Msg *m)

 272 ce94dbe6 2005-02-13 devnull {

 273 ce94dbe6 2005-02-13 devnull 	int n;

 274 ce94dbe6 2005-02-13 devnull 	uchar *p;

 275 ce94dbe6 2005-02-13 devnull 	

 276 ce94dbe6 2005-02-13 devnull 	n = get4(m);

 277 ce94dbe6 2005-02-13 devnull 	if((p = getn(m, n)) == nil)

 278 ce94dbe6 2005-02-13 devnull 		return nil;

 279 ce94dbe6 2005-02-13 devnull 	return betomp(p, n, nil);

 280 ce94dbe6 2005-02-13 devnull }

 281 ce94dbe6 2005-02-13 devnull 

 282 ce94dbe6 2005-02-13 devnull Msg*

 283 ce94dbe6 2005-02-13 devnull getm(Msg *m, Msg *mm)

 284 ce94dbe6 2005-02-13 devnull {

 285 ce94dbe6 2005-02-13 devnull 	uint n;

 286 ce94dbe6 2005-02-13 devnull 	uchar *p;

 287 ce94dbe6 2005-02-13 devnull 	

 288 ce94dbe6 2005-02-13 devnull 	n = get4(m);

 289 ce94dbe6 2005-02-13 devnull 	if((p = getn(m, n)) == nil)

 290 ce94dbe6 2005-02-13 devnull 		return nil;

 291 ce94dbe6 2005-02-13 devnull 	mm->bp = p;

 292 ce94dbe6 2005-02-13 devnull 	mm->p = p;

 293 ce94dbe6 2005-02-13 devnull 	mm->ep = p+n;

 294 ce94dbe6 2005-02-13 devnull 	return mm;

 295 ce94dbe6 2005-02-13 devnull }

 296 ce94dbe6 2005-02-13 devnull 

 297 ce94dbe6 2005-02-13 devnull uchar*

 298 ce94dbe6 2005-02-13 devnull ensure(Msg *m, int n)

 299 ce94dbe6 2005-02-13 devnull {

 300 ce94dbe6 2005-02-13 devnull 	int len, plen;

 301 ce94dbe6 2005-02-13 devnull 	uchar *p;

 302 ce94dbe6 2005-02-13 devnull 	

 303 ce94dbe6 2005-02-13 devnull 	len = m->ep - m->bp;

 304 ce94dbe6 2005-02-13 devnull 	if(m->p+n > m->ep){

 305 ce94dbe6 2005-02-13 devnull 		plen = m->p - m->bp;

 306 ce94dbe6 2005-02-13 devnull 		m->bp = erealloc(m->bp, len+n+1024);

 307 ce94dbe6 2005-02-13 devnull 		m->p = m->bp+plen;

 308 ce94dbe6 2005-02-13 devnull 		m->ep = m->bp+len+n+1024;

 309 ce94dbe6 2005-02-13 devnull 	}

 310 ce94dbe6 2005-02-13 devnull 	p = m->p;

 311 ce94dbe6 2005-02-13 devnull 	m->p += n;

 312 ce94dbe6 2005-02-13 devnull 	return p;

 313 ce94dbe6 2005-02-13 devnull }

 314 ce94dbe6 2005-02-13 devnull 

 315 ce94dbe6 2005-02-13 devnull void

 316 ce94dbe6 2005-02-13 devnull put4(Msg *m, uint n)

 317 ce94dbe6 2005-02-13 devnull {

 318 ce94dbe6 2005-02-13 devnull 	uchar *p;

 319 ce94dbe6 2005-02-13 devnull 	

 320 ce94dbe6 2005-02-13 devnull 	p = ensure(m, 4);

 321 ce94dbe6 2005-02-13 devnull 	p[0] = (n>>24)&0xFF;

 322 ce94dbe6 2005-02-13 devnull 	p[1] = (n>>16)&0xFF;

 323 ce94dbe6 2005-02-13 devnull 	p[2] = (n>>8)&0xFF;

 324 ce94dbe6 2005-02-13 devnull 	p[3] = n&0xFF;

 325 ce94dbe6 2005-02-13 devnull }

 326 ce94dbe6 2005-02-13 devnull 

 327 ce94dbe6 2005-02-13 devnull void

 328 ce94dbe6 2005-02-13 devnull put2(Msg *m, uint n)

 329 ce94dbe6 2005-02-13 devnull {

 330 ce94dbe6 2005-02-13 devnull 	uchar *p;

 331 ce94dbe6 2005-02-13 devnull 	

 332 ce94dbe6 2005-02-13 devnull 	p = ensure(m, 2);

 333 ce94dbe6 2005-02-13 devnull 	p[0] = (n>>8)&0xFF;

 334 ce94dbe6 2005-02-13 devnull 	p[1] = n&0xFF;

 335 ce94dbe6 2005-02-13 devnull }

 336 ce94dbe6 2005-02-13 devnull 

 337 ce94dbe6 2005-02-13 devnull void

 338 ce94dbe6 2005-02-13 devnull put1(Msg *m, uint n)

 339 ce94dbe6 2005-02-13 devnull {

 340 ce94dbe6 2005-02-13 devnull 	uchar *p;

 341 ce94dbe6 2005-02-13 devnull 	

 342 ce94dbe6 2005-02-13 devnull 	p = ensure(m, 1);

 343 ce94dbe6 2005-02-13 devnull 	p[0] = n&0xFF;

 344 ce94dbe6 2005-02-13 devnull }

 345 ce94dbe6 2005-02-13 devnull 

 346 ce94dbe6 2005-02-13 devnull void

 347 ce94dbe6 2005-02-13 devnull putn(Msg *m, void *a, uint n)

 348 ce94dbe6 2005-02-13 devnull {

 349 ce94dbe6 2005-02-13 devnull 	uchar *p;

 350 ce94dbe6 2005-02-13 devnull 	

 351 ce94dbe6 2005-02-13 devnull 	p = ensure(m, n);

 352 ce94dbe6 2005-02-13 devnull 	memmove(p, a, n);

 353 ce94dbe6 2005-02-13 devnull }

 354 ce94dbe6 2005-02-13 devnull 

 355 ce94dbe6 2005-02-13 devnull void

 356 ce94dbe6 2005-02-13 devnull putmp(Msg *m, mpint *b)

 357 ce94dbe6 2005-02-13 devnull {

 358 ce94dbe6 2005-02-13 devnull 	int bits, n;

 359 ce94dbe6 2005-02-13 devnull 	uchar *p;

 360 ce94dbe6 2005-02-13 devnull 	

 361 ce94dbe6 2005-02-13 devnull 	bits = mpsignif(b);

 362 ce94dbe6 2005-02-13 devnull 	put2(m, bits);

 363 ce94dbe6 2005-02-13 devnull 	n = (bits+7)/8;

 364 ce94dbe6 2005-02-13 devnull 	p = ensure(m, n);

 365 ce94dbe6 2005-02-13 devnull 	mptobe(b, p, n, nil);

 366 ce94dbe6 2005-02-13 devnull }

 367 ce94dbe6 2005-02-13 devnull 

 368 ce94dbe6 2005-02-13 devnull void

 369 ce94dbe6 2005-02-13 devnull putmp2(Msg *m, mpint *b)

 370 ce94dbe6 2005-02-13 devnull {

 371 ce94dbe6 2005-02-13 devnull 	int bits, n;

 372 ce94dbe6 2005-02-13 devnull 	uchar *p;

 373 ce94dbe6 2005-02-13 devnull 	

 374 ce94dbe6 2005-02-13 devnull 	if(mpcmp(b, mpzero) == 0){

 375 ce94dbe6 2005-02-13 devnull 		put4(m, 0);

 376 ce94dbe6 2005-02-13 devnull 		return;

 377 ce94dbe6 2005-02-13 devnull 	}

 378 ce94dbe6 2005-02-13 devnull 	bits = mpsignif(b);

 379 ce94dbe6 2005-02-13 devnull 	n = (bits+7)/8;

 380 ce94dbe6 2005-02-13 devnull 	if(bits%8 == 0){

 381 ce94dbe6 2005-02-13 devnull 		put4(m, n+1);

 382 ce94dbe6 2005-02-13 devnull 		put1(m, 0);

 383 ce94dbe6 2005-02-13 devnull 	}else

 384 ce94dbe6 2005-02-13 devnull 		put4(m, n);

 385 ce94dbe6 2005-02-13 devnull 	p = ensure(m, n);

 386 ce94dbe6 2005-02-13 devnull 	mptobe(b, p, n, nil);

 387 ce94dbe6 2005-02-13 devnull }

 388 ce94dbe6 2005-02-13 devnull 

 389 ce94dbe6 2005-02-13 devnull void

 390 ce94dbe6 2005-02-13 devnull putstr(Msg *m, char *s)

 391 ce94dbe6 2005-02-13 devnull {

 392 ce94dbe6 2005-02-13 devnull 	int n;

 393 ce94dbe6 2005-02-13 devnull 	

 394 ce94dbe6 2005-02-13 devnull 	n = strlen(s);

 395 ce94dbe6 2005-02-13 devnull 	put4(m, n);

 396 ce94dbe6 2005-02-13 devnull 	putn(m, s, n);

 397 ce94dbe6 2005-02-13 devnull }

 398 ce94dbe6 2005-02-13 devnull 

 399 ce94dbe6 2005-02-13 devnull void

 400 ce94dbe6 2005-02-13 devnull putm(Msg *m, Msg *mm)

 401 ce94dbe6 2005-02-13 devnull {

 402 ce94dbe6 2005-02-13 devnull 	uint n;

 403 ce94dbe6 2005-02-13 devnull 	

 404 ce94dbe6 2005-02-13 devnull 	n = mm->p - mm->bp;

 405 ce94dbe6 2005-02-13 devnull 	put4(m, n);

 406 ce94dbe6 2005-02-13 devnull 	putn(m, mm->bp, n);

 407 ce94dbe6 2005-02-13 devnull }

 408 ce94dbe6 2005-02-13 devnull 

 409 ce94dbe6 2005-02-13 devnull void

 410 ce94dbe6 2005-02-13 devnull newmsg(Msg *m)

 411 ce94dbe6 2005-02-13 devnull {

 412 ce94dbe6 2005-02-13 devnull 	memset(m, 0, sizeof *m);

 413 ce94dbe6 2005-02-13 devnull }

 414 ce94dbe6 2005-02-13 devnull 

 415 ce94dbe6 2005-02-13 devnull void

 416 ce94dbe6 2005-02-13 devnull newreply(Msg *m, int type)

 417 ce94dbe6 2005-02-13 devnull {

 418 ce94dbe6 2005-02-13 devnull 	memset(m, 0, sizeof *m);

 419 ce94dbe6 2005-02-13 devnull 	put4(m, 0);

 420 ce94dbe6 2005-02-13 devnull 	put1(m, type);

 421 ce94dbe6 2005-02-13 devnull }

 422 ce94dbe6 2005-02-13 devnull 

 423 ce94dbe6 2005-02-13 devnull void

 424 ce94dbe6 2005-02-13 devnull reply(Aconn *a, Msg *m)

 425 ce94dbe6 2005-02-13 devnull {

 426 ce94dbe6 2005-02-13 devnull 	uint n;

 427 ce94dbe6 2005-02-13 devnull 	uchar *p;

 428 ce94dbe6 2005-02-13 devnull 	

 429 ce94dbe6 2005-02-13 devnull 	n = (m->p - m->bp) - 4;

 430 ce94dbe6 2005-02-13 devnull 	p = m->bp;

 431 ce94dbe6 2005-02-13 devnull 	p[0] = (n>>24)&0xFF;

 432 ce94dbe6 2005-02-13 devnull 	p[1] = (n>>16)&0xFF;

 433 ce94dbe6 2005-02-13 devnull 	p[2] = (n>>8)&0xFF;

 434 ce94dbe6 2005-02-13 devnull 	p[3] = n&0xFF;

 435 ce94dbe6 2005-02-13 devnull 	if(chatty)

 436 ce94dbe6 2005-02-13 devnull 		fprint(2, "respond %d: %.*H\n", p[4], n, m->bp+4);

 437 ce94dbe6 2005-02-13 devnull 	write(a->fd, p, n+4);

 438 ce94dbe6 2005-02-13 devnull 	free(p);

 439 ce94dbe6 2005-02-13 devnull 	memset(m, 0, sizeof *m);

 440 ce94dbe6 2005-02-13 devnull }

 441 ce94dbe6 2005-02-13 devnull 

 442 ce94dbe6 2005-02-13 devnull typedef struct Key Key;

 443 ce94dbe6 2005-02-13 devnull struct Key

 444 ce94dbe6 2005-02-13 devnull {

 445 ce94dbe6 2005-02-13 devnull 	mpint *mod;

 446 ce94dbe6 2005-02-13 devnull 	mpint *ek;

 447 ce94dbe6 2005-02-13 devnull 	char *comment;

 448 ce94dbe6 2005-02-13 devnull };

 449 ce94dbe6 2005-02-13 devnull 

 450 ce94dbe6 2005-02-13 devnull static char*

 451 ce94dbe6 2005-02-13 devnull find(char **f, int nf, char *k)

 452 ce94dbe6 2005-02-13 devnull {

 453 ce94dbe6 2005-02-13 devnull 	int i, len;

 454 ce94dbe6 2005-02-13 devnull 

 455 ce94dbe6 2005-02-13 devnull 	len = strlen(k);

 456 ce94dbe6 2005-02-13 devnull 	for(i=1; i<nf; i++)	/* i=1: f[0] is "key" */

 457 ce94dbe6 2005-02-13 devnull 		if(strncmp(f[i], k, len) == 0 && f[i][len] == '=')

 458 ce94dbe6 2005-02-13 devnull 			return f[i]+len+1;

 459 ce94dbe6 2005-02-13 devnull 	return nil;

 460 ce94dbe6 2005-02-13 devnull }

 461 ce94dbe6 2005-02-13 devnull 

 462 ce94dbe6 2005-02-13 devnull static int

 463 ce94dbe6 2005-02-13 devnull putrsa1(Msg *m, char **f, int nf)

 464 ce94dbe6 2005-02-13 devnull {

 465 ce94dbe6 2005-02-13 devnull 	char *p;

 466 ce94dbe6 2005-02-13 devnull 	mpint *mod, *ek;

 467 ce94dbe6 2005-02-13 devnull 

 468 ce94dbe6 2005-02-13 devnull 	p = find(f, nf, "n");

 469 ce94dbe6 2005-02-13 devnull 	if(p == nil || (mod = strtomp(p, nil, 16, nil)) == nil)

 470 ce94dbe6 2005-02-13 devnull 		return -1;

 471 ce94dbe6 2005-02-13 devnull 	p = find(f, nf, "ek");

 472 ce94dbe6 2005-02-13 devnull 	if(p == nil || (ek = strtomp(p, nil, 16, nil)) == nil){

 473 ce94dbe6 2005-02-13 devnull 		mpfree(mod);

 474 ce94dbe6 2005-02-13 devnull 		return -1;

 475 ce94dbe6 2005-02-13 devnull 	}

 476 ce94dbe6 2005-02-13 devnull 	p = find(f, nf, "comment");

 477 ce94dbe6 2005-02-13 devnull 	if(p == nil)

 478 ce94dbe6 2005-02-13 devnull 		p = "";

 479 ce94dbe6 2005-02-13 devnull 	put4(m, mpsignif(mod));

 480 ce94dbe6 2005-02-13 devnull 	putmp(m, ek);

 481 ce94dbe6 2005-02-13 devnull 	putmp(m, mod);

 482 ce94dbe6 2005-02-13 devnull 	putstr(m, p);

 483 ce94dbe6 2005-02-13 devnull 	mpfree(mod);

 484 ce94dbe6 2005-02-13 devnull 	mpfree(ek);

 485 ce94dbe6 2005-02-13 devnull 	return 0;

 486 ce94dbe6 2005-02-13 devnull }

 487 ce94dbe6 2005-02-13 devnull 

 488 ce94dbe6 2005-02-13 devnull void

 489 ce94dbe6 2005-02-13 devnull printattr(char **f, int nf)

 490 ce94dbe6 2005-02-13 devnull {

 491 ce94dbe6 2005-02-13 devnull 	int i;

 492 ce94dbe6 2005-02-13 devnull 	

 493 ce94dbe6 2005-02-13 devnull 	print("#");

 494 ce94dbe6 2005-02-13 devnull 	for(i=0; i<nf; i++)

 495 ce94dbe6 2005-02-13 devnull 		print(" %s", f[i]);

 496 ce94dbe6 2005-02-13 devnull 	print("\n");

 497 ce94dbe6 2005-02-13 devnull }

 498 ce94dbe6 2005-02-13 devnull 

 499 ce94dbe6 2005-02-13 devnull void

 500 ce94dbe6 2005-02-13 devnull printrsa1(char **f, int nf)

 501 ce94dbe6 2005-02-13 devnull {

 502 ce94dbe6 2005-02-13 devnull 	char *p;

 503 ce94dbe6 2005-02-13 devnull 	mpint *mod, *ek;

 504 ce94dbe6 2005-02-13 devnull 

 505 ce94dbe6 2005-02-13 devnull 	p = find(f, nf, "n");

 506 ce94dbe6 2005-02-13 devnull 	if(p == nil || (mod = strtomp(p, nil, 16, nil)) == nil)

 507 ce94dbe6 2005-02-13 devnull 		return;

 508 ce94dbe6 2005-02-13 devnull 	p = find(f, nf, "ek");

 509 ce94dbe6 2005-02-13 devnull 	if(p == nil || (ek = strtomp(p, nil, 16, nil)) == nil){

 510 ce94dbe6 2005-02-13 devnull 		mpfree(mod);

 511 ce94dbe6 2005-02-13 devnull 		return;

 512 ce94dbe6 2005-02-13 devnull 	}

 513 ce94dbe6 2005-02-13 devnull 	p = find(f, nf, "comment");

 514 ce94dbe6 2005-02-13 devnull 	if(p == nil)

 515 ce94dbe6 2005-02-13 devnull 		p = "";

 516 ce94dbe6 2005-02-13 devnull 

 517 ce94dbe6 2005-02-13 devnull 	if(chatty)

 518 ce94dbe6 2005-02-13 devnull 		printattr(f, nf);

 519 ce94dbe6 2005-02-13 devnull 	print("%d %.10B %.10B %s\n", mpsignif(mod), ek, mod, p);

 520 ce94dbe6 2005-02-13 devnull 	mpfree(ek);

 521 ce94dbe6 2005-02-13 devnull 	mpfree(mod);

 522 ce94dbe6 2005-02-13 devnull }

 523 ce94dbe6 2005-02-13 devnull 

 524 ce94dbe6 2005-02-13 devnull static int

 525 ce94dbe6 2005-02-13 devnull putrsa(Msg *m, char **f, int nf)

 526 ce94dbe6 2005-02-13 devnull {

 527 ce94dbe6 2005-02-13 devnull 	char *p;

 528 ce94dbe6 2005-02-13 devnull 	mpint *mod, *ek;

 529 ce94dbe6 2005-02-13 devnull 

 530 ce94dbe6 2005-02-13 devnull 	p = find(f, nf, "n");

 531 ce94dbe6 2005-02-13 devnull 	if(p == nil || (mod = strtomp(p, nil, 16, nil)) == nil)

 532 ce94dbe6 2005-02-13 devnull 		return -1;

 533 ce94dbe6 2005-02-13 devnull 	p = find(f, nf, "ek");

 534 ce94dbe6 2005-02-13 devnull 	if(p == nil || (ek = strtomp(p, nil, 16, nil)) == nil){

 535 ce94dbe6 2005-02-13 devnull 		mpfree(mod);

 536 ce94dbe6 2005-02-13 devnull 		return -1;

 537 ce94dbe6 2005-02-13 devnull 	}

 538 ce94dbe6 2005-02-13 devnull 	putstr(m, "ssh-rsa");

 539 ce94dbe6 2005-02-13 devnull 	putmp2(m, ek);

 540 ce94dbe6 2005-02-13 devnull 	putmp2(m, mod);

 541 ce94dbe6 2005-02-13 devnull 	mpfree(ek);

 542 ce94dbe6 2005-02-13 devnull 	mpfree(mod);

 543 ce94dbe6 2005-02-13 devnull 	return 0;

 544 ce94dbe6 2005-02-13 devnull }

 545 ce94dbe6 2005-02-13 devnull 

 546 ce94dbe6 2005-02-13 devnull RSApub*

 547 ce94dbe6 2005-02-13 devnull getrsapub(Msg *m)

 548 ce94dbe6 2005-02-13 devnull {

 549 ce94dbe6 2005-02-13 devnull 	RSApub *k;

 550 ce94dbe6 2005-02-13 devnull 	

 551 ce94dbe6 2005-02-13 devnull 	k = rsapuballoc();

 552 ce94dbe6 2005-02-13 devnull 	if(k == nil)

 553 ce94dbe6 2005-02-13 devnull 		return nil;

 554 ce94dbe6 2005-02-13 devnull 	k->ek = getmp2(m);

 555 ce94dbe6 2005-02-13 devnull 	k->n = getmp2(m);

 556 ce94dbe6 2005-02-13 devnull 	if(k->ek == nil || k->n == nil){

 557 ce94dbe6 2005-02-13 devnull 		rsapubfree(k);

 558 ce94dbe6 2005-02-13 devnull 		return nil;

 559 ce94dbe6 2005-02-13 devnull 	}

 560 ce94dbe6 2005-02-13 devnull 	return k;

 561 ce94dbe6 2005-02-13 devnull }

 562 ce94dbe6 2005-02-13 devnull 

 563 ce94dbe6 2005-02-13 devnull static int

 564 ce94dbe6 2005-02-13 devnull putdsa(Msg *m, char **f, int nf)

 565 ce94dbe6 2005-02-13 devnull {

 566 ce94dbe6 2005-02-13 devnull 	char *p;

 567 ce94dbe6 2005-02-13 devnull 	int ret;

 568 ce94dbe6 2005-02-13 devnull 	mpint *dp, *dq, *dalpha, *dkey;

 569 ce94dbe6 2005-02-13 devnull 

 570 ce94dbe6 2005-02-13 devnull 	ret = -1;

 571 ce94dbe6 2005-02-13 devnull 	dp = dq = dalpha = dkey = nil;

 572 ce94dbe6 2005-02-13 devnull 	p = find(f, nf, "p");

 573 ce94dbe6 2005-02-13 devnull 	if(p == nil || (dp = strtomp(p, nil, 16, nil)) == nil)

 574 ce94dbe6 2005-02-13 devnull 		goto out;

 575 ce94dbe6 2005-02-13 devnull 	p = find(f, nf, "q");

 576 ce94dbe6 2005-02-13 devnull 	if(p == nil || (dq = strtomp(p, nil, 16, nil)) == nil)

 577 ce94dbe6 2005-02-13 devnull 		goto out;

 578 ce94dbe6 2005-02-13 devnull 	p = find(f, nf, "alpha");

 579 ce94dbe6 2005-02-13 devnull 	if(p == nil || (dalpha = strtomp(p, nil, 16, nil)) == nil)

 580 ce94dbe6 2005-02-13 devnull 		goto out;

 581 ce94dbe6 2005-02-13 devnull 	p = find(f, nf, "key");

 582 ce94dbe6 2005-02-13 devnull 	if(p == nil || (dkey = strtomp(p, nil, 16, nil)) == nil)

 583 ce94dbe6 2005-02-13 devnull 		goto out;

 584 ce94dbe6 2005-02-13 devnull 	putstr(m, "ssh-dss");

 585 ce94dbe6 2005-02-13 devnull 	putmp2(m, dp);

 586 ce94dbe6 2005-02-13 devnull 	putmp2(m, dq);

 587 ce94dbe6 2005-02-13 devnull 	putmp2(m, dalpha);

 588 ce94dbe6 2005-02-13 devnull 	putmp2(m, dkey);

 589 ce94dbe6 2005-02-13 devnull 	ret = 0;

 590 ce94dbe6 2005-02-13 devnull out:

 591 ce94dbe6 2005-02-13 devnull 	mpfree(dp);

 592 ce94dbe6 2005-02-13 devnull 	mpfree(dq);

 593 ce94dbe6 2005-02-13 devnull 	mpfree(dalpha);

 594 ce94dbe6 2005-02-13 devnull 	mpfree(dkey);

 595 ce94dbe6 2005-02-13 devnull 	return ret;

 596 ce94dbe6 2005-02-13 devnull }

 597 ce94dbe6 2005-02-13 devnull 

 598 ce94dbe6 2005-02-13 devnull static int

 599 ce94dbe6 2005-02-13 devnull putkey2(Msg *m, int (*put)(Msg*,char**,int), char **f, int nf)

 600 ce94dbe6 2005-02-13 devnull {

 601 ce94dbe6 2005-02-13 devnull 	char *p;

 602 ce94dbe6 2005-02-13 devnull 	Msg mm;

 603 ce94dbe6 2005-02-13 devnull 	

 604 ce94dbe6 2005-02-13 devnull 	newmsg(&mm);

 605 ce94dbe6 2005-02-13 devnull 	if(put(&mm, f, nf) < 0)

 606 ce94dbe6 2005-02-13 devnull 		return -1;

 607 ce94dbe6 2005-02-13 devnull 	putm(m, &mm);

 608 ce94dbe6 2005-02-13 devnull 	free(mm.bp);

 609 ce94dbe6 2005-02-13 devnull 	p = find(f, nf, "comment");

 610 ce94dbe6 2005-02-13 devnull 	if(p == nil)

 611 ce94dbe6 2005-02-13 devnull 		p = "";

 612 ce94dbe6 2005-02-13 devnull 	putstr(m, p);

 613 ce94dbe6 2005-02-13 devnull 	return 0;

 614 ce94dbe6 2005-02-13 devnull }

 615 ce94dbe6 2005-02-13 devnull 

 616 ce94dbe6 2005-02-13 devnull static int

 617 ce94dbe6 2005-02-13 devnull printkey(char *type, int (*put)(Msg*,char**,int), char **f, int nf)

 618 ce94dbe6 2005-02-13 devnull {

 619 ce94dbe6 2005-02-13 devnull 	Msg m;

 620 ce94dbe6 2005-02-13 devnull 	char *p;

 621 ce94dbe6 2005-02-13 devnull 	

 622 ce94dbe6 2005-02-13 devnull 	newmsg(&m);

 623 ce94dbe6 2005-02-13 devnull 	if(put(&m, f, nf) < 0)

 624 ce94dbe6 2005-02-13 devnull 		return -1;

 625 ce94dbe6 2005-02-13 devnull 	p = find(f, nf, "comment");

 626 ce94dbe6 2005-02-13 devnull 	if(p == nil)

 627 ce94dbe6 2005-02-13 devnull 		p = "";

 628 ce94dbe6 2005-02-13 devnull 	if(chatty)

 629 ce94dbe6 2005-02-13 devnull 		printattr(f, nf);

 630 ce94dbe6 2005-02-13 devnull 	print("%s %.*[ %s\n", type, m.p-m.bp, m.bp, p);

 631 ce94dbe6 2005-02-13 devnull 	free(m.bp);

 632 ce94dbe6 2005-02-13 devnull 	return 0;

 633 ce94dbe6 2005-02-13 devnull }

 634 ce94dbe6 2005-02-13 devnull 

 635 ce94dbe6 2005-02-13 devnull DSApub*

 636 ce94dbe6 2005-02-13 devnull getdsapub(Msg *m)

 637 ce94dbe6 2005-02-13 devnull {

 638 ce94dbe6 2005-02-13 devnull 	DSApub *k;

 639 ce94dbe6 2005-02-13 devnull 	

 640 ce94dbe6 2005-02-13 devnull 	k = dsapuballoc();

 641 ce94dbe6 2005-02-13 devnull 	if(k == nil)

 642 ce94dbe6 2005-02-13 devnull 		return nil;

 643 ce94dbe6 2005-02-13 devnull 	k->p = getmp2(m);

 644 ce94dbe6 2005-02-13 devnull 	k->q = getmp2(m);

 645 ce94dbe6 2005-02-13 devnull 	k->alpha = getmp2(m);

 646 ce94dbe6 2005-02-13 devnull 	k->key = getmp2(m);

 647 ce94dbe6 2005-02-13 devnull 	if(!k->p || !k->q || !k->alpha || !k->key){

 648 ce94dbe6 2005-02-13 devnull 		dsapubfree(k);

 649 ce94dbe6 2005-02-13 devnull 		return nil;

 650 ce94dbe6 2005-02-13 devnull 	}

 651 ce94dbe6 2005-02-13 devnull 	return k;

 652 ce94dbe6 2005-02-13 devnull }

 653 ce94dbe6 2005-02-13 devnull 

 654 ce94dbe6 2005-02-13 devnull static int

 655 ce94dbe6 2005-02-13 devnull listkeys(Msg *m, int version)

 656 ce94dbe6 2005-02-13 devnull {

 657 ce94dbe6 2005-02-13 devnull 	char buf[8192+1], *line[100], *f[20], *p, *s;

 658 ce94dbe6 2005-02-13 devnull 	uchar *pnk;

 659 ce94dbe6 2005-02-13 devnull 	int i, n, nl, nf, nk;

 660 ce94dbe6 2005-02-13 devnull 	CFid *fid;

 661 ce94dbe6 2005-02-13 devnull 

 662 ce94dbe6 2005-02-13 devnull 	nk = 0;

 663 ce94dbe6 2005-02-13 devnull 	pnk = m->p;

 664 ce94dbe6 2005-02-13 devnull 	put4(m, 0);

 665 e1a22963 2005-02-13 devnull 	if((fid = nsopen(factotum, nil, "ctl", OREAD)) == nil){

 666 ce94dbe6 2005-02-13 devnull 		fprint(2, "ssh-agent: open factotum: %r\n");

 667 ce94dbe6 2005-02-13 devnull 		return -1;

 668 ce94dbe6 2005-02-13 devnull 	}

 669 ce94dbe6 2005-02-13 devnull 	for(;;){

 670 ce94dbe6 2005-02-13 devnull 		if((n = fsread(fid, buf, sizeof buf-1)) <= 0)

 671 ce94dbe6 2005-02-13 devnull 			break;

 672 ce94dbe6 2005-02-13 devnull 		buf[n] = 0;

 673 ce94dbe6 2005-02-13 devnull 		nl = getfields(buf, line, nelem(line), 1, "\n");

 674 ce94dbe6 2005-02-13 devnull 		for(i=0; i<nl; i++){

 675 ce94dbe6 2005-02-13 devnull 			nf = tokenize(line[i], f, nelem(f));

 676 ce94dbe6 2005-02-13 devnull 			if(nf == 0 || strcmp(f[0], "key") != 0)

 677 ce94dbe6 2005-02-13 devnull 				continue;

 678 ce94dbe6 2005-02-13 devnull 			p = find(f, nf, "proto");

 679 ce94dbe6 2005-02-13 devnull 			if(p == nil)

 680 ce94dbe6 2005-02-13 devnull 				continue;

 681 ce94dbe6 2005-02-13 devnull 			s = find(f, nf, "service");

 682 ce94dbe6 2005-02-13 devnull 			if(s == nil)

 683 ce94dbe6 2005-02-13 devnull 				continue;

 684 ce94dbe6 2005-02-13 devnull 

 685 ce94dbe6 2005-02-13 devnull 			if(version == 1 && strcmp(p, "rsa") == 0 && strcmp(s, "ssh") == 0)

 686 ce94dbe6 2005-02-13 devnull 				if(putrsa1(m, f, nf) >= 0)

 687 ce94dbe6 2005-02-13 devnull 					nk++;

 688 ce94dbe6 2005-02-13 devnull 			if(version == 2 && strcmp(p, "rsa") == 0 && strcmp(s, "ssh-rsa") == 0)

 689 ce94dbe6 2005-02-13 devnull 				if(putkey2(m, putrsa, f, nf) >= 0)

 690 ce94dbe6 2005-02-13 devnull 					nk++;

 691 ce94dbe6 2005-02-13 devnull 			if(version == 2 && strcmp(p, "dsa") == 0 && strcmp(s, "ssh-dss") == 0)

 692 ce94dbe6 2005-02-13 devnull 				if(putkey2(m, putdsa, f, nf) >= 0)

 693 ce94dbe6 2005-02-13 devnull 					nk++;

 694 ce94dbe6 2005-02-13 devnull 		}

 695 ce94dbe6 2005-02-13 devnull 	}

 696 ce94dbe6 2005-02-13 devnull 	fsclose(fid);

 697 ce94dbe6 2005-02-13 devnull 	pnk[0] = (nk>>24)&0xFF;

 698 ce94dbe6 2005-02-13 devnull 	pnk[1] = (nk>>16)&0xFF;

 699 ce94dbe6 2005-02-13 devnull 	pnk[2] = (nk>>8)&0xFF;

 700 ce94dbe6 2005-02-13 devnull 	pnk[3] = nk&0xFF;

 701 ce94dbe6 2005-02-13 devnull 	return nk;

 702 ce94dbe6 2005-02-13 devnull }

 703 ce94dbe6 2005-02-13 devnull 

 704 ce94dbe6 2005-02-13 devnull void

 705 ce94dbe6 2005-02-13 devnull listkeystext(void)

 706 ce94dbe6 2005-02-13 devnull {

 707 ce94dbe6 2005-02-13 devnull 	char buf[4096+1], *line[100], *f[20], *p, *s;

 708 ce94dbe6 2005-02-13 devnull 	int i, n, nl, nf;

 709 ce94dbe6 2005-02-13 devnull 	CFid *fid;

 710 ce94dbe6 2005-02-13 devnull 

 711 ce94dbe6 2005-02-13 devnull 	if((fid = nsopen(factotum, nil, "ctl", OREAD)) == nil){

 712 ce94dbe6 2005-02-13 devnull 		fprint(2, "ssh-agent: open factotum: %r\n");

 713 ce94dbe6 2005-02-13 devnull 		return;

 714 ce94dbe6 2005-02-13 devnull 	}

 715 ce94dbe6 2005-02-13 devnull 	for(;;){

 716 ce94dbe6 2005-02-13 devnull 		if((n = fsread(fid, buf, sizeof buf-1)) <= 0)

 717 ce94dbe6 2005-02-13 devnull 			break;

 718 ce94dbe6 2005-02-13 devnull 		buf[n] = 0;

 719 ce94dbe6 2005-02-13 devnull 		nl = getfields(buf, line, nelem(line), 1, "\n");

 720 ce94dbe6 2005-02-13 devnull 		for(i=0; i<nl; i++){

 721 ce94dbe6 2005-02-13 devnull 			nf = tokenize(line[i], f, nelem(f));

 722 ce94dbe6 2005-02-13 devnull 			if(nf == 0 || strcmp(f[0], "key") != 0)

 723 ce94dbe6 2005-02-13 devnull 				continue;

 724 ce94dbe6 2005-02-13 devnull 			p = find(f, nf, "proto");

 725 ce94dbe6 2005-02-13 devnull 			if(p == nil)

 726 ce94dbe6 2005-02-13 devnull 				continue;

 727 ce94dbe6 2005-02-13 devnull 			s = find(f, nf, "service");

 728 ce94dbe6 2005-02-13 devnull 			if(s == nil)

 729 ce94dbe6 2005-02-13 devnull 				continue;

 730 ce94dbe6 2005-02-13 devnull 

 731 ce94dbe6 2005-02-13 devnull 			if(strcmp(p, "rsa") == 0 && strcmp(s, "ssh") == 0)

 732 ce94dbe6 2005-02-13 devnull 				printrsa1(f, nf);

 733 ce94dbe6 2005-02-13 devnull 			if(strcmp(p, "rsa") == 0 && strcmp(s, "ssh-rsa") == 0)

 734 ce94dbe6 2005-02-13 devnull 				printkey("ssh-rsa", putrsa, f, nf);

 735 ce94dbe6 2005-02-13 devnull 			if(strcmp(p, "dsa") == 0 && strcmp(s, "ssh-dss") == 0)

 736 ce94dbe6 2005-02-13 devnull 				printkey("ssh-dss", putdsa, f, nf);

 737 ce94dbe6 2005-02-13 devnull 		}

 738 ce94dbe6 2005-02-13 devnull 	}

 739 ce94dbe6 2005-02-13 devnull 	fsclose(fid);

 740 ce94dbe6 2005-02-13 devnull 	threadexitsall(nil);

 741 ce94dbe6 2005-02-13 devnull }

 742 ce94dbe6 2005-02-13 devnull 

 743 ce94dbe6 2005-02-13 devnull mpint*

 744 ce94dbe6 2005-02-13 devnull rsaunpad(mpint *b)

 745 ce94dbe6 2005-02-13 devnull {

 746 ce94dbe6 2005-02-13 devnull 	int i, n;

 747 ce94dbe6 2005-02-13 devnull 	uchar buf[2560];

 748 ce94dbe6 2005-02-13 devnull 

 749 ce94dbe6 2005-02-13 devnull 	n = (mpsignif(b)+7)/8;

 750 ce94dbe6 2005-02-13 devnull 	if(n > sizeof buf){

 751 ce94dbe6 2005-02-13 devnull 		werrstr("rsaunpad: too big");

 752 ce94dbe6 2005-02-13 devnull 		return nil;

 753 ce94dbe6 2005-02-13 devnull 	}

 754 ce94dbe6 2005-02-13 devnull 	mptobe(b, buf, n, nil);

 755 ce94dbe6 2005-02-13 devnull 

 756 ce94dbe6 2005-02-13 devnull 	/* the initial zero has been eaten by the betomp -> mptobe sequence */

 757 ce94dbe6 2005-02-13 devnull 	if(buf[0] != 2){

 758 ce94dbe6 2005-02-13 devnull 		werrstr("rsaunpad: expected leading 2");

 759 ce94dbe6 2005-02-13 devnull 		return nil;

 760 ce94dbe6 2005-02-13 devnull 	}

 761 ce94dbe6 2005-02-13 devnull 	for(i=1; i<n; i++)

 762 ce94dbe6 2005-02-13 devnull 		if(buf[i]==0)

 763 ce94dbe6 2005-02-13 devnull 			break;

 764 ce94dbe6 2005-02-13 devnull 	return betomp(buf+i, n-i, nil);

 765 ce94dbe6 2005-02-13 devnull }

 766 ce94dbe6 2005-02-13 devnull 

 767 ce94dbe6 2005-02-13 devnull void

 768 ce94dbe6 2005-02-13 devnull mptoberjust(mpint *b, uchar *buf, int len)

 769 ce94dbe6 2005-02-13 devnull {

 770 ce94dbe6 2005-02-13 devnull 	int n;

 771 ce94dbe6 2005-02-13 devnull 

 772 ce94dbe6 2005-02-13 devnull 	n = mptobe(b, buf, len, nil);

 773 ce94dbe6 2005-02-13 devnull 	assert(n >= 0);

 774 ce94dbe6 2005-02-13 devnull 	if(n < len){

 775 ce94dbe6 2005-02-13 devnull 		len -= n;

 776 ce94dbe6 2005-02-13 devnull 		memmove(buf+len, buf, n);

 777 ce94dbe6 2005-02-13 devnull 		memset(buf, 0, len);

 778 ce94dbe6 2005-02-13 devnull 	}

 779 ce94dbe6 2005-02-13 devnull }

 780 ce94dbe6 2005-02-13 devnull 

 781 ce94dbe6 2005-02-13 devnull static int

 782 ce94dbe6 2005-02-13 devnull dorsa(Aconn *a, mpint *mod, mpint *exp, mpint *chal, uchar chalbuf[32])

 783 ce94dbe6 2005-02-13 devnull {

 784 ce94dbe6 2005-02-13 devnull 	AuthRpc *rpc;

 785 ce94dbe6 2005-02-13 devnull 	char buf[4096], *p;

 786 ce94dbe6 2005-02-13 devnull 	mpint *decr, *unpad;

 787 ce94dbe6 2005-02-13 devnull 

 788 ce94dbe6 2005-02-13 devnull 	USED(exp);

 789 ce94dbe6 2005-02-13 devnull 	if((rpc = auth_allocrpc()) == nil){

 790 ce94dbe6 2005-02-13 devnull 		fprint(2, "ssh-agent: auth_allocrpc: %r\n");

 791 ce94dbe6 2005-02-13 devnull 		return -1;

 792 ce94dbe6 2005-02-13 devnull 	}

 793 e1a22963 2005-02-13 devnull 	snprint(buf, sizeof buf, "proto=rsa service=ssh role=decrypt n=%lB ek=%lB", mod, exp);

 794 ce94dbe6 2005-02-13 devnull 	if(chatty)

 795 ce94dbe6 2005-02-13 devnull 		fprint(2, "ssh-agent: start %s\n", buf);

 796 ce94dbe6 2005-02-13 devnull 	if(auth_rpc(rpc, "start", buf, strlen(buf)) != ARok){

 797 ce94dbe6 2005-02-13 devnull 		fprint(2, "ssh-agent: auth 'start' failed: %r\n");

 798 ce94dbe6 2005-02-13 devnull 	Die:

 799 ce94dbe6 2005-02-13 devnull 		auth_freerpc(rpc);

 800 ce94dbe6 2005-02-13 devnull 		return -1;

 801 ce94dbe6 2005-02-13 devnull 	}

 802 ce94dbe6 2005-02-13 devnull 	

 803 ce94dbe6 2005-02-13 devnull 	p = mptoa(chal, 16, nil, 0);

 804 ce94dbe6 2005-02-13 devnull 	if(p == nil){

 805 ce94dbe6 2005-02-13 devnull 		fprint(2, "ssh-agent: dorsa: mptoa: %r\n");

 806 ce94dbe6 2005-02-13 devnull 		goto Die;

 807 ce94dbe6 2005-02-13 devnull 	}

 808 ce94dbe6 2005-02-13 devnull 	if(chatty)

 809 ce94dbe6 2005-02-13 devnull 		fprint(2, "ssh-agent: challenge %B => %s\n", chal, p);

 810 e1a22963 2005-02-13 devnull 	if(auth_rpc(rpc, "writehex", p, strlen(p)) != ARok){

 811 ce94dbe6 2005-02-13 devnull 		fprint(2, "ssh-agent: dorsa: auth 'write': %r\n");

 812 ce94dbe6 2005-02-13 devnull 		free(p);

 813 ce94dbe6 2005-02-13 devnull 		goto Die;

 814 ce94dbe6 2005-02-13 devnull 	}

 815 ce94dbe6 2005-02-13 devnull 	free(p);

 816 e1a22963 2005-02-13 devnull 	if(auth_rpc(rpc, "readhex", nil, 0) != ARok){

 817 ce94dbe6 2005-02-13 devnull 		fprint(2, "ssh-agent: dorsa: auth 'read': %r\n");

 818 ce94dbe6 2005-02-13 devnull 		goto Die;

 819 ce94dbe6 2005-02-13 devnull 	}

 820 ce94dbe6 2005-02-13 devnull 	decr = strtomp(rpc->arg, nil, 16, nil);

 821 ce94dbe6 2005-02-13 devnull 	if(chatty)

 822 ce94dbe6 2005-02-13 devnull 		fprint(2, "ssh-agent: response %s => %B\n", rpc->arg, decr);

 823 ce94dbe6 2005-02-13 devnull 	if(decr == nil){

 824 ce94dbe6 2005-02-13 devnull 		fprint(2, "ssh-agent: dorsa: strtomp: %r\n");

 825 ce94dbe6 2005-02-13 devnull 		goto Die;

 826 ce94dbe6 2005-02-13 devnull 	}

 827 ce94dbe6 2005-02-13 devnull 	unpad = rsaunpad(decr);

 828 ce94dbe6 2005-02-13 devnull 	if(chatty)

 829 ce94dbe6 2005-02-13 devnull 		fprint(2, "ssh-agent: unpad %B => %B\n", decr, unpad);

 830 ce94dbe6 2005-02-13 devnull 	if(unpad == nil){

 831 ce94dbe6 2005-02-13 devnull 		fprint(2, "ssh-agent: dorsa: rsaunpad: %r\n");

 832 ce94dbe6 2005-02-13 devnull 		mpfree(decr);

 833 ce94dbe6 2005-02-13 devnull 		goto Die;

 834 ce94dbe6 2005-02-13 devnull 	}

 835 ce94dbe6 2005-02-13 devnull 	mpfree(decr);

 836 ce94dbe6 2005-02-13 devnull 	mptoberjust(unpad, chalbuf, 32);

 837 ce94dbe6 2005-02-13 devnull 	mpfree(unpad);

 838 ce94dbe6 2005-02-13 devnull 	auth_freerpc(rpc);

 839 ce94dbe6 2005-02-13 devnull 	return 0;

 840 ce94dbe6 2005-02-13 devnull }

 841 ce94dbe6 2005-02-13 devnull 

 842 ce94dbe6 2005-02-13 devnull int

 843 ce94dbe6 2005-02-13 devnull keysign(Msg *mkey, Msg *mdata, Msg *msig)

 844 ce94dbe6 2005-02-13 devnull {

 845 ce94dbe6 2005-02-13 devnull 	char *s;

 846 ce94dbe6 2005-02-13 devnull 	AuthRpc *rpc;

 847 ce94dbe6 2005-02-13 devnull 	RSApub *rsa;

 848 ce94dbe6 2005-02-13 devnull 	DSApub *dsa;

 849 ce94dbe6 2005-02-13 devnull 	char buf[4096];

 850 ce94dbe6 2005-02-13 devnull 	uchar digest[SHA1dlen];

 851 ce94dbe6 2005-02-13 devnull 	

 852 ce94dbe6 2005-02-13 devnull 	s = getstr(mkey);

 853 ce94dbe6 2005-02-13 devnull 	if(strcmp(s, "ssh-rsa") == 0){

 854 ce94dbe6 2005-02-13 devnull 		rsa = getrsapub(mkey);

 855 ce94dbe6 2005-02-13 devnull 		if(rsa == nil)

 856 ce94dbe6 2005-02-13 devnull 			return -1;

 857 ce94dbe6 2005-02-13 devnull 		snprint(buf, sizeof buf, "proto=rsa service=ssh-rsa role=sign n=%lB ek=%lB",

 858 ce94dbe6 2005-02-13 devnull 			rsa->n, rsa->ek);

 859 ce94dbe6 2005-02-13 devnull 		rsapubfree(rsa);

 860 ce94dbe6 2005-02-13 devnull 	}else if(strcmp(s, "ssh-dss") == 0){

 861 ce94dbe6 2005-02-13 devnull 		dsa = getdsapub(mkey);

 862 ce94dbe6 2005-02-13 devnull 		if(dsa == nil)

 863 ce94dbe6 2005-02-13 devnull 			return -1;

 864 ce94dbe6 2005-02-13 devnull 		snprint(buf, sizeof buf, "proto=dsa service=ssh-dss role=sign p=%lB q=%lB alpha=%lB key=%lB",

 865 ce94dbe6 2005-02-13 devnull 			dsa->p, dsa->q, dsa->alpha, dsa->key);

 866 ce94dbe6 2005-02-13 devnull 		dsapubfree(dsa);

 867 ce94dbe6 2005-02-13 devnull 	}else{

 868 ce94dbe6 2005-02-13 devnull 		fprint(2, "ssh-agent: cannot sign key type %s\n", s);

 869 ce94dbe6 2005-02-13 devnull 		werrstr("unknown key type %s", s);

 870 ce94dbe6 2005-02-13 devnull 		return -1;

 871 ce94dbe6 2005-02-13 devnull 	}

 872 ce94dbe6 2005-02-13 devnull 

 873 ce94dbe6 2005-02-13 devnull 	if((rpc = auth_allocrpc()) == nil){

 874 ce94dbe6 2005-02-13 devnull 		fprint(2, "ssh-agent: auth_allocrpc: %r\n");

 875 ce94dbe6 2005-02-13 devnull 		return -1;

 876 ce94dbe6 2005-02-13 devnull 	}

 877 ce94dbe6 2005-02-13 devnull 	if(chatty)

 878 ce94dbe6 2005-02-13 devnull 		fprint(2, "ssh-agent: start %s\n", buf);

 879 ce94dbe6 2005-02-13 devnull 	if(auth_rpc(rpc, "start", buf, strlen(buf)) != ARok){

 880 ce94dbe6 2005-02-13 devnull 		fprint(2, "ssh-agent: auth 'start' failed: %r\n");

 881 ce94dbe6 2005-02-13 devnull 	Die:

 882 ce94dbe6 2005-02-13 devnull 		auth_freerpc(rpc);

 883 ce94dbe6 2005-02-13 devnull 		return -1;

 884 ce94dbe6 2005-02-13 devnull 	}

 885 ce94dbe6 2005-02-13 devnull 	sha1(mdata->bp, mdata->ep-mdata->bp, digest, nil);

 886 ce94dbe6 2005-02-13 devnull 	if(auth_rpc(rpc, "write", digest, SHA1dlen) != ARok){

 887 ce94dbe6 2005-02-13 devnull 		fprint(2, "ssh-agent: auth 'write in sign failed: %r\n");

 888 ce94dbe6 2005-02-13 devnull 		goto Die;

 889 ce94dbe6 2005-02-13 devnull 	}

 890 ce94dbe6 2005-02-13 devnull 	if(auth_rpc(rpc, "read", nil, 0) != ARok){

 891 ce94dbe6 2005-02-13 devnull 		fprint(2, "ssh-agent: auth 'read' failed: %r\n");

 892 ce94dbe6 2005-02-13 devnull 		goto Die;

 893 ce94dbe6 2005-02-13 devnull 	}

 894 ce94dbe6 2005-02-13 devnull 	newmsg(msig);

 895 ce94dbe6 2005-02-13 devnull 	putstr(msig, s);

 896 ce94dbe6 2005-02-13 devnull 	put4(msig, rpc->narg);

 897 ce94dbe6 2005-02-13 devnull 	putn(msig, rpc->arg, rpc->narg);

 898 ce94dbe6 2005-02-13 devnull 	auth_freerpc(rpc);

 899 ce94dbe6 2005-02-13 devnull 	return 0;

 900 ce94dbe6 2005-02-13 devnull }

 901 ce94dbe6 2005-02-13 devnull 

 902 ce94dbe6 2005-02-13 devnull int

 903 ce94dbe6 2005-02-13 devnull runmsg(Aconn *a)

 904 ce94dbe6 2005-02-13 devnull {

 905 ce94dbe6 2005-02-13 devnull 	char *p;

 906 ce94dbe6 2005-02-13 devnull 	int n, nk, type, rt, vers;

 907 ce94dbe6 2005-02-13 devnull 	mpint *ek, *mod, *chal;

 908 ce94dbe6 2005-02-13 devnull 	uchar sessid[16], chalbuf[32], digest[MD5dlen];

 909 ce94dbe6 2005-02-13 devnull 	uint len, flags;

 910 ce94dbe6 2005-02-13 devnull 	DigestState *s;

 911 ce94dbe6 2005-02-13 devnull 	Msg m, mkey, mdata, msig;

 912 ce94dbe6 2005-02-13 devnull 	

 913 ce94dbe6 2005-02-13 devnull 	if(a->ndata < 4)

 914 ce94dbe6 2005-02-13 devnull 		return 0;

 915 ce94dbe6 2005-02-13 devnull 	len = (a->data[0]<<24)|(a->data[1]<<16)|(a->data[2]<<8)|a->data[3];

 916 ce94dbe6 2005-02-13 devnull 	if(a->ndata < 4+len)

 917 ce94dbe6 2005-02-13 devnull 		return 0;

 918 ce94dbe6 2005-02-13 devnull 	m.p = a->data+4;

 919 ce94dbe6 2005-02-13 devnull 	m.ep = m.p+len;

 920 ce94dbe6 2005-02-13 devnull 	type = get1(&m);

 921 ce94dbe6 2005-02-13 devnull 	if(chatty)

 922 ce94dbe6 2005-02-13 devnull 		fprint(2, "msg %d: %.*H\n", type, len, m.p);

 923 ce94dbe6 2005-02-13 devnull 	switch(type){

 924 ce94dbe6 2005-02-13 devnull 	default:

 925 ce94dbe6 2005-02-13 devnull 	Failure:

 926 ce94dbe6 2005-02-13 devnull 		newreply(&m, SSH_AGENT_FAILURE);

 927 ce94dbe6 2005-02-13 devnull 		reply(a, &m);

 928 ce94dbe6 2005-02-13 devnull 		break;

 929 ce94dbe6 2005-02-13 devnull 

 930 ce94dbe6 2005-02-13 devnull 	case SSH_AGENTC_REQUEST_RSA_IDENTITIES:

 931 ce94dbe6 2005-02-13 devnull 		vers = 1;

 932 ce94dbe6 2005-02-13 devnull 		newreply(&m, SSH_AGENT_RSA_IDENTITIES_ANSWER);

 933 ce94dbe6 2005-02-13 devnull 		goto Identities;

 934 ce94dbe6 2005-02-13 devnull 	case SSH2_AGENTC_REQUEST_IDENTITIES:

 935 ce94dbe6 2005-02-13 devnull 		vers = 2;

 936 ce94dbe6 2005-02-13 devnull 		newreply(&m, SSH2_AGENT_IDENTITIES_ANSWER);

 937 ce94dbe6 2005-02-13 devnull 	Identities:

 938 ce94dbe6 2005-02-13 devnull 		nk = listkeys(&m, vers);

 939 ce94dbe6 2005-02-13 devnull 		if(nk < 0){

 940 ce94dbe6 2005-02-13 devnull 			free(m.bp);

 941 ce94dbe6 2005-02-13 devnull 			goto Failure;

 942 ce94dbe6 2005-02-13 devnull 		}

 943 ce94dbe6 2005-02-13 devnull 		if(chatty)

 944 ce94dbe6 2005-02-13 devnull 			fprint(2, "request identities\n", nk);

 945 ce94dbe6 2005-02-13 devnull 		reply(a, &m);

 946 ce94dbe6 2005-02-13 devnull 		break;

 947 ce94dbe6 2005-02-13 devnull 

 948 ce94dbe6 2005-02-13 devnull 	case SSH_AGENTC_RSA_CHALLENGE:

 949 ce94dbe6 2005-02-13 devnull 		n = get4(&m);

 950 ce94dbe6 2005-02-13 devnull 		ek = getmp(&m);

 951 ce94dbe6 2005-02-13 devnull 		mod = getmp(&m);

 952 ce94dbe6 2005-02-13 devnull 		chal = getmp(&m);

 953 2b604081 2005-05-07 devnull 		if((p = (char*)getn(&m, 16)) == nil){

 954 ce94dbe6 2005-02-13 devnull 		Failchal:

 955 ce94dbe6 2005-02-13 devnull 			mpfree(ek);

 956 ce94dbe6 2005-02-13 devnull 			mpfree(mod);

 957 ce94dbe6 2005-02-13 devnull 			mpfree(chal);

 958 ce94dbe6 2005-02-13 devnull 			goto Failure;

 959 ce94dbe6 2005-02-13 devnull 		}

 960 ce94dbe6 2005-02-13 devnull 		memmove(sessid, p, 16);

 961 ce94dbe6 2005-02-13 devnull 		rt = get4(&m);

 962 ce94dbe6 2005-02-13 devnull 		if(rt != 1 || dorsa(a, mod, ek, chal, chalbuf) < 0)

 963 ce94dbe6 2005-02-13 devnull 			goto Failchal;

 964 ce94dbe6 2005-02-13 devnull 		s = md5(chalbuf, 32, nil, nil);

 965 ce94dbe6 2005-02-13 devnull 		if(s == nil)

 966 ce94dbe6 2005-02-13 devnull 			goto Failchal;

 967 ce94dbe6 2005-02-13 devnull 		md5(sessid, 16, digest, s);

 968 e1a22963 2005-02-13 devnull 		print("md5 %.*H %.*H => %.*H\n", 32, chalbuf, 16, sessid, MD5dlen, digest);

 969 ce94dbe6 2005-02-13 devnull 		

 970 ce94dbe6 2005-02-13 devnull 		newreply(&m, SSH_AGENT_RSA_RESPONSE);

 971 ce94dbe6 2005-02-13 devnull 		putn(&m, digest, 16);

 972 ce94dbe6 2005-02-13 devnull 		reply(a, &m);

 973 ce94dbe6 2005-02-13 devnull 

 974 ce94dbe6 2005-02-13 devnull 		mpfree(ek);

 975 ce94dbe6 2005-02-13 devnull 		mpfree(mod);

 976 ce94dbe6 2005-02-13 devnull 		mpfree(chal);

 977 ce94dbe6 2005-02-13 devnull 		break;

 978 ce94dbe6 2005-02-13 devnull 

 979 ce94dbe6 2005-02-13 devnull 	case SSH2_AGENTC_SIGN_REQUEST:

 980 2b604081 2005-05-07 devnull 		if(getm(&m, &mkey) == nil

 981 2b604081 2005-05-07 devnull 		|| getm(&m, &mdata) == nil)

 982 ce94dbe6 2005-02-13 devnull 			goto Failure;

 983 ce94dbe6 2005-02-13 devnull 		flags = get4(&m);

 984 ce94dbe6 2005-02-13 devnull 		if(flags & SSH_AGENT_OLD_SIGNATURE)

 985 ce94dbe6 2005-02-13 devnull 			goto Failure;

 986 ce94dbe6 2005-02-13 devnull 		if(keysign(&mkey, &mdata, &msig) < 0)

 987 ce94dbe6 2005-02-13 devnull 			goto Failure;

 988 ce94dbe6 2005-02-13 devnull 		if(chatty)

 989 ce94dbe6 2005-02-13 devnull 			fprint(2, "signature: %.*H\n",

 990 ce94dbe6 2005-02-13 devnull 				msig.p-msig.bp, msig.bp);

 991 ce94dbe6 2005-02-13 devnull 		newreply(&m, SSH2_AGENT_SIGN_RESPONSE);

 992 ce94dbe6 2005-02-13 devnull 		putm(&m, &msig);

 993 ce94dbe6 2005-02-13 devnull 		free(msig.bp);

 994 ce94dbe6 2005-02-13 devnull 		reply(a, &m);

 995 ce94dbe6 2005-02-13 devnull 		break;

 996 ce94dbe6 2005-02-13 devnull 		

 997 ce94dbe6 2005-02-13 devnull 	case SSH_AGENTC_ADD_RSA_IDENTITY:

 998 ce94dbe6 2005-02-13 devnull 		/*

 999 ce94dbe6 2005-02-13 devnull 			msg: n[4] mod[mp] pubexp[exp] privexp[mp]

1000 ce94dbe6 2005-02-13 devnull 				p^-1 mod q[mp] p[mp] q[mp] comment[str]

1001 ce94dbe6 2005-02-13 devnull 		 */

1002 ce94dbe6 2005-02-13 devnull 		goto Failure;

1003 ce94dbe6 2005-02-13 devnull 		

1004 ce94dbe6 2005-02-13 devnull 	case SSH_AGENTC_REMOVE_RSA_IDENTITY:

1005 ce94dbe6 2005-02-13 devnull 		/*

1006 ce94dbe6 2005-02-13 devnull 			msg: n[4] mod[mp] pubexp[mp]

1007 ce94dbe6 2005-02-13 devnull 		 */

1008 ce94dbe6 2005-02-13 devnull 		goto Failure;

1009 ce94dbe6 2005-02-13 devnull 		

1010 ce94dbe6 2005-02-13 devnull 	}

1011 ce94dbe6 2005-02-13 devnull 	

1012 ce94dbe6 2005-02-13 devnull 	a->ndata -= 4+len;

1013 ce94dbe6 2005-02-13 devnull 	memmove(a->data, a->data+4+len, a->ndata);

1014 ce94dbe6 2005-02-13 devnull 	return 1;

1015 ce94dbe6 2005-02-13 devnull }

1016 ce94dbe6 2005-02-13 devnull 

1017 ce94dbe6 2005-02-13 devnull void*

1018 ce94dbe6 2005-02-13 devnull emalloc(int n)

1019 ce94dbe6 2005-02-13 devnull {

1020 ce94dbe6 2005-02-13 devnull 	void *v;

1021 ce94dbe6 2005-02-13 devnull 

1022 ce94dbe6 2005-02-13 devnull 	v = mallocz(n, 1);

1023 ce94dbe6 2005-02-13 devnull 	if(v == nil){

1024 ce94dbe6 2005-02-13 devnull 		abort();

1025 ce94dbe6 2005-02-13 devnull 		sysfatal("out of memory allocating %d", n);

1026 ce94dbe6 2005-02-13 devnull 	}

1027 ce94dbe6 2005-02-13 devnull 	return v;

1028 ce94dbe6 2005-02-13 devnull }

1029 ce94dbe6 2005-02-13 devnull 

1030 ce94dbe6 2005-02-13 devnull void*

1031 ce94dbe6 2005-02-13 devnull erealloc(void *v, int n)

1032 ce94dbe6 2005-02-13 devnull {

1033 ce94dbe6 2005-02-13 devnull 	v = realloc(v, n);

1034 ce94dbe6 2005-02-13 devnull 	if(v == nil){

1035 ce94dbe6 2005-02-13 devnull 		abort();

1036 ce94dbe6 2005-02-13 devnull 		sysfatal("out of memory reallocating %d", n);

1037 ce94dbe6 2005-02-13 devnull 	}

1038 ce94dbe6 2005-02-13 devnull 	return v;

1039 ce94dbe6 2005-02-13 devnull }

1040 ce94dbe6 2005-02-13 devnull