xref: /freebsd/crypto/openssh/monitor_wrap.c (revision 4b2eaea43fec8e8792be611dea204071a10b655a)
1 /*
2  * Copyright 2002 Niels Provos <provos@citi.umich.edu>
3  * Copyright 2002 Markus Friedl <markus@openbsd.org>
4  * All rights reserved.
5  *
6  * Redistribution and use in source and binary forms, with or without
7  * modification, are permitted provided that the following conditions
8  * are met:
9  * 1. Redistributions of source code must retain the above copyright
10  *    notice, this list of conditions and the following disclaimer.
11  * 2. Redistributions in binary form must reproduce the above copyright
12  *    notice, this list of conditions and the following disclaimer in the
13  *    documentation and/or other materials provided with the distribution.
14  *
15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
16  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
17  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
18  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
19  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
20  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
21  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
22  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
23  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
24  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
25  */
26 
27 #include "includes.h"
28 RCSID("$OpenBSD: monitor_wrap.c,v 1.19 2002/09/26 11:38:43 markus Exp $");
29 RCSID("$FreeBSD$");
30 
31 #include <openssl/bn.h>
32 #include <openssl/dh.h>
33 
34 #include "ssh.h"
35 #include "dh.h"
36 #include "kex.h"
37 #include "auth.h"
38 #include "buffer.h"
39 #include "bufaux.h"
40 #include "packet.h"
41 #include "mac.h"
42 #include "log.h"
43 #include "zlib.h"
44 #include "monitor.h"
45 #include "monitor_wrap.h"
46 #include "xmalloc.h"
47 #include "atomicio.h"
48 #include "monitor_fdpass.h"
49 #include "getput.h"
50 
51 #include "auth.h"
52 #include "channels.h"
53 #include "session.h"
54 
55 /* Imports */
56 extern int compat20;
57 extern Newkeys *newkeys[];
58 extern z_stream incoming_stream;
59 extern z_stream outgoing_stream;
60 extern struct monitor *pmonitor;
61 extern Buffer input, output;
62 
63 void
64 mm_request_send(int socket, enum monitor_reqtype type, Buffer *m)
65 {
66 	u_int mlen = buffer_len(m);
67 	u_char buf[5];
68 
69 	debug3("%s entering: type %d", __func__, type);
70 
71 	PUT_32BIT(buf, mlen + 1);
72 	buf[4] = (u_char) type;		/* 1st byte of payload is mesg-type */
73 	if (atomicio(write, socket, buf, sizeof(buf)) != sizeof(buf))
74 		fatal("%s: write", __func__);
75 	if (atomicio(write, socket, buffer_ptr(m), mlen) != mlen)
76 		fatal("%s: write", __func__);
77 }
78 
79 void
80 mm_request_receive(int socket, Buffer *m)
81 {
82 	u_char buf[4];
83 	u_int msg_len;
84 	ssize_t res;
85 
86 	debug3("%s entering", __func__);
87 
88 	res = atomicio(read, socket, buf, sizeof(buf));
89 	if (res != sizeof(buf)) {
90 		if (res == 0)
91 			fatal_cleanup();
92 		fatal("%s: read: %ld", __func__, (long)res);
93 	}
94 	msg_len = GET_32BIT(buf);
95 	if (msg_len > 256 * 1024)
96 		fatal("%s: read: bad msg_len %d", __func__, msg_len);
97 	buffer_clear(m);
98 	buffer_append_space(m, msg_len);
99 	res = atomicio(read, socket, buffer_ptr(m), msg_len);
100 	if (res != msg_len)
101 		fatal("%s: read: %ld != msg_len", __func__, (long)res);
102 }
103 
104 void
105 mm_request_receive_expect(int socket, enum monitor_reqtype type, Buffer *m)
106 {
107 	u_char rtype;
108 
109 	debug3("%s entering: type %d", __func__, type);
110 
111 	mm_request_receive(socket, m);
112 	rtype = buffer_get_char(m);
113 	if (rtype != type)
114 		fatal("%s: read: rtype %d != type %d", __func__,
115 		    rtype, type);
116 }
117 
118 DH *
119 mm_choose_dh(int min, int nbits, int max)
120 {
121 	BIGNUM *p, *g;
122 	int success = 0;
123 	Buffer m;
124 
125 	buffer_init(&m);
126 	buffer_put_int(&m, min);
127 	buffer_put_int(&m, nbits);
128 	buffer_put_int(&m, max);
129 
130 	mm_request_send(pmonitor->m_recvfd, MONITOR_REQ_MODULI, &m);
131 
132 	debug3("%s: waiting for MONITOR_ANS_MODULI", __func__);
133 	mm_request_receive_expect(pmonitor->m_recvfd, MONITOR_ANS_MODULI, &m);
134 
135 	success = buffer_get_char(&m);
136 	if (success == 0)
137 		fatal("%s: MONITOR_ANS_MODULI failed", __func__);
138 
139 	if ((p = BN_new()) == NULL)
140 		fatal("%s: BN_new failed", __func__);
141 	if ((g = BN_new()) == NULL)
142 		fatal("%s: BN_new failed", __func__);
143 	buffer_get_bignum2(&m, p);
144 	buffer_get_bignum2(&m, g);
145 
146 	debug3("%s: remaining %d", __func__, buffer_len(&m));
147 	buffer_free(&m);
148 
149 	return (dh_new_group(g, p));
150 }
151 
152 int
153 mm_key_sign(Key *key, u_char **sigp, u_int *lenp, u_char *data, u_int datalen)
154 {
155 	Kex *kex = *pmonitor->m_pkex;
156 	Buffer m;
157 
158 	debug3("%s entering", __func__);
159 
160 	buffer_init(&m);
161 	buffer_put_int(&m, kex->host_key_index(key));
162 	buffer_put_string(&m, data, datalen);
163 
164 	mm_request_send(pmonitor->m_recvfd, MONITOR_REQ_SIGN, &m);
165 
166 	debug3("%s: waiting for MONITOR_ANS_SIGN", __func__);
167 	mm_request_receive_expect(pmonitor->m_recvfd, MONITOR_ANS_SIGN, &m);
168 	*sigp  = buffer_get_string(&m, lenp);
169 	buffer_free(&m);
170 
171 	return (0);
172 }
173 
174 struct passwd *
175 mm_getpwnamallow(const char *login)
176 {
177 	Buffer m;
178 	struct passwd *pw;
179 	u_int pwlen;
180 
181 	debug3("%s entering", __func__);
182 
183 	buffer_init(&m);
184 	buffer_put_cstring(&m, login);
185 
186 	mm_request_send(pmonitor->m_recvfd, MONITOR_REQ_PWNAM, &m);
187 
188 	debug3("%s: waiting for MONITOR_ANS_PWNAM", __func__);
189 	mm_request_receive_expect(pmonitor->m_recvfd, MONITOR_ANS_PWNAM, &m);
190 
191 	if (buffer_get_char(&m) == 0) {
192 		buffer_free(&m);
193 		return (NULL);
194 	}
195 	pw = buffer_get_string(&m, &pwlen);
196 	if (pwlen != sizeof(struct passwd))
197 		fatal("%s: struct passwd size mismatch", __func__);
198 	pw->pw_name = buffer_get_string(&m, NULL);
199 	pw->pw_passwd = buffer_get_string(&m, NULL);
200 	pw->pw_gecos = buffer_get_string(&m, NULL);
201 #ifdef HAVE_PW_CLASS_IN_PASSWD
202 	pw->pw_class = buffer_get_string(&m, NULL);
203 #endif
204 	pw->pw_dir = buffer_get_string(&m, NULL);
205 	pw->pw_shell = buffer_get_string(&m, NULL);
206 	buffer_free(&m);
207 
208 	return (pw);
209 }
210 
211 char *mm_auth2_read_banner(void)
212 {
213 	Buffer m;
214 	char *banner;
215 
216 	debug3("%s entering", __func__);
217 
218 	buffer_init(&m);
219 	mm_request_send(pmonitor->m_recvfd, MONITOR_REQ_AUTH2_READ_BANNER, &m);
220 	buffer_clear(&m);
221 
222 	mm_request_receive_expect(pmonitor->m_recvfd, MONITOR_ANS_AUTH2_READ_BANNER, &m);
223 	banner = buffer_get_string(&m, NULL);
224 	buffer_free(&m);
225 
226 	return (banner);
227 }
228 
229 /* Inform the privileged process about service and style */
230 
231 void
232 mm_inform_authserv(char *service, char *style)
233 {
234 	Buffer m;
235 
236 	debug3("%s entering", __func__);
237 
238 	buffer_init(&m);
239 	buffer_put_cstring(&m, service);
240 	buffer_put_cstring(&m, style ? style : "");
241 
242 	mm_request_send(pmonitor->m_recvfd, MONITOR_REQ_AUTHSERV, &m);
243 
244 	buffer_free(&m);
245 }
246 
247 /* Do the password authentication */
248 int
249 mm_auth_password(Authctxt *authctxt, char *password)
250 {
251 	Buffer m;
252 	int authenticated = 0;
253 
254 	debug3("%s entering", __func__);
255 
256 	buffer_init(&m);
257 	buffer_put_cstring(&m, password);
258 	mm_request_send(pmonitor->m_recvfd, MONITOR_REQ_AUTHPASSWORD, &m);
259 
260 	debug3("%s: waiting for MONITOR_ANS_AUTHPASSWORD", __func__);
261 	mm_request_receive_expect(pmonitor->m_recvfd, MONITOR_ANS_AUTHPASSWORD, &m);
262 
263 	authenticated = buffer_get_int(&m);
264 
265 	buffer_free(&m);
266 
267 	debug3("%s: user %sauthenticated",
268 	    __func__, authenticated ? "" : "not ");
269 	return (authenticated);
270 }
271 
272 int
273 mm_user_key_allowed(struct passwd *pw, Key *key)
274 {
275 	return (mm_key_allowed(MM_USERKEY, NULL, NULL, key));
276 }
277 
278 int
279 mm_hostbased_key_allowed(struct passwd *pw, char *user, char *host,
280     Key *key)
281 {
282 	return (mm_key_allowed(MM_HOSTKEY, user, host, key));
283 }
284 
285 int
286 mm_auth_rhosts_rsa_key_allowed(struct passwd *pw, char *user,
287     char *host, Key *key)
288 {
289 	int ret;
290 
291 	key->type = KEY_RSA; /* XXX hack for key_to_blob */
292 	ret = mm_key_allowed(MM_RSAHOSTKEY, user, host, key);
293 	key->type = KEY_RSA1;
294 	return (ret);
295 }
296 
297 static void
298 mm_send_debug(Buffer *m)
299 {
300 	char *msg;
301 
302 	while (buffer_len(m)) {
303 		msg = buffer_get_string(m, NULL);
304 		debug3("%s: Sending debug: %s", __func__, msg);
305 		packet_send_debug("%s", msg);
306 		xfree(msg);
307 	}
308 }
309 
310 int
311 mm_key_allowed(enum mm_keytype type, char *user, char *host, Key *key)
312 {
313 	Buffer m;
314 	u_char *blob;
315 	u_int len;
316 	int allowed = 0;
317 
318 	debug3("%s entering", __func__);
319 
320 	/* Convert the key to a blob and the pass it over */
321 	if (!key_to_blob(key, &blob, &len))
322 		return (0);
323 
324 	buffer_init(&m);
325 	buffer_put_int(&m, type);
326 	buffer_put_cstring(&m, user ? user : "");
327 	buffer_put_cstring(&m, host ? host : "");
328 	buffer_put_string(&m, blob, len);
329 	xfree(blob);
330 
331 	mm_request_send(pmonitor->m_recvfd, MONITOR_REQ_KEYALLOWED, &m);
332 
333 	debug3("%s: waiting for MONITOR_ANS_KEYALLOWED", __func__);
334 	mm_request_receive_expect(pmonitor->m_recvfd, MONITOR_ANS_KEYALLOWED, &m);
335 
336 	allowed = buffer_get_int(&m);
337 
338 	/* Send potential debug messages */
339 	mm_send_debug(&m);
340 
341 	buffer_free(&m);
342 
343 	return (allowed);
344 }
345 
346 /*
347  * This key verify needs to send the key type along, because the
348  * privileged parent makes the decision if the key is allowed
349  * for authentication.
350  */
351 
352 int
353 mm_key_verify(Key *key, u_char *sig, u_int siglen, u_char *data, u_int datalen)
354 {
355 	Buffer m;
356 	u_char *blob;
357 	u_int len;
358 	int verified = 0;
359 
360 	debug3("%s entering", __func__);
361 
362 	/* Convert the key to a blob and the pass it over */
363 	if (!key_to_blob(key, &blob, &len))
364 		return (0);
365 
366 	buffer_init(&m);
367 	buffer_put_string(&m, blob, len);
368 	buffer_put_string(&m, sig, siglen);
369 	buffer_put_string(&m, data, datalen);
370 	xfree(blob);
371 
372 	mm_request_send(pmonitor->m_recvfd, MONITOR_REQ_KEYVERIFY, &m);
373 
374 	debug3("%s: waiting for MONITOR_ANS_KEYVERIFY", __func__);
375 	mm_request_receive_expect(pmonitor->m_recvfd, MONITOR_ANS_KEYVERIFY, &m);
376 
377 	verified = buffer_get_int(&m);
378 
379 	buffer_free(&m);
380 
381 	return (verified);
382 }
383 
384 /* Export key state after authentication */
385 Newkeys *
386 mm_newkeys_from_blob(u_char *blob, int blen)
387 {
388 	Buffer b;
389 	u_int len;
390 	Newkeys *newkey = NULL;
391 	Enc *enc;
392 	Mac *mac;
393 	Comp *comp;
394 
395 	debug3("%s: %p(%d)", __func__, blob, blen);
396 #ifdef DEBUG_PK
397 	dump_base64(stderr, blob, blen);
398 #endif
399 	buffer_init(&b);
400 	buffer_append(&b, blob, blen);
401 
402 	newkey = xmalloc(sizeof(*newkey));
403 	enc = &newkey->enc;
404 	mac = &newkey->mac;
405 	comp = &newkey->comp;
406 
407 	/* Enc structure */
408 	enc->name = buffer_get_string(&b, NULL);
409 	buffer_get(&b, &enc->cipher, sizeof(enc->cipher));
410 	enc->enabled = buffer_get_int(&b);
411 	enc->block_size = buffer_get_int(&b);
412 	enc->key = buffer_get_string(&b, &enc->key_len);
413 	enc->iv = buffer_get_string(&b, &len);
414 	if (len != enc->block_size)
415 		fatal("%s: bad ivlen: expected %u != %u", __func__,
416 		    enc->block_size, len);
417 
418 	if (enc->name == NULL || cipher_by_name(enc->name) != enc->cipher)
419 		fatal("%s: bad cipher name %s or pointer %p", __func__,
420 		    enc->name, enc->cipher);
421 
422 	/* Mac structure */
423 	mac->name = buffer_get_string(&b, NULL);
424 	if (mac->name == NULL || mac_init(mac, mac->name) == -1)
425 		fatal("%s: can not init mac %s", __func__, mac->name);
426 	mac->enabled = buffer_get_int(&b);
427 	mac->key = buffer_get_string(&b, &len);
428 	if (len > mac->key_len)
429 		fatal("%s: bad mac key length: %u > %d", __func__, len,
430 		    mac->key_len);
431 	mac->key_len = len;
432 
433 	/* Comp structure */
434 	comp->type = buffer_get_int(&b);
435 	comp->enabled = buffer_get_int(&b);
436 	comp->name = buffer_get_string(&b, NULL);
437 
438 	len = buffer_len(&b);
439 	if (len != 0)
440 		error("newkeys_from_blob: remaining bytes in blob %u", len);
441 	buffer_free(&b);
442 	return (newkey);
443 }
444 
445 int
446 mm_newkeys_to_blob(int mode, u_char **blobp, u_int *lenp)
447 {
448 	Buffer b;
449 	int len;
450 	Enc *enc;
451 	Mac *mac;
452 	Comp *comp;
453 	Newkeys *newkey = newkeys[mode];
454 
455 	debug3("%s: converting %p", __func__, newkey);
456 
457 	if (newkey == NULL) {
458 		error("%s: newkey == NULL", __func__);
459 		return 0;
460 	}
461 	enc = &newkey->enc;
462 	mac = &newkey->mac;
463 	comp = &newkey->comp;
464 
465 	buffer_init(&b);
466 	/* Enc structure */
467 	buffer_put_cstring(&b, enc->name);
468 	/* The cipher struct is constant and shared, you export pointer */
469 	buffer_append(&b, &enc->cipher, sizeof(enc->cipher));
470 	buffer_put_int(&b, enc->enabled);
471 	buffer_put_int(&b, enc->block_size);
472 	buffer_put_string(&b, enc->key, enc->key_len);
473 	packet_get_keyiv(mode, enc->iv, enc->block_size);
474 	buffer_put_string(&b, enc->iv, enc->block_size);
475 
476 	/* Mac structure */
477 	buffer_put_cstring(&b, mac->name);
478 	buffer_put_int(&b, mac->enabled);
479 	buffer_put_string(&b, mac->key, mac->key_len);
480 
481 	/* Comp structure */
482 	buffer_put_int(&b, comp->type);
483 	buffer_put_int(&b, comp->enabled);
484 	buffer_put_cstring(&b, comp->name);
485 
486 	len = buffer_len(&b);
487 	if (lenp != NULL)
488 		*lenp = len;
489 	if (blobp != NULL) {
490 		*blobp = xmalloc(len);
491 		memcpy(*blobp, buffer_ptr(&b), len);
492 	}
493 	memset(buffer_ptr(&b), 0, len);
494 	buffer_free(&b);
495 	return len;
496 }
497 
498 static void
499 mm_send_kex(Buffer *m, Kex *kex)
500 {
501 	buffer_put_string(m, kex->session_id, kex->session_id_len);
502 	buffer_put_int(m, kex->we_need);
503 	buffer_put_int(m, kex->hostkey_type);
504 	buffer_put_int(m, kex->kex_type);
505 	buffer_put_string(m, buffer_ptr(&kex->my), buffer_len(&kex->my));
506 	buffer_put_string(m, buffer_ptr(&kex->peer), buffer_len(&kex->peer));
507 	buffer_put_int(m, kex->flags);
508 	buffer_put_cstring(m, kex->client_version_string);
509 	buffer_put_cstring(m, kex->server_version_string);
510 }
511 
512 void
513 mm_send_keystate(struct monitor *pmonitor)
514 {
515 	Buffer m;
516 	u_char *blob, *p;
517 	u_int bloblen, plen;
518 
519 	buffer_init(&m);
520 
521 	if (!compat20) {
522 		u_char iv[24];
523 		u_char *key;
524 		u_int ivlen, keylen;
525 
526 		buffer_put_int(&m, packet_get_protocol_flags());
527 
528 		buffer_put_int(&m, packet_get_ssh1_cipher());
529 
530 		debug3("%s: Sending ssh1 KEY+IV", __func__);
531 		keylen = packet_get_encryption_key(NULL);
532 		key = xmalloc(keylen+1);	/* add 1 if keylen == 0 */
533 		keylen = packet_get_encryption_key(key);
534 		buffer_put_string(&m, key, keylen);
535 		memset(key, 0, keylen);
536 		xfree(key);
537 
538 		ivlen = packet_get_keyiv_len(MODE_OUT);
539 		packet_get_keyiv(MODE_OUT, iv, ivlen);
540 		buffer_put_string(&m, iv, ivlen);
541 		ivlen = packet_get_keyiv_len(MODE_OUT);
542 		packet_get_keyiv(MODE_IN, iv, ivlen);
543 		buffer_put_string(&m, iv, ivlen);
544 		goto skip;
545 	} else {
546 		/* Kex for rekeying */
547 		mm_send_kex(&m, *pmonitor->m_pkex);
548 	}
549 
550 	debug3("%s: Sending new keys: %p %p",
551 	    __func__, newkeys[MODE_OUT], newkeys[MODE_IN]);
552 
553 	/* Keys from Kex */
554 	if (!mm_newkeys_to_blob(MODE_OUT, &blob, &bloblen))
555 		fatal("%s: conversion of newkeys failed", __func__);
556 
557 	buffer_put_string(&m, blob, bloblen);
558 	xfree(blob);
559 
560 	if (!mm_newkeys_to_blob(MODE_IN, &blob, &bloblen))
561 		fatal("%s: conversion of newkeys failed", __func__);
562 
563 	buffer_put_string(&m, blob, bloblen);
564 	xfree(blob);
565 
566 	buffer_put_int(&m, packet_get_seqnr(MODE_OUT));
567 	buffer_put_int(&m, packet_get_seqnr(MODE_IN));
568 
569 	debug3("%s: New keys have been sent", __func__);
570  skip:
571 	/* More key context */
572 	plen = packet_get_keycontext(MODE_OUT, NULL);
573 	p = xmalloc(plen+1);
574 	packet_get_keycontext(MODE_OUT, p);
575 	buffer_put_string(&m, p, plen);
576 	xfree(p);
577 
578 	plen = packet_get_keycontext(MODE_IN, NULL);
579 	p = xmalloc(plen+1);
580 	packet_get_keycontext(MODE_IN, p);
581 	buffer_put_string(&m, p, plen);
582 	xfree(p);
583 
584 	/* Compression state */
585 	debug3("%s: Sending compression state", __func__);
586 	buffer_put_string(&m, &outgoing_stream, sizeof(outgoing_stream));
587 	buffer_put_string(&m, &incoming_stream, sizeof(incoming_stream));
588 
589 	/* Network I/O buffers */
590 	buffer_put_string(&m, buffer_ptr(&input), buffer_len(&input));
591 	buffer_put_string(&m, buffer_ptr(&output), buffer_len(&output));
592 
593 	mm_request_send(pmonitor->m_recvfd, MONITOR_REQ_KEYEXPORT, &m);
594 	debug3("%s: Finished sending state", __func__);
595 
596 	buffer_free(&m);
597 }
598 
599 int
600 mm_pty_allocate(int *ptyfd, int *ttyfd, char *namebuf, int namebuflen)
601 {
602 	Buffer m;
603 	char *p;
604 	int success = 0;
605 
606 	buffer_init(&m);
607 	mm_request_send(pmonitor->m_recvfd, MONITOR_REQ_PTY, &m);
608 
609 	debug3("%s: waiting for MONITOR_ANS_PTY", __func__);
610 	mm_request_receive_expect(pmonitor->m_recvfd, MONITOR_ANS_PTY, &m);
611 
612 	success = buffer_get_int(&m);
613 	if (success == 0) {
614 		debug3("%s: pty alloc failed", __func__);
615 		buffer_free(&m);
616 		return (0);
617 	}
618 	p = buffer_get_string(&m, NULL);
619 	buffer_free(&m);
620 
621 	strlcpy(namebuf, p, namebuflen); /* Possible truncation */
622 	xfree(p);
623 
624 	*ptyfd = mm_receive_fd(pmonitor->m_recvfd);
625 	*ttyfd = mm_receive_fd(pmonitor->m_recvfd);
626 
627 	/* Success */
628 	return (1);
629 }
630 
631 void
632 mm_session_pty_cleanup2(void *session)
633 {
634 	Session *s = session;
635 	Buffer m;
636 
637 	if (s->ttyfd == -1)
638 		return;
639 	buffer_init(&m);
640 	buffer_put_cstring(&m, s->tty);
641 	mm_request_send(pmonitor->m_recvfd, MONITOR_REQ_PTYCLEANUP, &m);
642 	buffer_free(&m);
643 
644 	/* closed dup'ed master */
645 	if (close(s->ptymaster) < 0)
646 		error("close(s->ptymaster): %s", strerror(errno));
647 
648 	/* unlink pty from session */
649 	s->ttyfd = -1;
650 }
651 
652 #ifdef USE_PAM
653 void
654 mm_start_pam(char *user)
655 {
656 	Buffer m;
657 
658 	debug3("%s entering", __func__);
659 
660 	buffer_init(&m);
661 	buffer_put_cstring(&m, user);
662 
663 	mm_request_send(pmonitor->m_recvfd, MONITOR_REQ_PAM_START, &m);
664 
665 	buffer_free(&m);
666 }
667 
668 void *
669 mm_pam_init_ctx(Authctxt *authctxt)
670 {
671 	Buffer m;
672 	int success;
673 
674 	debug3("%s", __func__);
675 	buffer_init(&m);
676 	buffer_put_cstring(&m, authctxt->user);
677 	mm_request_send(pmonitor->m_recvfd, MONITOR_REQ_PAM_INIT_CTX, &m);
678 	debug3("%s: waiting for MONITOR_ANS_PAM_INIT_CTX", __func__);
679 	mm_request_receive_expect(pmonitor->m_recvfd, MONITOR_ANS_PAM_INIT_CTX, &m);
680 	success = buffer_get_int(&m);
681 	if (success == 0) {
682 		debug3("%s: pam_init_ctx failed", __func__);
683 		buffer_free(&m);
684 		return (NULL);
685 	}
686 	buffer_free(&m);
687 	return (authctxt);
688 }
689 
690 int
691 mm_pam_query(void *ctx, char **name, char **info,
692     u_int *num, char ***prompts, u_int **echo_on)
693 {
694 	Buffer m;
695 	int i, ret;
696 
697 	debug3("%s", __func__);
698 	buffer_init(&m);
699 	mm_request_send(pmonitor->m_recvfd, MONITOR_REQ_PAM_QUERY, &m);
700 	debug3("%s: waiting for MONITOR_ANS_PAM_QUERY", __func__);
701 	mm_request_receive_expect(pmonitor->m_recvfd, MONITOR_ANS_PAM_QUERY, &m);
702 	ret = buffer_get_int(&m);
703 	debug3("%s: pam_query returned %d", __func__, ret);
704 	*name = buffer_get_string(&m, NULL);
705 	*info = buffer_get_string(&m, NULL);
706 	*num = buffer_get_int(&m);
707 	*prompts = xmalloc((*num + 1) * sizeof(char *));
708 	*echo_on = xmalloc((*num + 1) * sizeof(u_int));
709 	for (i = 0; i < *num; ++i) {
710 		(*prompts)[i] = buffer_get_string(&m, NULL);
711 		(*echo_on)[i] = buffer_get_int(&m);
712 	}
713 	buffer_free(&m);
714 	return (ret);
715 }
716 
717 int
718 mm_pam_respond(void *ctx, u_int num, char **resp)
719 {
720 	Buffer m;
721 	int i, ret;
722 
723 	debug3("%s", __func__);
724 	buffer_init(&m);
725 	buffer_put_int(&m, num);
726 	for (i = 0; i < num; ++i)
727 		buffer_put_cstring(&m, resp[i]);
728 	mm_request_send(pmonitor->m_recvfd, MONITOR_REQ_PAM_RESPOND, &m);
729 	debug3("%s: waiting for MONITOR_ANS_PAM_RESPOND", __func__);
730 	mm_request_receive_expect(pmonitor->m_recvfd, MONITOR_ANS_PAM_RESPOND, &m);
731 	ret = buffer_get_int(&m);
732 	debug3("%s: pam_respond returned %d", __func__, ret);
733 	buffer_free(&m);
734 	return (ret);
735 }
736 
737 void
738 mm_pam_free_ctx(void *ctxtp)
739 {
740 	Buffer m;
741 
742 	debug3("%s", __func__);
743 	buffer_init(&m);
744 	mm_request_send(pmonitor->m_recvfd, MONITOR_REQ_PAM_FREE_CTX, &m);
745 	debug3("%s: waiting for MONITOR_ANS_PAM_FREE_CTX", __func__);
746 	mm_request_receive_expect(pmonitor->m_recvfd, MONITOR_ANS_PAM_FREE_CTX, &m);
747 	buffer_free(&m);
748 }
749 #endif /* USE_PAM */
750 
751 /* Request process termination */
752 
753 void
754 mm_terminate(void)
755 {
756 	Buffer m;
757 
758 	buffer_init(&m);
759 	mm_request_send(pmonitor->m_recvfd, MONITOR_REQ_TERM, &m);
760 	buffer_free(&m);
761 }
762 
763 int
764 mm_ssh1_session_key(BIGNUM *num)
765 {
766 	int rsafail;
767 	Buffer m;
768 
769 	buffer_init(&m);
770 	buffer_put_bignum2(&m, num);
771 	mm_request_send(pmonitor->m_recvfd, MONITOR_REQ_SESSKEY, &m);
772 
773 	mm_request_receive_expect(pmonitor->m_recvfd, MONITOR_ANS_SESSKEY, &m);
774 
775 	rsafail = buffer_get_int(&m);
776 	buffer_get_bignum2(&m, num);
777 
778 	buffer_free(&m);
779 
780 	return (rsafail);
781 }
782 
783 static void
784 mm_chall_setup(char **name, char **infotxt, u_int *numprompts,
785     char ***prompts, u_int **echo_on)
786 {
787 	*name = xstrdup("");
788 	*infotxt = xstrdup("");
789 	*numprompts = 1;
790 	*prompts = xmalloc(*numprompts * sizeof(char *));
791 	*echo_on = xmalloc(*numprompts * sizeof(u_int));
792 	(*echo_on)[0] = 0;
793 }
794 
795 int
796 mm_bsdauth_query(void *ctx, char **name, char **infotxt,
797    u_int *numprompts, char ***prompts, u_int **echo_on)
798 {
799 	Buffer m;
800 	int res;
801 	char *challenge;
802 
803 	debug3("%s: entering", __func__);
804 
805 	buffer_init(&m);
806 	mm_request_send(pmonitor->m_recvfd, MONITOR_REQ_BSDAUTHQUERY, &m);
807 
808 	mm_request_receive_expect(pmonitor->m_recvfd, MONITOR_ANS_BSDAUTHQUERY,
809 	    &m);
810 	res = buffer_get_int(&m);
811 	if (res == -1) {
812 		debug3("%s: no challenge", __func__);
813 		buffer_free(&m);
814 		return (-1);
815 	}
816 
817 	/* Get the challenge, and format the response */
818 	challenge  = buffer_get_string(&m, NULL);
819 	buffer_free(&m);
820 
821 	mm_chall_setup(name, infotxt, numprompts, prompts, echo_on);
822 	(*prompts)[0] = challenge;
823 
824 	debug3("%s: received challenge: %s", __func__, challenge);
825 
826 	return (0);
827 }
828 
829 int
830 mm_bsdauth_respond(void *ctx, u_int numresponses, char **responses)
831 {
832 	Buffer m;
833 	int authok;
834 
835 	debug3("%s: entering", __func__);
836 	if (numresponses != 1)
837 		return (-1);
838 
839 	buffer_init(&m);
840 	buffer_put_cstring(&m, responses[0]);
841 	mm_request_send(pmonitor->m_recvfd, MONITOR_REQ_BSDAUTHRESPOND, &m);
842 
843 	mm_request_receive_expect(pmonitor->m_recvfd,
844 	    MONITOR_ANS_BSDAUTHRESPOND, &m);
845 
846 	authok = buffer_get_int(&m);
847 	buffer_free(&m);
848 
849 	return ((authok == 0) ? -1 : 0);
850 }
851 
852 #ifdef SKEY
853 int
854 mm_skey_query(void *ctx, char **name, char **infotxt,
855    u_int *numprompts, char ***prompts, u_int **echo_on)
856 {
857 	Buffer m;
858 	int len, res;
859 	char *p, *challenge;
860 
861 	debug3("%s: entering", __func__);
862 
863 	buffer_init(&m);
864 	mm_request_send(pmonitor->m_recvfd, MONITOR_REQ_SKEYQUERY, &m);
865 
866 	mm_request_receive_expect(pmonitor->m_recvfd, MONITOR_ANS_SKEYQUERY,
867 	    &m);
868 	res = buffer_get_int(&m);
869 	if (res == -1) {
870 		debug3("%s: no challenge", __func__);
871 		buffer_free(&m);
872 		return (-1);
873 	}
874 
875 	/* Get the challenge, and format the response */
876 	challenge  = buffer_get_string(&m, NULL);
877 	buffer_free(&m);
878 
879 	debug3("%s: received challenge: %s", __func__, challenge);
880 
881 	mm_chall_setup(name, infotxt, numprompts, prompts, echo_on);
882 
883 	len = strlen(challenge) + strlen(SKEY_PROMPT) + 1;
884 	p = xmalloc(len);
885 	strlcpy(p, challenge, len);
886 	strlcat(p, SKEY_PROMPT, len);
887 	(*prompts)[0] = p;
888 	xfree(challenge);
889 
890 	return (0);
891 }
892 
893 int
894 mm_skey_respond(void *ctx, u_int numresponses, char **responses)
895 {
896 	Buffer m;
897 	int authok;
898 
899 	debug3("%s: entering", __func__);
900 	if (numresponses != 1)
901 		return (-1);
902 
903 	buffer_init(&m);
904 	buffer_put_cstring(&m, responses[0]);
905 	mm_request_send(pmonitor->m_recvfd, MONITOR_REQ_SKEYRESPOND, &m);
906 
907 	mm_request_receive_expect(pmonitor->m_recvfd,
908 	    MONITOR_ANS_SKEYRESPOND, &m);
909 
910 	authok = buffer_get_int(&m);
911 	buffer_free(&m);
912 
913 	return ((authok == 0) ? -1 : 0);
914 }
915 #endif
916 
917 void
918 mm_ssh1_session_id(u_char session_id[16])
919 {
920 	Buffer m;
921 	int i;
922 
923 	debug3("%s entering", __func__);
924 
925 	buffer_init(&m);
926 	for (i = 0; i < 16; i++)
927 		buffer_put_char(&m, session_id[i]);
928 
929 	mm_request_send(pmonitor->m_recvfd, MONITOR_REQ_SESSID, &m);
930 	buffer_free(&m);
931 }
932 
933 int
934 mm_auth_rsa_key_allowed(struct passwd *pw, BIGNUM *client_n, Key **rkey)
935 {
936 	Buffer m;
937 	Key *key;
938 	u_char *blob;
939 	u_int blen;
940 	int allowed = 0;
941 
942 	debug3("%s entering", __func__);
943 
944 	buffer_init(&m);
945 	buffer_put_bignum2(&m, client_n);
946 
947 	mm_request_send(pmonitor->m_recvfd, MONITOR_REQ_RSAKEYALLOWED, &m);
948 	mm_request_receive_expect(pmonitor->m_recvfd, MONITOR_ANS_RSAKEYALLOWED, &m);
949 
950 	allowed = buffer_get_int(&m);
951 
952 	if (allowed && rkey != NULL) {
953 		blob = buffer_get_string(&m, &blen);
954 		if ((key = key_from_blob(blob, blen)) == NULL)
955 			fatal("%s: key_from_blob failed", __func__);
956 		*rkey = key;
957 		xfree(blob);
958 	}
959 	mm_send_debug(&m);
960 	buffer_free(&m);
961 
962 	return (allowed);
963 }
964 
965 BIGNUM *
966 mm_auth_rsa_generate_challenge(Key *key)
967 {
968 	Buffer m;
969 	BIGNUM *challenge;
970 	u_char *blob;
971 	u_int blen;
972 
973 	debug3("%s entering", __func__);
974 
975 	if ((challenge = BN_new()) == NULL)
976 		fatal("%s: BN_new failed", __func__);
977 
978 	key->type = KEY_RSA;    /* XXX cheat for key_to_blob */
979 	if (key_to_blob(key, &blob, &blen) == 0)
980 		fatal("%s: key_to_blob failed", __func__);
981 	key->type = KEY_RSA1;
982 
983 	buffer_init(&m);
984 	buffer_put_string(&m, blob, blen);
985 	xfree(blob);
986 
987 	mm_request_send(pmonitor->m_recvfd, MONITOR_REQ_RSACHALLENGE, &m);
988 	mm_request_receive_expect(pmonitor->m_recvfd, MONITOR_ANS_RSACHALLENGE, &m);
989 
990 	buffer_get_bignum2(&m, challenge);
991 	buffer_free(&m);
992 
993 	return (challenge);
994 }
995 
996 int
997 mm_auth_rsa_verify_response(Key *key, BIGNUM *p, u_char response[16])
998 {
999 	Buffer m;
1000 	u_char *blob;
1001 	u_int blen;
1002 	int success = 0;
1003 
1004 	debug3("%s entering", __func__);
1005 
1006 	key->type = KEY_RSA;    /* XXX cheat for key_to_blob */
1007 	if (key_to_blob(key, &blob, &blen) == 0)
1008 		fatal("%s: key_to_blob failed", __func__);
1009 	key->type = KEY_RSA1;
1010 
1011 	buffer_init(&m);
1012 	buffer_put_string(&m, blob, blen);
1013 	buffer_put_string(&m, response, 16);
1014 	xfree(blob);
1015 
1016 	mm_request_send(pmonitor->m_recvfd, MONITOR_REQ_RSARESPONSE, &m);
1017 	mm_request_receive_expect(pmonitor->m_recvfd, MONITOR_ANS_RSARESPONSE, &m);
1018 
1019 	success = buffer_get_int(&m);
1020 	buffer_free(&m);
1021 
1022 	return (success);
1023 }
1024 
1025 #ifdef KRB4
1026 int
1027 mm_auth_krb4(Authctxt *authctxt, void *_auth, char **client, void *_reply)
1028 {
1029 	KTEXT auth, reply;
1030  	Buffer m;
1031 	u_int rlen;
1032 	int success = 0;
1033 	char *p;
1034 
1035 	debug3("%s entering", __func__);
1036 	auth = _auth;
1037 	reply = _reply;
1038 
1039 	buffer_init(&m);
1040 	buffer_put_string(&m, auth->dat, auth->length);
1041 
1042 	mm_request_send(pmonitor->m_recvfd, MONITOR_REQ_KRB4, &m);
1043 	mm_request_receive_expect(pmonitor->m_recvfd, MONITOR_ANS_KRB4, &m);
1044 
1045 	success = buffer_get_int(&m);
1046 	if (success) {
1047 		*client = buffer_get_string(&m, NULL);
1048 		p = buffer_get_string(&m, &rlen);
1049 		if (rlen >= MAX_KTXT_LEN)
1050 			fatal("%s: reply from monitor too large", __func__);
1051 		reply->length = rlen;
1052 		memcpy(reply->dat, p, rlen);
1053 		memset(p, 0, rlen);
1054 		xfree(p);
1055 	}
1056 	buffer_free(&m);
1057 	return (success);
1058 }
1059 #endif
1060 
1061 #ifdef KRB5
1062 int
1063 mm_auth_krb5(void *ctx, void *argp, char **userp, void *resp)
1064 {
1065 	krb5_data *tkt, *reply;
1066 	Buffer m;
1067 	int success;
1068 
1069 	debug3("%s entering", __func__);
1070 	tkt = (krb5_data *) argp;
1071 	reply = (krb5_data *) resp;
1072 
1073 	buffer_init(&m);
1074 	buffer_put_string(&m, tkt->data, tkt->length);
1075 
1076 	mm_request_send(pmonitor->m_recvfd, MONITOR_REQ_KRB5, &m);
1077 	mm_request_receive_expect(pmonitor->m_recvfd, MONITOR_ANS_KRB5, &m);
1078 
1079 	success = buffer_get_int(&m);
1080 	if (success) {
1081 		u_int len;
1082 
1083 		*userp = buffer_get_string(&m, NULL);
1084 		reply->data = buffer_get_string(&m, &len);
1085 		reply->length = len;
1086 	} else {
1087 		memset(reply, 0, sizeof(*reply));
1088 		*userp = NULL;
1089 	}
1090 
1091 	buffer_free(&m);
1092 	return (success);
1093 }
1094 #endif
1095