22 MSG_USERAUTH_REQUEST = 50,
27 MSG_USERAUTH_PK_OK = 60,
28 MSG_USERAUTH_INFO_REQUEST = 60,
29 MSG_USERAUTH_INFO_RESPONSE = 61,
31 MSG_GLOBAL_REQUEST = 80,
35 MSG_CHANNEL_OPEN = 90,
36 MSG_CHANNEL_OPEN_CONFIRMATION,
37 MSG_CHANNEL_OPEN_FAILURE,
38 MSG_CHANNEL_WINDOW_ADJUST,
40 MSG_CHANNEL_EXTENDED_DATA,
50 Overhead = 256, // enougth for MSG_CHANNEL_DATA header
52 WinPackets = 8, // (1<<15) * 8 = 256K
55 int MaxPwTries = 3; // retry this often for keyboard-interactive
72 uchar b[Overhead + MaxPacket];
81 char thumb[2*SHA2_256dlen+1], *thumbfile;
83 int fd, intr, raw, port, mux, debug;
84 char *user, *service, *status, *host, *remote, *cmd;
92 recv.eof = send.eof = 1;
94 postnote(PNPROC, send.pid, "shutdown");
98 catch(void*, char *msg)
100 if(strcmp(msg, "interrupt") == 0){
113 memset(err, 0, sizeof(err));
114 errstr(err, sizeof(err));
115 r = strcmp(err, "interrupted") == 0;
116 errstr(err, sizeof(err));
120 #define PUT4(p, u) (p)[0] = (u)>>24, (p)[1] = (u)>>16, (p)[2] = (u)>>8, (p)[3] = (u)
121 #define GET4(p) (u32int)(p)[3] | (u32int)(p)[2]<<8 | (u32int)(p)[1]<<16 | (u32int)(p)[0]<<24
124 vpack(uchar *p, int n, char *fmt, va_list a)
126 uchar *p0 = p, *e = p+n;
137 if(++p > e) goto err;
140 *va_arg(a, void**) = p;
144 *p++ = va_arg(a, int);
147 m = va_arg(a, mpint*);
148 u = (mpsignif(m)+8)/8;
149 if(p+4 > e) goto err;
151 if(u > e-p) goto err;
152 mptober(m, p, u), p += u;
156 s = va_arg(a, void*);
159 if(p+4 > e) goto err;
162 if(u > e-p) goto err;
168 if(p+4 > e) goto err;
178 vunpack(uchar *p, int n, char *fmt, va_list a)
180 uchar *p0 = p, *e = p+n;
190 if(++p > e) goto err;
193 *va_arg(a, void**) = p;
197 *va_arg(a, int*) = *p++;
200 if(p+4 > e) goto err;
202 if(u > e-p) goto err;
203 m = va_arg(a, mpint*);
204 betomp(p, u, m), p += u;
207 if(p+4 > e) goto err;
209 if(u > e-p) goto err;
210 *va_arg(a, void**) = p;
211 *va_arg(a, int*) = u;
215 s = va_arg(a, void*);
217 if(u > e-p) goto err;
222 if(p+4 > e) goto err;
224 *va_arg(a, int*) = u;
234 pack(uchar *p, int n, char *fmt, ...)
238 n = vpack(p, n, fmt, a);
243 unpack(uchar *p, int n, char *fmt, ...)
247 n = vunpack(p, n, fmt, a);
253 setupcs(Oneway *c, uchar otk[32])
258 pack(iv, sizeof(iv), "uu", 0, c->seq);
259 chacha_setiv(&c->cs1, iv);
260 chacha_setiv(&c->cs2, iv);
261 chacha_setblock(&c->cs1, 0);
262 chacha_setblock(&c->cs2, 0);
263 chacha_encrypt(otk, 32, &c->cs2);
267 sendpkt(char *fmt, ...)
269 static uchar buf[sizeof(send.b)];
274 n = vpack(send.b, sizeof(send.b), fmt, a);
277 toobig: sysfatal("sendpkt: message too big");
284 fprint(2, "sendpkt: (%d) %.*H\n", send.r[0], (int)(send.w-send.r), send.r);
288 pad = ChachaBsize - ((5+n) % ChachaBsize) + 4;
290 for(pad=4; (5+n+pad) % 8; pad++)
294 n = pack(buf, sizeof(buf)-16, "ub[[", 1+n+pad, pad, send.b, n, send.w, pad);
295 if(n < 0) goto toobig;
300 chacha_encrypt(buf, 4, &send.cs1);
301 chacha_encrypt(buf+4, n-4, &send.cs2);
302 poly1305(buf, n, otk, sizeof(otk), buf+n, nil);
306 if(write(fd, buf, n) != n)
307 sysfatal("write: %r");
313 readall(int fd, uchar *data, int len)
317 for(tot = 0; tot < len; tot += n){
318 n = read(fd, data+tot, len-tot);
320 if(n < 0 && wasintr()){
334 uchar otk[32], tag[16];
335 DigestState *ds = nil;
338 if(readall(fd, recv.b, 4) != 4)
339 sysfatal("read1: %r");
342 ds = poly1305(recv.b, 4, otk, sizeof(otk), nil, nil);
343 chacha_encrypt(recv.b, 4, &recv.cs1);
344 unpack(recv.b, 4, "u", &n);
347 unpack(recv.b, 4, "u", &n);
349 if(n < 8 || n > sizeof(recv.b)){
350 badlen: sysfatal("bad length %d", n);
352 if(readall(fd, recv.b, n) != n)
353 sysfatal("read2: %r");
356 if(n < 0) goto badlen;
357 poly1305(recv.b, n, otk, sizeof(otk), tag, ds);
358 if(tsmemcmp(tag, recv.b+n, 16) != 0)
360 chacha_encrypt(recv.b, n, &recv.cs2);
363 if(n < 1) goto badlen;
370 fprint(2, "recvpkt: (%d) %.*H\n", recv.r[0], (int)(recv.w-recv.r), recv.r);
375 static char sshrsa[] = "ssh-rsa";
378 rsapub2ssh(RSApub *rsa, uchar *data, int len)
380 return pack(data, len, "smm", sshrsa, sizeof(sshrsa)-1, rsa->ek, rsa->n);
384 ssh2rsapub(uchar *data, int len)
393 if(unpack(data, len, "smm", &s, &n, pub->ek, pub->n) < 0
394 || n != sizeof(sshrsa)-1 || memcmp(s, sshrsa, n) != 0){
402 rsasig2ssh(RSApub *pub, mpint *S, uchar *data, int len)
404 int l = (mpsignif(pub->n)+7)/8;
407 mptober(S, data+4+7+4, l);
408 return pack(data, len, "ss", sshrsa, sizeof(sshrsa)-1, data+4+7+4, l);
412 ssh2rsasig(uchar *data, int len)
419 if(unpack(data, len, "sm", &s, &n, m) < 0
420 || n != sizeof(sshrsa)-1 || memcmp(s, sshrsa, n) != 0){
428 pkcs1digest(uchar *data, int len, RSApub *pub)
430 uchar digest[SHA1dlen], buf[256];
432 sha1(data, len, digest, nil);
433 return pkcs1padbuf(buf, asn1encodedigest(sha1, digest, buf, sizeof(buf)), pub->n, 1);
437 pkcs1verify(uchar *data, int len, RSApub *pub, mpint *S)
442 V = pkcs1digest(data, len, pub);
445 rsaencrypt(pub, S, S);
446 ret = mpcmp(V, S) == 0;
453 hashstr(void *data, ulong len, DigestState *ds)
456 pack(l, 4, "u", len);
457 return sha2_256((uchar*)data, len, nil, sha2_256(l, 4, nil, ds));
461 kdf(uchar *k, int nk, uchar *h, char x, uchar *out, int len)
463 uchar digest[SHA2_256dlen], *out0;
467 ds = hashstr(k, nk, nil);
468 ds = sha2_256(h, sizeof(digest), nil, ds);
469 ds = sha2_256((uchar*)&x, 1, nil, ds);
470 sha2_256(sid, nsid, digest, ds);
473 if(n > sizeof(digest))
475 memmove(out, digest, n);
480 ds = hashstr(k, nk, nil);
481 ds = sha2_256(h, sizeof(digest), nil, ds);
482 sha2_256(out0, out-out0, digest, ds);
489 static char kexalgs[] = "curve25519-sha256,curve25519-sha256@libssh.org";
490 static char cipheralgs[] = "chacha20-poly1305@openssh.com";
491 static char zipalgs[] = "none";
492 static char macalgs[] = "hmac-sha1"; /* work around for github.com */
493 static char langs[] = "";
495 uchar cookie[16], x[32], yc[32], z[32], k[32+1], h[SHA2_256dlen], *ys, *ks, *sig;
496 uchar k12[2*ChachaKeylen];
497 int i, nk, nys, nks, nsig;
502 ds = hashstr(send.v, strlen(send.v), nil);
503 ds = hashstr(recv.v, strlen(recv.v), ds);
505 genrandom(cookie, sizeof(cookie));
506 sendpkt("b[ssssssssssbu", MSG_KEXINIT,
507 cookie, sizeof(cookie),
508 kexalgs, sizeof(kexalgs)-1,
509 sshrsa, sizeof(sshrsa)-1,
510 cipheralgs, sizeof(cipheralgs)-1,
511 cipheralgs, sizeof(cipheralgs)-1,
512 macalgs, sizeof(macalgs)-1,
513 macalgs, sizeof(macalgs)-1,
514 zipalgs, sizeof(zipalgs)-1,
515 zipalgs, sizeof(zipalgs)-1,
516 langs, sizeof(langs)-1,
517 langs, sizeof(langs)-1,
520 ds = hashstr(send.r, send.w-send.r, ds);
523 Next0: switch(recvpkt()){
531 ds = hashstr(recv.r, recv.w-recv.r, ds);
535 "kexalgs", "hostalgs",
536 "cipher1", "cipher2",
542 uchar *p = recv.r+17;
544 for(t=tab; *t != nil; t++){
545 if(unpack(p, recv.w-p, "s.", &s, &n, &p) < 0)
547 fprint(2, "%s: %.*s\n", *t, utfnlen(s, n), s);
551 curve25519_dh_new(x, yc);
554 sendpkt("bs", MSG_ECDH_INIT, yc, sizeof(yc));
555 Next1: switch(recvpkt()){
560 sysfatal("inception");
562 if(unpack(recv.r, recv.w-recv.r, "_sss", &ks, &nks, &ys, &nys, &sig, &nsig) < 0)
563 sysfatal("bad ECDH_REPLY");
568 sysfatal("bad server ECDH ephermal public key length");
570 ds = hashstr(ks, nks, ds);
571 ds = hashstr(yc, 32, ds);
572 ds = hashstr(ys, 32, ds);
577 sha2_256(ks, nks, h, nil);
578 i = enc64(thumb, sizeof(thumb), h, sizeof(h));
579 while(i > 0 && thumb[i-1] == '=')
584 fprint(2, "host fingerprint: %s\n", thumb);
586 ok = initThumbprints(thumbfile, nil, "ssh");
587 if(ok == nil || !okThumbprint(h, sizeof(h), ok)){
588 if(ok != nil) werrstr("unknown host");
589 fprint(2, "%s: %r\n", argv0);
590 fprint(2, "verify hostkey: %s %.*[\n", sshrsa, nks, ks);
591 fprint(2, "add thumbprint after verification:\n");
592 fprint(2, "\techo 'ssh sha256=%s server=%s' >> %q\n", thumb, host, thumbfile);
593 sysfatal("checking hostkey failed: %r");
598 if((pub = ssh2rsapub(ks, nks)) == nil)
599 sysfatal("bad server public key");
600 if((S = ssh2rsasig(sig, nsig)) == nil)
601 sysfatal("bad server signature");
603 curve25519_dh_finish(x, ys, z);
605 K = betomp(z, 32, nil);
606 nk = (mpsignif(K)+8)/8;
610 ds = hashstr(k, nk, ds);
611 sha2_256(nil, 0, h, ds);
612 if(!pkcs1verify(h, sizeof(h), pub, S))
613 sysfatal("server verification failed");
617 sendpkt("b", MSG_NEWKEYS);
618 Next2: switch(recvpkt()){
623 sysfatal("inception");
628 /* next key exchange */
629 recv.kex = recv.seq + 100000;
630 send.kex = send.seq + 100000;
633 memmove(sid, h, nsid = sizeof(h));
635 kdf(k, nk, h, 'C', k12, sizeof(k12));
636 setupChachastate(&send.cs1, k12+1*ChachaKeylen, ChachaKeylen, nil, 64/8, 20);
637 setupChachastate(&send.cs2, k12+0*ChachaKeylen, ChachaKeylen, nil, 64/8, 20);
639 kdf(k, nk, h, 'D', k12, sizeof(k12));
640 setupChachastate(&recv.cs1, k12+1*ChachaKeylen, ChachaKeylen, nil, 64/8, 20);
641 setupChachastate(&recv.cs2, k12+0*ChachaKeylen, ChachaKeylen, nil, 64/8, 20);
644 static char *authnext;
649 int ok = authnext == nil || strstr(authnext, meth) != nil;
651 fprint(2, "userauth %s %s\n", meth, ok ? "ok" : "skipped");
656 authfailure(char *meth)
661 if(unpack(recv.r, recv.w-recv.r, "_sb", &s, &n, &partial) < 0)
662 sysfatal("bad auth failure response");
664 authnext = smprint("%.*s", utfnlen(s, n), s);
666 fprint(2, "userauth %s failed: partial=%d, next=%s\n", meth, partial, authnext);
667 return partial != 0 || !authok(meth);
673 static char authmeth[] = "none";
675 if(!authok(authmeth))
678 sendpkt("bsss", MSG_USERAUTH_REQUEST,
680 service, strlen(service),
681 authmeth, sizeof(authmeth)-1);
683 Next0: switch(recvpkt()){
687 case MSG_USERAUTH_FAILURE:
688 werrstr("authentication needed");
689 authfailure(authmeth);
691 case MSG_USERAUTH_SUCCESS:
699 static char authmeth[] = "publickey";
701 uchar pk[4096], sig[4096];
710 if(!authok(authmeth))
713 if((afd = open("/mnt/factotum/rpc", ORDWR)) < 0)
715 if((rpc = auth_allocrpc(afd)) == nil){
720 s = "proto=rsa service=ssh role=client";
721 if(auth_rpc(rpc, "start", s, strlen(s)) != ARok){
731 while(auth_rpc(rpc, "read", nil, 0) == ARok){
733 if(strtomp(s, &s, 16, pub->n) == nil)
737 if(strtomp(s, nil, 16, pub->ek) == nil)
739 npk = rsapub2ssh(pub, pk, sizeof(pk));
741 sendpkt("bsssbss", MSG_USERAUTH_REQUEST,
743 service, strlen(service),
744 authmeth, sizeof(authmeth)-1,
746 sshrsa, sizeof(sshrsa)-1,
748 Next1: switch(recvpkt()){
752 case MSG_USERAUTH_FAILURE:
753 if(authfailure(authmeth))
756 case MSG_USERAUTH_SUCCESS:
757 case MSG_USERAUTH_PK_OK:
761 /* sign sid and the userauth request */
762 n = pack(send.b, sizeof(send.b), "sbsssbss",
764 MSG_USERAUTH_REQUEST,
766 service, strlen(service),
767 authmeth, sizeof(authmeth)-1,
769 sshrsa, sizeof(sshrsa)-1,
771 S = pkcs1digest(send.b, n, pub);
772 n = snprint((char*)send.b, sizeof(send.b), "%B", S);
775 if(auth_rpc(rpc, "write", (char*)send.b, n) != ARok)
777 if(auth_rpc(rpc, "read", nil, 0) != ARok)
780 S = strtomp(rpc->arg, nil, 16, nil);
781 nsig = rsasig2ssh(pub, S, sig, sizeof(sig));
784 /* send final userauth request with the signature */
785 sendpkt("bsssbsss", MSG_USERAUTH_REQUEST,
787 service, strlen(service),
788 authmeth, sizeof(authmeth)-1,
790 sshrsa, sizeof(sshrsa)-1,
793 Next2: switch(recvpkt()){
797 case MSG_USERAUTH_FAILURE:
798 if(authfailure(authmeth))
801 case MSG_USERAUTH_SUCCESS:
819 static char authmeth[] = "password";
822 if(!authok(authmeth))
825 up = auth_getuserpasswd(auth_getkey, "proto=pass service=ssh user=%q server=%q thumb=%q",
830 sendpkt("bsssbs", MSG_USERAUTH_REQUEST,
832 service, strlen(service),
833 authmeth, sizeof(authmeth)-1,
835 up->passwd, strlen(up->passwd));
837 memset(up->passwd, 0, strlen(up->passwd));
840 Next0: switch(recvpkt()){
844 case MSG_USERAUTH_FAILURE:
845 werrstr("wrong password");
846 authfailure(authmeth);
848 case MSG_USERAUTH_SUCCESS:
856 static char authmeth[] = "keyboard-interactive";
859 char *name, *inst, *s, *a;
865 if(!authok(authmeth))
869 if(++tries > MaxPwTries)
872 sendpkt("bsssss", MSG_USERAUTH_REQUEST,
874 service, strlen(service),
875 authmeth, sizeof(authmeth)-1,
879 Next0: switch(recvpkt()){
883 case MSG_USERAUTH_FAILURE:
884 werrstr("keyboard-interactive failed");
885 if(authfailure(authmeth))
888 case MSG_USERAUTH_SUCCESS:
890 case MSG_USERAUTH_INFO_REQUEST:
894 if((fd = open("/dev/cons", OWRITE)) < 0)
897 if(unpack(recv.r, recv.w-recv.r, "_ss.", &name, &n, &inst, &m, &recv.r) < 0)
898 sysfatal("bad info request: name, inst");
900 while(n > 0 && strchr("\r\n\t ", name[n-1]) != nil)
902 while(m > 0 && strchr("\r\n\t ", inst[m-1]) != nil)
906 fprint(fd, "%.*s\n", utfnlen(name, n), name);
908 fprint(fd, "%.*s\n", utfnlen(inst, m), inst);
911 if(unpack(recv.r, recv.w-recv.r, "su.", &s, &n, &nquest, &recv.r) < 0)
912 sysfatal("bad info request: lang, #quest");
915 for(i = 0; i < nquest; i++){
916 if(unpack(recv.r, recv.w-recv.r, "sb.", &s, &n, &echo, &recv.r) < 0)
917 sysfatal("bad info request: question [%d]", i);
919 while(n > 0 && strchr("\r\n\t :", s[n-1]) != nil)
923 if((a = readcons(s, nil, !echo)) == nil)
924 sysfatal("readcons: %r");
928 if((s = realloc(ans, n + m)) == nil)
929 sysfatal("realloc: %r");
932 answ += pack(answ, m, "s", a, m-4);
935 sendpkt("bu[", MSG_USERAUTH_INFO_RESPONSE, i, ans, answ - ans);
939 Next1: switch(recvpkt()){
943 case MSG_USERAUTH_INFO_REQUEST:
945 case MSG_USERAUTH_FAILURE:
946 werrstr("keyboard-interactive failed");
947 if(authfailure(authmeth))
950 case MSG_USERAUTH_SUCCESS:
965 case MSG_GLOBAL_REQUEST:
966 if(unpack(recv.r, recv.w-recv.r, "_sb", &s, &n, &b) < 0)
969 fprint(2, "%s: global request: %.*s\n",
970 argv0, utfnlen(s, n), s);
972 sendpkt("b", MSG_REQUEST_FAILURE);
975 if(unpack(recv.r, recv.w-recv.r, "_us", &c, &s, &n) < 0)
977 sysfatal("disconnect: (%d) %.*s", c, utfnlen(s, n), s);
980 if(unpack(recv.r, recv.w-recv.r, "__sb", &s, &n, &c) < 0)
983 fprint(2, "%s: %.*s\n", argv0, utfnlen(s, n), s);
985 case MSG_USERAUTH_BANNER:
986 if(unpack(recv.r, recv.w-recv.r, "_s", &s, &n) < 0)
988 if(raw) write(2, s, n);
997 if(write(1, recv.r, n) != n)
998 sysfatal("write out: %r");
1003 case MSG_CHANNEL_DATA:
1004 if(unpack(recv.r, recv.w-recv.r, "_us", &c, &s, &n) < 0)
1008 if(write(1, s, n) != n)
1009 sysfatal("write out: %r");
1012 if(recv.win < recv.pkt){
1013 n = WinPackets*recv.pkt;
1015 sendpkt("buu", MSG_CHANNEL_WINDOW_ADJUST, send.chan, n);
1018 case MSG_CHANNEL_EXTENDED_DATA:
1019 if(unpack(recv.r, recv.w-recv.r, "_uus", &c, &b, &s, &n) < 0)
1023 if(b == 1) write(2, s, n);
1025 case MSG_CHANNEL_WINDOW_ADJUST:
1026 if(unpack(recv.r, recv.w-recv.r, "_uu", &c, &n) < 0)
1031 if(send.win >= send.pkt)
1034 case MSG_CHANNEL_REQUEST:
1035 if(unpack(recv.r, recv.w-recv.r, "_usb.", &c, &s, &n, &b, &p) < 0)
1039 if(n == 11 && memcmp(s, "exit-signal", n) == 0){
1040 if(unpack(p, recv.w-p, "s", &s, &n) < 0)
1042 if(n != 0 && status == nil)
1043 status = smprint("%.*s", utfnlen(s, n), s);
1044 c = MSG_CHANNEL_SUCCESS;
1045 } else if(n == 11 && memcmp(s, "exit-status", n) == 0){
1046 if(unpack(p, recv.w-p, "u", &n) < 0)
1048 if(n != 0 && status == nil)
1049 status = smprint("%d", n);
1050 c = MSG_CHANNEL_SUCCESS;
1053 fprint(2, "%s: channel request: %.*s\n",
1054 argv0, utfnlen(s, n), s);
1055 c = MSG_CHANNEL_FAILURE;
1058 sendpkt("bu", c, recv.chan);
1060 case MSG_CHANNEL_EOF:
1062 if(!raw) write(1, "", 0);
1064 case MSG_CHANNEL_CLOSE:
1068 sysfatal("got: %.*H", (int)(recv.w - recv.r), recv.r);
1076 for(p = send.b; p < &send.b[sizeof(send.b)-1]; p++){
1078 if(read(fd, p, 1) != 1 || *p == '\n')
1081 while(p >= send.b && (*p == '\n' || *p == '\r'))
1083 return (char*)send.b;
1099 if(s = getenv("XPIXELS")){
1100 tty.xpixels = atoi(s);
1103 if(s = getenv("YPIXELS")){
1104 tty.ypixels = atoi(s);
1107 if(s = getenv("LINES")){
1108 tty.lines = atoi(s);
1111 if(s = getenv("COLS")){
1123 if(open("/dev/cons", OREAD) != 0)
1124 sysfatal("open: %r");
1126 if(open("/dev/cons", OWRITE) != 1)
1127 sysfatal("open: %r");
1129 if((ctl = open("/dev/consctl", OWRITE)) >= 0){
1130 write(ctl, "rawon", 5);
1131 write(ctl, "winchon", 7); /* vt(1): interrupt note on window change */
1136 #pragma varargck type "k" char*
1143 s = va_arg(f->args, char*);
1144 n = fmtstrcpy(f, "'");
1145 while((p = strchr(s, '\'')) != nil){
1147 n += fmtstrcpy(f, s);
1149 n += fmtstrcpy(f, "'\\''");
1152 n += fmtstrcpy(f, s);
1153 n += fmtstrcpy(f, "'");
1160 fprint(2, "usage: %s [-dR] [-t thumbfile] [-T tries] [-u user] [-h] [user@]host [-W remote!port] [cmd args...]\n", argv0);
1165 main(int argc, char *argv[])
1172 fmtinstall('B', mpfmt);
1173 fmtinstall('H', encodefmt);
1174 fmtinstall('[', encodefmt);
1175 fmtinstall('k', kfmt);
1177 tty.term = getenv("TERM");
1180 raw = *tty.term != 0;
1187 remote = EARGF(usage());
1188 s = strrchr(remote, '!');
1190 s = strrchr(remote, ':');
1201 raw = 2; /* bloody */
1204 user = EARGF(usage());
1207 host = EARGF(usage());
1210 thumbfile = EARGF(usage());
1213 MaxPwTries = strtol(EARGF(usage()), &s, 0);
1214 if(*s != 0) usage();
1231 s = strchr(host, '@');
1239 for(cmd = nil; *argv != nil; argv++){
1241 cmd = strdup(*argv);
1245 s = smprint("%s %k", cmd, *argv);
1251 if(remote != nil && cmd != nil)
1254 if((fd = dial(netmkaddr(host, nil, "ssh"), nil, nil, nil)) < 0)
1255 sysfatal("dial: %r");
1257 send.v = "SSH-2.0-(9)";
1258 fprint(fd, "%s\r\n", send.v);
1259 recv.v = readline();
1261 fprint(2, "server verison: %s\n", recv.v);
1262 if(strncmp("SSH-2.0-", recv.v, 8) != 0)
1263 sysfatal("bad server version: %s", recv.v);
1264 recv.v = strdup(recv.v);
1266 send.l = recv.l = &sl;
1270 if(thumbfile == nil)
1271 thumbfile = smprint("%s/lib/sshthumbs", getenv("home"));
1275 sendpkt("bs", MSG_SERVICE_REQUEST, "ssh-userauth", 12);
1276 Next0: switch(recvpkt()){
1280 case MSG_SERVICE_ACCEPT:
1284 service = "ssh-connection";
1285 if(noneauth() < 0 && pubkeyauth() < 0 && passauth() < 0 && kbintauth() < 0)
1286 sysfatal("auth: %r");
1288 recv.pkt = send.pkt = MaxPacket;
1289 recv.win = send.win = WinPackets*recv.pkt;
1290 recv.chan = send.win = 0;
1295 /* open hailing frequencies */
1297 NetConnInfo *nci = getnetconninfo(nil, fd);
1299 sysfatal("can't get netconninfo: %r");
1300 sendpkt("bsuuususu", MSG_CHANNEL_OPEN,
1305 remote, strlen(remote),
1307 nci->laddr, strlen(nci->laddr),
1311 sendpkt("bsuuu", MSG_CHANNEL_OPEN,
1317 Next1: switch(recvpkt()){
1321 case MSG_CHANNEL_OPEN_FAILURE:
1322 if(unpack(recv.r, recv.w-recv.r, "_uus", &c, &b, &s, &n) < 0)
1323 n = strlen(s = "???");
1324 sysfatal("channel open failure: (%d) %.*s", b, utfnlen(s, n), s);
1325 case MSG_CHANNEL_OPEN_CONFIRMATION:
1329 if(unpack(recv.r, recv.w-recv.r, "_uuuu", &recv.chan, &send.chan, &send.win, &send.pkt) < 0)
1330 sysfatal("bad channel open confirmation");
1331 if(send.pkt <= 0 || send.pkt > MaxPacket)
1332 send.pkt = MaxPacket;
1339 sendpkt("busbsuuuus", MSG_CHANNEL_REQUEST,
1343 tty.term, strlen(tty.term),
1351 sendpkt("busb", MSG_CHANNEL_REQUEST,
1355 } else if(*cmd == '#') {
1356 sendpkt("busbs", MSG_CHANNEL_REQUEST,
1360 cmd+1, strlen(cmd)-1);
1362 sendpkt("busbs", MSG_CHANNEL_REQUEST,
1373 recv.pid = getpid();
1374 n = rfork(RFPROC|RFMEM);
1376 sysfatal("fork: %r");
1378 /* parent reads and dispatches packets */
1381 while(recv.eof == 0){
1385 if((int)(send.kex - send.seq) <= 0 || (int)(recv.kex - recv.seq) <= 0)
1392 /* child reads input and sends packets */
1395 static uchar buf[MaxPacket];
1397 n = read(0, buf, send.pkt);
1401 if(n < 0 && wasintr())
1406 sendpkt("busbuuuu", MSG_CHANNEL_REQUEST,
1408 "window-change", 13,
1414 sendpkt("busbs", MSG_CHANNEL_REQUEST,
1425 sendpkt("[", buf, n);
1431 sendpkt("bus", MSG_CHANNEL_DATA,
1435 if(send.eof++ == 0 && !mux)
1436 sendpkt("bu", raw ? MSG_CHANNEL_CLOSE : MSG_CHANNEL_EOF, send.chan);
1437 else if(recv.pid > 0 && mux)
1438 postnote(PNPROC, recv.pid, "shutdown");