crypto/openssh/nchan.c

   1 /* $OpenBSD: nchan.c,v 1.62 2008/11/07 18:50:18 stevesk Exp $ */
   2 /*
   3  * Copyright (c) 1999, 2000, 2001, 2002 Markus Friedl.  All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  *
  14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  15  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  16  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  17  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  18  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  19  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  20  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  21  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  22  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  23  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  24  */
  25
  26 #include "includes.h"
  27
  28 #include <sys/types.h>
  29 #include <sys/socket.h>
  30
  31 #include <errno.h>
  32 #include <string.h>
  33 #include <stdarg.h>
  34
  35 #include "openbsd-compat/sys-queue.h"
  36 #include "ssh1.h"
  37 #include "ssh2.h"
  38 #include "buffer.h"
  39 #include "packet.h"
  40 #include "channels.h"
  41 #include "compat.h"
  42 #include "log.h"
  43
  44 /*
  45  * SSH Protocol 1.5 aka New Channel Protocol
  46  * Thanks to Martina, Axel and everyone who left Erlangen, leaving me bored.
  47  * Written by Markus Friedl in October 1999
  48  *
  49  * Protocol versions 1.3 and 1.5 differ in the handshake protocol used for the
  50  * tear down of channels:
  51  *
  52  * 1.3: strict request-ack-protocol:
  53  *      CLOSE   ->
  54  *              <-  CLOSE_CONFIRM
  55  *
  56  * 1.5: uses variations of:
  57  *      IEOF    ->
  58  *              <-  OCLOSE
  59  *              <-  IEOF
  60  *      OCLOSE  ->
  61  *      i.e. both sides have to close the channel
  62  *
  63  * 2.0: the EOF messages are optional
  64  *
  65  * See the debugging output from 'ssh -v' and 'sshd -d' of
  66  * ssh-1.2.27 as an example.
  67  *
  68  */
  69
  70 /* functions manipulating channel states */
  71 /*
  72  * EVENTS update channel input/output states execute ACTIONS
  73  */
  74 /*
  75  * ACTIONS: should never update the channel states
  76  */
  77 static void     chan_send_ieof1(Channel *);
  78 static void     chan_send_oclose1(Channel *);
  79 static void     chan_send_close2(Channel *);
  80 static void     chan_send_eof2(Channel *);
  81 static void     chan_send_eow2(Channel *);
  82
  83 /* helper */
  84 static void     chan_shutdown_write(Channel *);
  85 static void     chan_shutdown_read(Channel *);
  86
  87 static char *ostates[] = { "open", "drain", "wait_ieof", "closed" };
  88 static char *istates[] = { "open", "drain", "wait_oclose", "closed" };
  89
  90 static void
  91 chan_set_istate(Channel *c, u_int next)
  92 {
  93         if (c->istate > CHAN_INPUT_CLOSED || next > CHAN_INPUT_CLOSED)
  94                 fatal("chan_set_istate: bad state %d -> %d", c->istate, next);
  95         debug2("channel %d: input %s -> %s", c->self, istates[c->istate],
  96             istates[next]);
  97         c->istate = next;
  98 }
  99 static void
 100 chan_set_ostate(Channel *c, u_int next)
 101 {
 102         if (c->ostate > CHAN_OUTPUT_CLOSED || next > CHAN_OUTPUT_CLOSED)
 103                 fatal("chan_set_ostate: bad state %d -> %d", c->ostate, next);
 104         debug2("channel %d: output %s -> %s", c->self, ostates[c->ostate],
 105             ostates[next]);
 106         c->ostate = next;
 107 }
 108
 109 /*
 110  * SSH1 specific implementation of event functions
 111  */
 112
 113 static void
 114 chan_rcvd_oclose1(Channel *c)
 115 {
 116         debug2("channel %d: rcvd oclose", c->self);
 117         switch (c->istate) {
 118         case CHAN_INPUT_WAIT_OCLOSE:
 119                 chan_set_istate(c, CHAN_INPUT_CLOSED);
 120                 break;
 121         case CHAN_INPUT_OPEN:
 122                 chan_shutdown_read(c);
 123                 chan_send_ieof1(c);
 124                 chan_set_istate(c, CHAN_INPUT_CLOSED);
 125                 break;
 126         case CHAN_INPUT_WAIT_DRAIN:
 127                 /* both local read_failed and remote write_failed  */
 128                 chan_send_ieof1(c);
 129                 chan_set_istate(c, CHAN_INPUT_CLOSED);
 130                 break;
 131         default:
 132                 error("channel %d: protocol error: rcvd_oclose for istate %d",
 133                     c->self, c->istate);
 134                 return;
 135         }
 136 }
 137 void
 138 chan_read_failed(Channel *c)
 139 {
 140         debug2("channel %d: read failed", c->self);
 141         switch (c->istate) {
 142         case CHAN_INPUT_OPEN:
 143                 chan_shutdown_read(c);
 144                 chan_set_istate(c, CHAN_INPUT_WAIT_DRAIN);
 145                 break;
 146         default:
 147                 error("channel %d: chan_read_failed for istate %d",
 148                     c->self, c->istate);
 149                 break;
 150         }
 151 }
 152 void
 153 chan_ibuf_empty(Channel *c)
 154 {
 155         debug2("channel %d: ibuf empty", c->self);
 156         if (buffer_len(&c->input)) {
 157                 error("channel %d: chan_ibuf_empty for non empty buffer",
 158                     c->self);
 159                 return;
 160         }
 161         switch (c->istate) {
 162         case CHAN_INPUT_WAIT_DRAIN:
 163                 if (compat20) {
 164                         if (!(c->flags & CHAN_CLOSE_SENT))
 165                                 chan_send_eof2(c);
 166                         chan_set_istate(c, CHAN_INPUT_CLOSED);
 167                 } else {
 168                         chan_send_ieof1(c);
 169                         chan_set_istate(c, CHAN_INPUT_WAIT_OCLOSE);
 170                 }
 171                 break;
 172         default:
 173                 error("channel %d: chan_ibuf_empty for istate %d",
 174                     c->self, c->istate);
 175                 break;
 176         }
 177 }
 178 static void
 179 chan_rcvd_ieof1(Channel *c)
 180 {
 181         debug2("channel %d: rcvd ieof", c->self);
 182         switch (c->ostate) {
 183         case CHAN_OUTPUT_OPEN:
 184                 chan_set_ostate(c, CHAN_OUTPUT_WAIT_DRAIN);
 185                 break;
 186         case CHAN_OUTPUT_WAIT_IEOF:
 187                 chan_set_ostate(c, CHAN_OUTPUT_CLOSED);
 188                 break;
 189         default:
 190                 error("channel %d: protocol error: rcvd_ieof for ostate %d",
 191                     c->self, c->ostate);
 192                 break;
 193         }
 194 }
 195 static void
 196 chan_write_failed1(Channel *c)
 197 {
 198         debug2("channel %d: write failed", c->self);
 199         switch (c->ostate) {
 200         case CHAN_OUTPUT_OPEN:
 201                 chan_shutdown_write(c);
 202                 chan_send_oclose1(c);
 203                 chan_set_ostate(c, CHAN_OUTPUT_WAIT_IEOF);
 204                 break;
 205         case CHAN_OUTPUT_WAIT_DRAIN:
 206                 chan_shutdown_write(c);
 207                 chan_send_oclose1(c);
 208                 chan_set_ostate(c, CHAN_OUTPUT_CLOSED);
 209                 break;
 210         default:
 211                 error("channel %d: chan_write_failed for ostate %d",
 212                     c->self, c->ostate);
 213                 break;
 214         }
 215 }
 216 void
 217 chan_obuf_empty(Channel *c)
 218 {
 219         debug2("channel %d: obuf empty", c->self);
 220         if (buffer_len(&c->output)) {
 221                 error("channel %d: chan_obuf_empty for non empty buffer",
 222                     c->self);
 223                 return;
 224         }
 225         switch (c->ostate) {
 226         case CHAN_OUTPUT_WAIT_DRAIN:
 227                 chan_shutdown_write(c);
 228                 if (!compat20)
 229                         chan_send_oclose1(c);
 230                 chan_set_ostate(c, CHAN_OUTPUT_CLOSED);
 231                 break;
 232         default:
 233                 error("channel %d: internal error: obuf_empty for ostate %d",
 234                     c->self, c->ostate);
 235                 break;
 236         }
 237 }
 238 static void
 239 chan_send_ieof1(Channel *c)
 240 {
 241         debug2("channel %d: send ieof", c->self);
 242         switch (c->istate) {
 243         case CHAN_INPUT_OPEN:
 244         case CHAN_INPUT_WAIT_DRAIN:
 245                 packet_start(SSH_MSG_CHANNEL_INPUT_EOF);
 246                 packet_put_int(c->remote_id);
 247                 packet_send();
 248                 break;
 249         default:
 250                 error("channel %d: cannot send ieof for istate %d",
 251                     c->self, c->istate);
 252                 break;
 253         }
 254 }
 255 static void
 256 chan_send_oclose1(Channel *c)
 257 {
 258         debug2("channel %d: send oclose", c->self);
 259         switch (c->ostate) {
 260         case CHAN_OUTPUT_OPEN:
 261         case CHAN_OUTPUT_WAIT_DRAIN:
 262                 buffer_clear(&c->output);
 263                 packet_start(SSH_MSG_CHANNEL_OUTPUT_CLOSE);
 264                 packet_put_int(c->remote_id);
 265                 packet_send();
 266                 break;
 267         default:
 268                 error("channel %d: cannot send oclose for ostate %d",
 269                     c->self, c->ostate);
 270                 break;
 271         }
 272 }
 273
 274 /*
 275  * the same for SSH2
 276  */
 277 static void
 278 chan_rcvd_close2(Channel *c)
 279 {
 280         debug2("channel %d: rcvd close", c->self);
 281         if (c->flags & CHAN_CLOSE_RCVD)
 282                 error("channel %d: protocol error: close rcvd twice", c->self);
 283         c->flags |= CHAN_CLOSE_RCVD;
 284         if (c->type == SSH_CHANNEL_LARVAL) {
 285                 /* tear down larval channels immediately */
 286                 chan_set_ostate(c, CHAN_OUTPUT_CLOSED);
 287                 chan_set_istate(c, CHAN_INPUT_CLOSED);
 288                 return;
 289         }
 290         switch (c->ostate) {
 291         case CHAN_OUTPUT_OPEN:
 292                 /*
 293                  * wait until a data from the channel is consumed if a CLOSE
 294                  * is received
 295                  */
 296                 chan_set_ostate(c, CHAN_OUTPUT_WAIT_DRAIN);
 297                 break;
 298         }
 299         switch (c->istate) {
 300         case CHAN_INPUT_OPEN:
 301                 chan_shutdown_read(c);
 302                 chan_set_istate(c, CHAN_INPUT_CLOSED);
 303                 break;
 304         case CHAN_INPUT_WAIT_DRAIN:
 305                 chan_send_eof2(c);
 306                 chan_set_istate(c, CHAN_INPUT_CLOSED);
 307                 break;
 308         }
 309 }
 310 void
 311 chan_rcvd_eow(Channel *c)
 312 {
 313         debug2("channel %d: rcvd eow", c->self);
 314         switch (c->istate) {
 315         case CHAN_INPUT_OPEN:
 316                 chan_shutdown_read(c);
 317                 chan_set_istate(c, CHAN_INPUT_CLOSED);
 318                 break;
 319         }
 320 }
 321 static void
 322 chan_rcvd_eof2(Channel *c)
 323 {
 324         debug2("channel %d: rcvd eof", c->self);
 325         c->flags |= CHAN_EOF_RCVD;
 326         if (c->ostate == CHAN_OUTPUT_OPEN)
 327                 chan_set_ostate(c, CHAN_OUTPUT_WAIT_DRAIN);
 328 }
 329 static void
 330 chan_write_failed2(Channel *c)
 331 {
 332         debug2("channel %d: write failed", c->self);
 333         switch (c->ostate) {
 334         case CHAN_OUTPUT_OPEN:
 335         case CHAN_OUTPUT_WAIT_DRAIN:
 336                 chan_shutdown_write(c);
 337                 if (strcmp(c->ctype, "session") == 0)
 338                         chan_send_eow2(c);
 339                 chan_set_ostate(c, CHAN_OUTPUT_CLOSED);
 340                 break;
 341         default:
 342                 error("channel %d: chan_write_failed for ostate %d",
 343                     c->self, c->ostate);
 344                 break;
 345         }
 346 }
 347 static void
 348 chan_send_eof2(Channel *c)
 349 {
 350         debug2("channel %d: send eof", c->self);
 351         switch (c->istate) {
 352         case CHAN_INPUT_WAIT_DRAIN:
 353                 packet_start(SSH2_MSG_CHANNEL_EOF);
 354                 packet_put_int(c->remote_id);
 355                 packet_send();
 356                 c->flags |= CHAN_EOF_SENT;
 357                 break;
 358         default:
 359                 error("channel %d: cannot send eof for istate %d",
 360                     c->self, c->istate);
 361                 break;
 362         }
 363 }
 364 static void
 365 chan_send_close2(Channel *c)
 366 {
 367         debug2("channel %d: send close", c->self);
 368         if (c->ostate != CHAN_OUTPUT_CLOSED ||
 369             c->istate != CHAN_INPUT_CLOSED) {
 370                 error("channel %d: cannot send close for istate/ostate %d/%d",
 371                     c->self, c->istate, c->ostate);
 372         } else if (c->flags & CHAN_CLOSE_SENT) {
 373                 error("channel %d: already sent close", c->self);
 374         } else {
 375                 packet_start(SSH2_MSG_CHANNEL_CLOSE);
 376                 packet_put_int(c->remote_id);
 377                 packet_send();
 378                 c->flags |= CHAN_CLOSE_SENT;
 379         }
 380 }
 381 static void
 382 chan_send_eow2(Channel *c)
 383 {
 384         debug2("channel %d: send eow", c->self);
 385         if (c->ostate == CHAN_OUTPUT_CLOSED) {
 386                 error("channel %d: must not sent eow on closed output",
 387                     c->self);
 388                 return;
 389         }
 390         if (!(datafellows & SSH_NEW_OPENSSH))
 391                 return;
 392         packet_start(SSH2_MSG_CHANNEL_REQUEST);
 393         packet_put_int(c->remote_id);
 394         packet_put_cstring("eow@openssh.com");
 395         packet_put_char(0);
 396         packet_send();
 397 }
 398
 399 /* shared */
 400
 401 void
 402 chan_rcvd_ieof(Channel *c)
 403 {
 404         if (compat20)
 405                 chan_rcvd_eof2(c);
 406         else
 407                 chan_rcvd_ieof1(c);
 408         if (c->ostate == CHAN_OUTPUT_WAIT_DRAIN &&
 409             buffer_len(&c->output) == 0 &&
 410             !CHANNEL_EFD_OUTPUT_ACTIVE(c))
 411                 chan_obuf_empty(c);
 412 }
 413 void
 414 chan_rcvd_oclose(Channel *c)
 415 {
 416         if (compat20)
 417                 chan_rcvd_close2(c);
 418         else
 419                 chan_rcvd_oclose1(c);
 420 }
 421 void
 422 chan_write_failed(Channel *c)
 423 {
 424         if (compat20)
 425                 chan_write_failed2(c);
 426         else
 427                 chan_write_failed1(c);
 428 }
 429
 430 void
 431 chan_mark_dead(Channel *c)
 432 {
 433         c->type = SSH_CHANNEL_ZOMBIE;
 434 }
 435
 436 int
 437 chan_is_dead(Channel *c, int do_send)
 438 {
 439         if (c->type == SSH_CHANNEL_ZOMBIE) {
 440                 debug2("channel %d: zombie", c->self);
 441                 return 1;
 442         }
 443         if (c->istate != CHAN_INPUT_CLOSED || c->ostate != CHAN_OUTPUT_CLOSED)
 444                 return 0;
 445         if (!compat20) {
 446                 debug2("channel %d: is dead", c->self);
 447                 return 1;
 448         }
 449         if ((datafellows & SSH_BUG_EXTEOF) &&
 450             c->extended_usage == CHAN_EXTENDED_WRITE &&
 451             c->efd != -1 &&
 452             buffer_len(&c->extended) > 0) {
 453                 debug2("channel %d: active efd: %d len %d",
 454                     c->self, c->efd, buffer_len(&c->extended));
 455                 return 0;
 456         }
 457         if (!(c->flags & CHAN_CLOSE_SENT)) {
 458                 if (do_send) {
 459                         chan_send_close2(c);
 460                 } else {
 461                         /* channel would be dead if we sent a close */
 462                         if (c->flags & CHAN_CLOSE_RCVD) {
 463                                 debug2("channel %d: almost dead",
 464                                     c->self);
 465                                 return 1;
 466                         }
 467                 }
 468         }
 469         if ((c->flags & CHAN_CLOSE_SENT) &&
 470             (c->flags & CHAN_CLOSE_RCVD)) {
 471                 debug2("channel %d: is dead", c->self);
 472                 return 1;
 473         }
 474         return 0;
 475 }
 476
 477 /* helper */
 478 static void
 479 chan_shutdown_write(Channel *c)
 480 {
 481         buffer_clear(&c->output);
 482         if (compat20 && c->type == SSH_CHANNEL_LARVAL)
 483                 return;
 484         /* shutdown failure is allowed if write failed already */
 485         debug2("channel %d: close_write", c->self);
 486         if (c->sock != -1) {
 487                 if (shutdown(c->sock, SHUT_WR) < 0)
 488                         debug2("channel %d: chan_shutdown_write: "
 489                             "shutdown() failed for fd %d: %.100s",
 490                             c->self, c->sock, strerror(errno));
 491         } else {
 492                 if (channel_close_fd(&c->wfd) < 0)
 493                         logit("channel %d: chan_shutdown_write: "
 494                             "close() failed for fd %d: %.100s",
 495                             c->self, c->wfd, strerror(errno));
 496         }
 497 }
 498 static void
 499 chan_shutdown_read(Channel *c)
 500 {
 501         if (compat20 && c->type == SSH_CHANNEL_LARVAL)
 502                 return;
 503         debug2("channel %d: close_read", c->self);
 504         if (c->sock != -1) {
 505                 /*
 506                  * shutdown(sock, SHUT_READ) may return ENOTCONN if the
 507                  * write side has been closed already. (bug on Linux)
 508                  * HP-UX may return ENOTCONN also.
 509                  */
 510                 if (shutdown(c->sock, SHUT_RD) < 0
 511                     && errno != ENOTCONN)
 512                         error("channel %d: chan_shutdown_read: "
 513                             "shutdown() failed for fd %d [i%d o%d]: %.100s",
 514                             c->self, c->sock, c->istate, c->ostate,
 515                             strerror(errno));
 516         } else {
 517                 if (channel_close_fd(&c->rfd) < 0)
 518                         logit("channel %d: chan_shutdown_read: "
 519                             "close() failed for fd %d: %.100s",
 520                             c->self, c->rfd, strerror(errno));
 521         }
 522 }