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