[BACK]Return to packet.c CVS log [TXT][DIR] Up to [local] / src / usr.bin / ssh

Diff for /src/usr.bin/ssh/packet.c between version 1.38 and 1.38.2.6

version 1.38, 2000/10/12 14:21:12 version 1.38.2.6, 2001/11/15 00:14:59
Line 13 
Line 13 
  *   *
  *   *
  * SSH2 packet format added by Markus Friedl.   * SSH2 packet format added by Markus Friedl.
  * Copyright (c) 2000 Markus Friedl.  All rights reserved.   * Copyright (c) 2000, 2001 Markus Friedl.  All rights reserved.
  *   *
  * Redistribution and use in source and binary forms, with or without   * Redistribution and use in source and binary forms, with or without
  * modification, are permitted provided that the following conditions   * modification, are permitted provided that the following conditions
Line 43 
Line 43 
 #include "buffer.h"  #include "buffer.h"
 #include "packet.h"  #include "packet.h"
 #include "bufaux.h"  #include "bufaux.h"
 #include "ssh.h"  
 #include "crc32.h"  #include "crc32.h"
 #include "getput.h"  #include "getput.h"
   
Line 52 
Line 51 
 #include "channels.h"  #include "channels.h"
   
 #include "compat.h"  #include "compat.h"
   #include "ssh1.h"
 #include "ssh2.h"  #include "ssh2.h"
   
 #include <openssl/bn.h>  
 #include <openssl/dh.h>  
 #include <openssl/hmac.h>  
 #include "buffer.h"  
 #include "cipher.h"  #include "cipher.h"
 #include "kex.h"  #include "kex.h"
 #include "hmac.h"  #include "mac.h"
   #include "log.h"
   #include "canohost.h"
   
 #ifdef PACKET_DEBUG  #ifdef PACKET_DEBUG
 #define DBG(x) x  #define DBG(x) x
Line 77 
Line 75 
 static int connection_in = -1;  static int connection_in = -1;
 static int connection_out = -1;  static int connection_out = -1;
   
 /*  
  * Cipher type.  This value is only used to determine whether to pad the  
  * packets with zeroes or random data.  
  */  
 static int cipher_type = SSH_CIPHER_NONE;  
   
 /* Protocol flags for the remote side. */  /* Protocol flags for the remote side. */
 static unsigned int remote_protocol_flags = 0;  static u_int remote_protocol_flags = 0;
   
 /* Encryption context for receiving data.  This is only used for decryption. */  /* Encryption context for receiving data.  This is only used for decryption. */
 static CipherContext receive_context;  static CipherContext receive_context;
Line 106 
Line 98 
   
 /* Scratch buffer for packet compression/decompression. */  /* Scratch buffer for packet compression/decompression. */
 static Buffer compression_buffer;  static Buffer compression_buffer;
   static int compression_buffer_ready = 0;
   
 /* Flag indicating whether packet compression/decompression is enabled. */  /* Flag indicating whether packet compression/decompression is enabled. */
 static int packet_compression = 0;  static int packet_compression = 0;
Line 119 
Line 112 
 /* Set to true if the connection is interactive. */  /* Set to true if the connection is interactive. */
 static int interactive_mode = 0;  static int interactive_mode = 0;
   
 /* True if SSH2 packet format is used */  
 int use_ssh2_packet_format = 0;  
   
 /* Session key information for Encryption and MAC */  /* Session key information for Encryption and MAC */
 Kex     *kex = NULL;  Newkeys *newkeys[MODE_MAX];
   
 void  
 packet_set_kex(Kex *k)  
 {  
         if( k->mac[MODE_IN ].key == NULL ||  
             k->enc[MODE_IN ].key == NULL ||  
             k->enc[MODE_IN ].iv  == NULL ||  
             k->mac[MODE_OUT].key == NULL ||  
             k->enc[MODE_OUT].key == NULL ||  
             k->enc[MODE_OUT].iv  == NULL)  
                 fatal("bad KEX");  
         kex = k;  
 }  
 void  
 clear_enc_keys(Enc *enc, int len)  
 {  
         memset(enc->iv,  0, len);  
         memset(enc->key, 0, len);  
         xfree(enc->iv);  
         xfree(enc->key);  
         enc->iv = NULL;  
         enc->key = NULL;  
 }  
 void  
 packet_set_ssh2_format(void)  
 {  
         DBG(debug("use_ssh2_packet_format"));  
         use_ssh2_packet_format = 1;  
 }  
   
 /*  /*
  * Sets the descriptors used for communication.  Disables encryption until   * Sets the descriptors used for communication.  Disables encryption until
  * packet_set_encryption_key is called.   * packet_set_encryption_key is called.
Line 166 
Line 127 
                 fatal("packet_set_connection: cannot load cipher 'none'");                  fatal("packet_set_connection: cannot load cipher 'none'");
         connection_in = fd_in;          connection_in = fd_in;
         connection_out = fd_out;          connection_out = fd_out;
         cipher_type = SSH_CIPHER_NONE;          cipher_init(&send_context, none, (u_char *) "", 0, NULL, 0);
         cipher_init(&send_context, none, (unsigned char *) "", 0, NULL, 0);          cipher_init(&receive_context, none, (u_char *) "", 0, NULL, 0);
         cipher_init(&receive_context, none, (unsigned char *) "", 0, NULL, 0);          newkeys[MODE_IN] = newkeys[MODE_OUT] = NULL;
         if (!initialized) {          if (!initialized) {
                 initialized = 1;                  initialized = 1;
                 buffer_init(&input);                  buffer_init(&input);
Line 272 
Line 233 
         buffer_free(&output);          buffer_free(&output);
         buffer_free(&outgoing_packet);          buffer_free(&outgoing_packet);
         buffer_free(&incoming_packet);          buffer_free(&incoming_packet);
         if (packet_compression) {          if (compression_buffer_ready) {
                 buffer_free(&compression_buffer);                  buffer_free(&compression_buffer);
                 buffer_compress_uninit();                  buffer_compress_uninit();
         }          }
Line 281 
Line 242 
 /* Sets remote side protocol flags. */  /* Sets remote side protocol flags. */
   
 void  void
 packet_set_protocol_flags(unsigned int protocol_flags)  packet_set_protocol_flags(u_int protocol_flags)
 {  {
         remote_protocol_flags = protocol_flags;          remote_protocol_flags = protocol_flags;
         channel_set_options((protocol_flags & SSH_PROTOFLAG_HOST_IN_FWD_OPEN) != 0);  
 }  }
   
 /* Returns the remote protocol flags set earlier by the above function. */  /* Returns the remote protocol flags set earlier by the above function. */
   
 unsigned int  u_int
 packet_get_protocol_flags()  packet_get_protocol_flags()
 {  {
         return remote_protocol_flags;          return remote_protocol_flags;
Line 300 
Line 260 
  * Level is compression level 1 (fastest) - 9 (slow, best) as in gzip.   * Level is compression level 1 (fastest) - 9 (slow, best) as in gzip.
  */   */
   
 /*** XXXXX todo: kex means re-init */  static void
 void  packet_init_compression(void)
 packet_start_compression(int level)  
 {  {
         if (packet_compression)          if (compression_buffer_ready == 1)
                 fatal("Compression already enabled.");                  return;
         packet_compression = 1;          compression_buffer_ready = 1;
         buffer_init(&compression_buffer);          buffer_init(&compression_buffer);
         buffer_compress_init(level);  
 }  }
   
 /*  
  * Encrypts the given number of bytes, copying from src to dest. bytes is  
  * known to be a multiple of 8.  
  */  
   
 void  void
 packet_encrypt(CipherContext * cc, void *dest, void *src,  packet_start_compression(int level)
     unsigned int bytes)  
 {  {
         cipher_encrypt(cc, dest, src, bytes);          if (packet_compression && !compat20)
                   fatal("Compression already enabled.");
           packet_compression = 1;
           packet_init_compression();
           buffer_compress_init_send(level);
           buffer_compress_init_recv();
 }  }
   
 /*  /*
  * Decrypts the given number of bytes, copying from src to dest. bytes is  
  * known to be a multiple of 8.  
  */  
   
 void  
 packet_decrypt(CipherContext *context, void *dest, void *src, unsigned int bytes)  
 {  
         /*  
          * Cryptographic attack detector for ssh - Modifications for packet.c  
          * (C)1998 CORE-SDI, Buenos Aires Argentina Ariel Futoransky(futo@core-sdi.com)  
          */  
         if (!compat20 &&  
             context->cipher->number != SSH_CIPHER_NONE &&  
             detect_attack(src, bytes, NULL) == DEATTACK_DETECTED)  
                 packet_disconnect("crc32 compensation attack: network attack detected");  
   
         cipher_decrypt(context, dest, src, bytes);  
 }  
   
 /*  
  * Causes any further packets to be encrypted using the given key.  The same   * Causes any further packets to be encrypted using the given key.  The same
  * key is used for both sending and reception.  However, both directions are   * key is used for both sending and reception.  However, both directions are
  * encrypted independently of each other.   * encrypted independently of each other.
  */   */
   
 void  void
 packet_set_encryption_key(const unsigned char *key, unsigned int keylen,  packet_set_encryption_key(const u_char *key, u_int keylen,
     int number)      int number)
 {  {
         Cipher *cipher = cipher_by_number(number);          Cipher *cipher = cipher_by_number(number);
Line 362 
Line 298 
         cipher_init(&send_context, cipher, key, keylen, NULL, 0);          cipher_init(&send_context, cipher, key, keylen, NULL, 0);
 }  }
   
 /* Starts constructing a packet to send. */  /* Start constructing a packet to send. */
   
 void  void
 packet_start1(int type)  packet_start(u_char type)
 {  {
         char buf[9];          u_char buf[9];
           int len;
   
           DBG(debug("packet_start[%d]", type));
           len = compat20 ? 6 : 9;
           memset(buf, 0, len - 1);
           buf[len - 1] = type;
         buffer_clear(&outgoing_packet);          buffer_clear(&outgoing_packet);
         memset(buf, 0, 8);          buffer_append(&outgoing_packet, buf, len);
         buf[8] = type;  
         buffer_append(&outgoing_packet, buf, 9);  
 }  }
   
   /* Append payload. */
 void  void
 packet_start2(int type)  
 {  
         char buf[4+1+1];  
   
         buffer_clear(&outgoing_packet);  
         memset(buf, 0, sizeof buf);  
         /* buf[0..3] = payload_len; */  
         /* buf[4] =    pad_len; */  
         buf[5] = type & 0xff;  
         buffer_append(&outgoing_packet, buf, sizeof buf);  
 }  
   
 void  
 packet_start(int type)  
 {  
         DBG(debug("packet_start[%d]",type));  
         if (use_ssh2_packet_format)  
                 packet_start2(type);  
         else  
                 packet_start1(type);  
 }  
   
 /* Appends a character to the packet data. */  
   
 void  
 packet_put_char(int value)  packet_put_char(int value)
 {  {
         char ch = value;          char ch = value;
         buffer_append(&outgoing_packet, &ch, 1);          buffer_append(&outgoing_packet, &ch, 1);
 }  }
   
 /* Appends an integer to the packet data. */  
   
 void  void
 packet_put_int(unsigned int value)  packet_put_int(u_int value)
 {  {
         buffer_put_int(&outgoing_packet, value);          buffer_put_int(&outgoing_packet, value);
 }  }
   
 /* Appends a string to packet data. */  
   
 void  void
 packet_put_string(const char *buf, unsigned int len)  packet_put_string(const char *buf, u_int len)
 {  {
         buffer_put_string(&outgoing_packet, buf, len);          buffer_put_string(&outgoing_packet, buf, len);
 }  }
 void  void
 packet_put_cstring(const char *str)  packet_put_cstring(const char *str)
 {  {
         buffer_put_string(&outgoing_packet, str, strlen(str));          buffer_put_cstring(&outgoing_packet, str);
 }  }
   
 void  void
 packet_put_raw(const char *buf, unsigned int len)  packet_put_raw(const char *buf, u_int len)
 {  {
         buffer_append(&outgoing_packet, buf, len);          buffer_append(&outgoing_packet, buf, len);
 }  }
   
   
 /* Appends an arbitrary precision integer to packet data. */  
   
 void  void
 packet_put_bignum(BIGNUM * value)  packet_put_bignum(BIGNUM * value)
 {  {
Line 453 
Line 356 
  * encrypts the packet before sending.   * encrypts the packet before sending.
  */   */
   
 void  static void
 packet_send1()  packet_send1(void)
 {  {
         char buf[8], *cp;          char buf[8], *cp;
         int i, padding, len;          int i, padding, len;
         unsigned int checksum;          u_int checksum;
         u_int32_t rand = 0;          u_int32_t rand = 0;
   
         /*          /*
Line 481 
Line 384 
   
         /* Insert padding. Initialized to zero in packet_start1() */          /* Insert padding. Initialized to zero in packet_start1() */
         padding = 8 - len % 8;          padding = 8 - len % 8;
         if (cipher_type != SSH_CIPHER_NONE) {          if (send_context.cipher->number != SSH_CIPHER_NONE) {
                 cp = buffer_ptr(&outgoing_packet);                  cp = buffer_ptr(&outgoing_packet);
                 for (i = 0; i < padding; i++) {                  for (i = 0; i < padding; i++) {
                         if (i % 4 == 0)                          if (i % 4 == 0)
Line 493 
Line 396 
         buffer_consume(&outgoing_packet, 8 - padding);          buffer_consume(&outgoing_packet, 8 - padding);
   
         /* Add check bytes. */          /* Add check bytes. */
         checksum = ssh_crc32((unsigned char *) buffer_ptr(&outgoing_packet),          checksum = ssh_crc32((u_char *) buffer_ptr(&outgoing_packet),
             buffer_len(&outgoing_packet));              buffer_len(&outgoing_packet));
         PUT_32BIT(buf, checksum);          PUT_32BIT(buf, checksum);
         buffer_append(&outgoing_packet, buf, 4);          buffer_append(&outgoing_packet, buf, 4);
Line 507 
Line 410 
         PUT_32BIT(buf, len);          PUT_32BIT(buf, len);
         buffer_append(&output, buf, 4);          buffer_append(&output, buf, 4);
         buffer_append_space(&output, &cp, buffer_len(&outgoing_packet));          buffer_append_space(&output, &cp, buffer_len(&outgoing_packet));
         packet_encrypt(&send_context, cp, buffer_ptr(&outgoing_packet),          cipher_encrypt(&send_context, cp, buffer_ptr(&outgoing_packet),
                        buffer_len(&outgoing_packet));                         buffer_len(&outgoing_packet));
   
 #ifdef PACKET_DEBUG  #ifdef PACKET_DEBUG
Line 524 
Line 427 
          */           */
 }  }
   
   static void
   set_newkeys(int mode)
   {
           Enc *enc;
           Mac *mac;
           Comp *comp;
           CipherContext *cc;
   
           debug("newkeys: mode %d", mode);
   
           cc = (mode == MODE_OUT) ? &send_context : &receive_context;
           if (newkeys[mode] != NULL) {
                   debug("newkeys: rekeying");
                   /* todo: free old keys, reset compression/cipher-ctxt; */
                   memset(cc, 0, sizeof(*cc));
                   enc  = &newkeys[mode]->enc;
                   mac  = &newkeys[mode]->mac;
                   comp = &newkeys[mode]->comp;
                   memset(mac->key, 0, mac->key_len);
                   xfree(enc->name);
                   xfree(enc->iv);
                   xfree(enc->key);
                   xfree(mac->name);
                   xfree(mac->key);
                   xfree(comp->name);
                   xfree(newkeys[mode]);
           }
           newkeys[mode] = kex_get_newkeys(mode);
           if (newkeys[mode] == NULL)
                   fatal("newkeys: no keys for mode %d", mode);
           enc  = &newkeys[mode]->enc;
           mac  = &newkeys[mode]->mac;
           comp = &newkeys[mode]->comp;
           if (mac->md != NULL)
                   mac->enabled = 1;
           DBG(debug("cipher_init_context: %d", mode));
           cipher_init(cc, enc->cipher, enc->key, enc->cipher->key_len,
               enc->iv, enc->cipher->block_size);
           memset(enc->iv,  0, enc->cipher->block_size);
           memset(enc->key, 0, enc->cipher->key_len);
           if (comp->type != 0 && comp->enabled == 0) {
                   packet_init_compression();
                   if (mode == MODE_OUT)
                           buffer_compress_init_send(6);
                   else
                           buffer_compress_init_recv();
                   comp->enabled = 1;
           }
   }
   
 /*  /*
  * Finalize packet in SSH2 format (compress, mac, encrypt, enqueue)   * Finalize packet in SSH2 format (compress, mac, encrypt, enqueue)
  */   */
 void  static void
 packet_send2()  packet_send2(void)
 {  {
         unsigned char *macbuf = NULL;          static u_int32_t seqnr = 0;
           u_char type, *ucp, *macbuf = NULL;
         char *cp;          char *cp;
         unsigned int packet_length = 0;          u_int packet_length = 0;
         unsigned int i, padlen, len;          u_int i, padlen, len;
         u_int32_t rand = 0;          u_int32_t rand = 0;
         static unsigned int seqnr = 0;  
         int type;  
         Enc *enc   = NULL;          Enc *enc   = NULL;
         Mac *mac   = NULL;          Mac *mac   = NULL;
         Comp *comp = NULL;          Comp *comp = NULL;
         int block_size;          int block_size;
   
         if (kex != NULL) {          if (newkeys[MODE_OUT] != NULL) {
                 enc  = &kex->enc[MODE_OUT];                  enc  = &newkeys[MODE_OUT]->enc;
                 mac  = &kex->mac[MODE_OUT];                  mac  = &newkeys[MODE_OUT]->mac;
                 comp = &kex->comp[MODE_OUT];                  comp = &newkeys[MODE_OUT]->comp;
         }          }
         block_size = enc ? enc->cipher->block_size : 8;          block_size = enc ? enc->cipher->block_size : 8;
   
         cp = buffer_ptr(&outgoing_packet);          ucp = (u_char *) buffer_ptr(&outgoing_packet);
         type = cp[5] & 0xff;          type = ucp[5];
   
 #ifdef PACKET_DEBUG  #ifdef PACKET_DEBUG
         fprintf(stderr, "plain:     ");          fprintf(stderr, "plain:     ");
Line 588 
Line 540 
                         if (i % 4 == 0)                          if (i % 4 == 0)
                                 rand = arc4random();                                  rand = arc4random();
                         cp[i] = rand & 0xff;                          cp[i] = rand & 0xff;
                         rand <<= 8;                          rand >>= 8;
                 }                  }
         } else {          } else {
                 /* clear padding */                  /* clear padding */
Line 596 
Line 548 
         }          }
         /* packet_length includes payload, padding and padding length field */          /* packet_length includes payload, padding and padding length field */
         packet_length = buffer_len(&outgoing_packet) - 4;          packet_length = buffer_len(&outgoing_packet) - 4;
         cp = buffer_ptr(&outgoing_packet);          ucp = (u_char *)buffer_ptr(&outgoing_packet);
         PUT_32BIT(cp, packet_length);          PUT_32BIT(ucp, packet_length);
         cp[4] = padlen & 0xff;          ucp[4] = padlen;
         DBG(debug("send: len %d (includes padlen %d)", packet_length+4, padlen));          DBG(debug("send: len %d (includes padlen %d)", packet_length+4, padlen));
   
         /* compute MAC over seqnr and packet(length fields, payload, padding) */          /* compute MAC over seqnr and packet(length fields, payload, padding) */
         if (mac && mac->enabled) {          if (mac && mac->enabled) {
                 macbuf = hmac( mac->md, seqnr,                  macbuf = mac_compute(mac, seqnr,
                     (unsigned char *) buffer_ptr(&outgoing_packet),                      (u_char *) buffer_ptr(&outgoing_packet),
                     buffer_len(&outgoing_packet),                      buffer_len(&outgoing_packet));
                     mac->key, mac->key_len  
                 );  
                 DBG(debug("done calc MAC out #%d", seqnr));                  DBG(debug("done calc MAC out #%d", seqnr));
         }          }
         /* encrypt packet and append to output buffer. */          /* encrypt packet and append to output buffer. */
         buffer_append_space(&output, &cp, buffer_len(&outgoing_packet));          buffer_append_space(&output, &cp, buffer_len(&outgoing_packet));
         packet_encrypt(&send_context, cp, buffer_ptr(&outgoing_packet),          cipher_encrypt(&send_context, cp, buffer_ptr(&outgoing_packet),
             buffer_len(&outgoing_packet));              buffer_len(&outgoing_packet));
         /* append unencrypted MAC */          /* append unencrypted MAC */
         if (mac && mac->enabled)          if (mac && mac->enabled)
Line 626 
Line 576 
                 log("outgoing seqnr wraps around");                  log("outgoing seqnr wraps around");
         buffer_clear(&outgoing_packet);          buffer_clear(&outgoing_packet);
   
         if (type == SSH2_MSG_NEWKEYS) {          if (type == SSH2_MSG_NEWKEYS)
                 if (kex==NULL || mac==NULL || enc==NULL || comp==NULL)                  set_newkeys(MODE_OUT);
                         fatal("packet_send2: no KEX");  
                 if (mac->md != NULL)  
                         mac->enabled = 1;  
                 DBG(debug("cipher_init send_context"));  
                 cipher_init(&send_context, enc->cipher,  
                     enc->key, enc->cipher->key_len,  
                     enc->iv, enc->cipher->block_size);  
                 clear_enc_keys(enc, kex->we_need);  
                 if (comp->type != 0 && comp->enabled == 0) {  
                         comp->enabled = 1;  
                         if (! packet_compression)  
                                 packet_start_compression(6);  
                 }  
         }  
 }  }
   
 void  void
 packet_send()  packet_send()
 {  {
         if (use_ssh2_packet_format)          if (compat20)
                 packet_send2();                  packet_send2();
         else          else
                 packet_send1();                  packet_send1();
Line 664 
Line 600 
 packet_read(int *payload_len_ptr)  packet_read(int *payload_len_ptr)
 {  {
         int type, len;          int type, len;
         fd_set set;          fd_set *setp;
         char buf[8192];          char buf[8192];
         DBG(debug("packet_read()"));          DBG(debug("packet_read()"));
   
           setp = (fd_set *)xmalloc(howmany(connection_in+1, NFDBITS) *
               sizeof(fd_mask));
   
         /* Since we are blocking, ensure that all written packets have been sent. */          /* Since we are blocking, ensure that all written packets have been sent. */
         packet_write_wait();          packet_write_wait();
   
Line 675 
Line 614 
         for (;;) {          for (;;) {
                 /* Try to read a packet from the buffer. */                  /* Try to read a packet from the buffer. */
                 type = packet_read_poll(payload_len_ptr);                  type = packet_read_poll(payload_len_ptr);
                 if (!use_ssh2_packet_format && (                  if (!compat20 && (
                     type == SSH_SMSG_SUCCESS                      type == SSH_SMSG_SUCCESS
                     || type == SSH_SMSG_FAILURE                      || type == SSH_SMSG_FAILURE
                     || type == SSH_CMSG_EOF                      || type == SSH_CMSG_EOF
                     || type == SSH_CMSG_EXIT_CONFIRMATION))                      || type == SSH_CMSG_EXIT_CONFIRMATION))
                         packet_integrity_check(*payload_len_ptr, 0, type);                          packet_integrity_check(*payload_len_ptr, 0, type);
                 /* If we got a packet, return it. */                  /* If we got a packet, return it. */
                 if (type != SSH_MSG_NONE)                  if (type != SSH_MSG_NONE) {
                           xfree(setp);
                         return type;                          return type;
                   }
                 /*                  /*
                  * Otherwise, wait for some data to arrive, add it to the                   * Otherwise, wait for some data to arrive, add it to the
                  * buffer, and try again.                   * buffer, and try again.
                  */                   */
                 FD_ZERO(&set);                  memset(setp, 0, howmany(connection_in + 1, NFDBITS) *
                 FD_SET(connection_in, &set);                      sizeof(fd_mask));
                   FD_SET(connection_in, setp);
   
                 /* Wait for some data to arrive. */                  /* Wait for some data to arrive. */
                 select(connection_in + 1, &set, NULL, NULL, NULL);                  while (select(connection_in + 1, setp, NULL, NULL, NULL) == -1 &&
                       (errno == EAGAIN || errno == EINTR))
                           ;
   
                 /* Read data from the socket. */                  /* Read data from the socket. */
                 len = read(connection_in, buf, sizeof(buf));                  len = read(connection_in, buf, sizeof(buf));
Line 739 
Line 683 
  *      Check bytes   *      Check bytes
  */   */
   
 int  static int
 packet_read_poll1(int *payload_len_ptr)  packet_read_poll1(int *payload_len_ptr)
 {  {
         unsigned int len, padded_len;          u_int len, padded_len;
         unsigned char *ucp;          u_char *ucp, type;
         char buf[8], *cp;          char *cp;
         unsigned int checksum, stored_checksum;          u_int checksum, stored_checksum;
   
         /* Check if input size is less than minimum packet size. */          /* Check if input size is less than minimum packet size. */
         if (buffer_len(&input) < 4 + 8)          if (buffer_len(&input) < 4 + 8)
                 return SSH_MSG_NONE;                  return SSH_MSG_NONE;
         /* Get length of incoming packet. */          /* Get length of incoming packet. */
         ucp = (unsigned char *) buffer_ptr(&input);          ucp = (u_char *) buffer_ptr(&input);
         len = GET_32BIT(ucp);          len = GET_32BIT(ucp);
         if (len < 1 + 2 + 2 || len > 256 * 1024)          if (len < 1 + 2 + 2 || len > 256 * 1024)
                 packet_disconnect("Bad packet length %d.", len);                  packet_disconnect("Bad packet length %d.", len);
Line 766 
Line 710 
         /* Consume packet length. */          /* Consume packet length. */
         buffer_consume(&input, 4);          buffer_consume(&input, 4);
   
         /* Copy data to incoming_packet. */          /*
            * Cryptographic attack detector for ssh
            * (C)1998 CORE-SDI, Buenos Aires Argentina
            * Ariel Futoransky(futo@core-sdi.com)
            */
           if (receive_context.cipher->number != SSH_CIPHER_NONE &&
               detect_attack(buffer_ptr(&input), padded_len, NULL) == DEATTACK_DETECTED)
                   packet_disconnect("crc32 compensation attack: network attack detected");
   
           /* Decrypt data to incoming_packet. */
         buffer_clear(&incoming_packet);          buffer_clear(&incoming_packet);
         buffer_append_space(&incoming_packet, &cp, padded_len);          buffer_append_space(&incoming_packet, &cp, padded_len);
         packet_decrypt(&receive_context, cp, buffer_ptr(&input), padded_len);          cipher_decrypt(&receive_context, cp, buffer_ptr(&input), padded_len);
   
         buffer_consume(&input, padded_len);          buffer_consume(&input, padded_len);
   
 #ifdef PACKET_DEBUG  #ifdef PACKET_DEBUG
Line 778 
Line 732 
 #endif  #endif
   
         /* Compute packet checksum. */          /* Compute packet checksum. */
         checksum = ssh_crc32((unsigned char *) buffer_ptr(&incoming_packet),          checksum = ssh_crc32((u_char *) buffer_ptr(&incoming_packet),
             buffer_len(&incoming_packet) - 4);              buffer_len(&incoming_packet) - 4);
   
         /* Skip padding. */          /* Skip padding. */
         buffer_consume(&incoming_packet, 8 - len % 8);          buffer_consume(&incoming_packet, 8 - len % 8);
   
         /* Test check bytes. */          /* Test check bytes. */
   
         if (len != buffer_len(&incoming_packet))          if (len != buffer_len(&incoming_packet))
                 packet_disconnect("packet_read_poll: len %d != buffer_len %d.",                  packet_disconnect("packet_read_poll: len %d != buffer_len %d.",
                     len, buffer_len(&incoming_packet));                      len, buffer_len(&incoming_packet));
   
         ucp = (unsigned char *) buffer_ptr(&incoming_packet) + len - 4;          ucp = (u_char *) buffer_ptr(&incoming_packet) + len - 4;
         stored_checksum = GET_32BIT(ucp);          stored_checksum = GET_32BIT(ucp);
         if (checksum != stored_checksum)          if (checksum != stored_checksum)
                 packet_disconnect("Corrupted check bytes on input.");                  packet_disconnect("Corrupted check bytes on input.");
         buffer_consume_end(&incoming_packet, 4);          buffer_consume_end(&incoming_packet, 4);
   
         /* If using packet compression, decompress the packet. */  
         if (packet_compression) {          if (packet_compression) {
                 buffer_clear(&compression_buffer);                  buffer_clear(&compression_buffer);
                 buffer_uncompress(&incoming_packet, &compression_buffer);                  buffer_uncompress(&incoming_packet, &compression_buffer);
Line 804 
Line 756 
                 buffer_append(&incoming_packet, buffer_ptr(&compression_buffer),                  buffer_append(&incoming_packet, buffer_ptr(&compression_buffer),
                     buffer_len(&compression_buffer));                      buffer_len(&compression_buffer));
         }          }
         /* Get packet type. */          type = buffer_get_char(&incoming_packet);
         buffer_get(&incoming_packet, &buf[0], 1);  
   
         /* Return length of payload (without type field). */  
         *payload_len_ptr = buffer_len(&incoming_packet);          *payload_len_ptr = buffer_len(&incoming_packet);
           return type;
         /* Return type. */  
         return (unsigned char) buf[0];  
 }  }
   
 int  static int
 packet_read_poll2(int *payload_len_ptr)  packet_read_poll2(int *payload_len_ptr)
 {  {
         unsigned int padlen, need;          static u_int32_t seqnr = 0;
         unsigned char buf[8], *macbuf;          static u_int packet_length = 0;
         unsigned char *ucp;          u_int padlen, need;
           u_char *macbuf, *ucp, type;
         char *cp;          char *cp;
         static unsigned int packet_length = 0;  
         static unsigned int seqnr = 0;  
         int type;  
         int maclen, block_size;          int maclen, block_size;
         Enc *enc   = NULL;          Enc *enc   = NULL;
         Mac *mac   = NULL;          Mac *mac   = NULL;
         Comp *comp = NULL;          Comp *comp = NULL;
   
         if (kex != NULL) {          if (newkeys[MODE_IN] != NULL) {
                 enc  = &kex->enc[MODE_IN];                  enc  = &newkeys[MODE_IN]->enc;
                 mac  = &kex->mac[MODE_IN];                  mac  = &newkeys[MODE_IN]->mac;
                 comp = &kex->comp[MODE_IN];                  comp = &newkeys[MODE_IN]->comp;
         }          }
         maclen = mac && mac->enabled ? mac->mac_len : 0;          maclen = mac && mac->enabled ? mac->mac_len : 0;
         block_size = enc ? enc->cipher->block_size : 8;          block_size = enc ? enc->cipher->block_size : 8;
Line 846 
Line 791 
                         return SSH_MSG_NONE;                          return SSH_MSG_NONE;
                 buffer_clear(&incoming_packet);                  buffer_clear(&incoming_packet);
                 buffer_append_space(&incoming_packet, &cp, block_size);                  buffer_append_space(&incoming_packet, &cp, block_size);
                 packet_decrypt(&receive_context, cp, buffer_ptr(&input),                  cipher_decrypt(&receive_context, cp, buffer_ptr(&input),
                     block_size);                      block_size);
                 ucp = (unsigned char *) buffer_ptr(&incoming_packet);                  ucp = (u_char *) buffer_ptr(&incoming_packet);
                 packet_length = GET_32BIT(ucp);                  packet_length = GET_32BIT(ucp);
                 if (packet_length < 1 + 4 || packet_length > 256 * 1024) {                  if (packet_length < 1 + 4 || packet_length > 256 * 1024) {
                         buffer_dump(&incoming_packet);                          buffer_dump(&incoming_packet);
Line 875 
Line 820 
         buffer_dump(&input);          buffer_dump(&input);
 #endif  #endif
         buffer_append_space(&incoming_packet, &cp, need);          buffer_append_space(&incoming_packet, &cp, need);
         packet_decrypt(&receive_context, cp, buffer_ptr(&input), need);          cipher_decrypt(&receive_context, cp, buffer_ptr(&input), need);
         buffer_consume(&input, need);          buffer_consume(&input, need);
         /*          /*
          * compute MAC over seqnr and packet,           * compute MAC over seqnr and packet,
          * increment sequence number for incoming packet           * increment sequence number for incoming packet
          */           */
         if (mac && mac->enabled) {          if (mac && mac->enabled) {
                 macbuf = hmac( mac->md, seqnr,                  macbuf = mac_compute(mac, seqnr,
                     (unsigned char *) buffer_ptr(&incoming_packet),                      (u_char *) buffer_ptr(&incoming_packet),
                     buffer_len(&incoming_packet),                      buffer_len(&incoming_packet));
                     mac->key, mac->key_len  
                 );  
                 if (memcmp(macbuf, buffer_ptr(&input), mac->mac_len) != 0)                  if (memcmp(macbuf, buffer_ptr(&input), mac->mac_len) != 0)
                         packet_disconnect("Corrupted MAC on input.");                          packet_disconnect("Corrupted MAC on input.");
                 DBG(debug("MAC #%d ok", seqnr));                  DBG(debug("MAC #%d ok", seqnr));
Line 897 
Line 840 
   
         /* get padlen */          /* get padlen */
         cp = buffer_ptr(&incoming_packet) + 4;          cp = buffer_ptr(&incoming_packet) + 4;
         padlen = *cp & 0xff;          padlen = (u_char) *cp;
         DBG(debug("input: padlen %d", padlen));          DBG(debug("input: padlen %d", padlen));
         if (padlen < 4)          if (padlen < 4)
                 packet_disconnect("Corrupted padlen %d on input.", padlen);                  packet_disconnect("Corrupted padlen %d on input.", padlen);
Line 919 
Line 862 
          * get packet type, implies consume.           * get packet type, implies consume.
          * return length of payload (without type field)           * return length of payload (without type field)
          */           */
         buffer_get(&incoming_packet, (char *)&buf[0], 1);          type = buffer_get_char(&incoming_packet);
           if (type == SSH2_MSG_NEWKEYS)
                   set_newkeys(MODE_IN);
         *payload_len_ptr = buffer_len(&incoming_packet);          *payload_len_ptr = buffer_len(&incoming_packet);
   
         /* reset for next packet */  
         packet_length = 0;  
   
         /* extract packet type */  
         type = (unsigned char)buf[0];  
   
         if (type == SSH2_MSG_NEWKEYS) {  
                 if (kex==NULL || mac==NULL || enc==NULL || comp==NULL)  
                         fatal("packet_read_poll2: no KEX");  
                 if (mac->md != NULL)  
                         mac->enabled = 1;  
                 DBG(debug("cipher_init receive_context"));  
                 cipher_init(&receive_context, enc->cipher,  
                     enc->key, enc->cipher->key_len,  
                     enc->iv, enc->cipher->block_size);  
                 clear_enc_keys(enc, kex->we_need);  
                 if (comp->type != 0 && comp->enabled == 0) {  
                         comp->enabled = 1;  
                         if (! packet_compression)  
                                 packet_start_compression(6);  
                 }  
         }  
   
 #ifdef PACKET_DEBUG  #ifdef PACKET_DEBUG
         fprintf(stderr, "read/plain[%d]:\r\n",type);          fprintf(stderr, "read/plain[%d]:\r\n", type);
         buffer_dump(&incoming_packet);          buffer_dump(&incoming_packet);
 #endif  #endif
         return (unsigned char)type;          /* reset for next packet */
           packet_length = 0;
           return type;
 }  }
   
 int  int
 packet_read_poll(int *payload_len_ptr)  packet_read_poll(int *payload_len_ptr)
 {  {
           int reason;
           u_char type;
         char *msg;          char *msg;
         for (;;) {  
                 int type = use_ssh2_packet_format ?  
                     packet_read_poll2(payload_len_ptr):  
                     packet_read_poll1(payload_len_ptr);  
   
                 if(compat20) {          for (;;) {
                         int reason;                  if (compat20) {
                         if (type != 0)                          type = packet_read_poll2(payload_len_ptr);
                           if (type)
                                 DBG(debug("received packet type %d", type));                                  DBG(debug("received packet type %d", type));
                         switch(type) {                          switch(type) {
                         case SSH2_MSG_IGNORE:                          case SSH2_MSG_IGNORE:
Line 979 
Line 901 
                         case SSH2_MSG_DISCONNECT:                          case SSH2_MSG_DISCONNECT:
                                 reason = packet_get_int();                                  reason = packet_get_int();
                                 msg = packet_get_string(NULL);                                  msg = packet_get_string(NULL);
                                 log("Received disconnect: %d: %.900s", reason, msg);                                  log("Received disconnect from %s: %d: %.400s", get_remote_ipaddr(),
                                           reason, msg);
                                 xfree(msg);                                  xfree(msg);
                                 fatal_cleanup();                                  fatal_cleanup();
                                 break;                                  break;
                         default:                          default:
                                 return type;                                  return type;
                                 break;                                  break;
                         }                          }
                 } else {                  } else {
                           type = packet_read_poll1(payload_len_ptr);
                         switch(type) {                          switch(type) {
                         case SSH_MSG_IGNORE:                          case SSH_MSG_IGNORE:
                                 break;                                  break;
Line 998 
Line 922 
                                 break;                                  break;
                         case SSH_MSG_DISCONNECT:                          case SSH_MSG_DISCONNECT:
                                 msg = packet_get_string(NULL);                                  msg = packet_get_string(NULL);
                                 log("Received disconnect: %.900s", msg);                                  log("Received disconnect from %s: %.400s", get_remote_ipaddr(),
                                           msg);
                                 fatal_cleanup();                                  fatal_cleanup();
                                 xfree(msg);                                  xfree(msg);
                                 break;                                  break;
                         default:                          default:
                                 if (type != 0)                                  if (type)
                                         DBG(debug("received packet type %d", type));                                          DBG(debug("received packet type %d", type));
                                 return type;                                  return type;
                                 break;                                  break;
                         }                          }
                 }                  }
         }          }
 }  }
Line 1018 
Line 943 
  */   */
   
 void  void
 packet_process_incoming(const char *buf, unsigned int len)  packet_process_incoming(const char *buf, u_int len)
 {  {
         buffer_append(&input, buf, len);          buffer_append(&input, buf, len);
 }  }
   
 /* Returns a character from the packet. */  /* Returns a character from the packet. */
   
 unsigned int  u_int
 packet_get_char()  packet_get_char()
 {  {
         char ch;          char ch;
         buffer_get(&incoming_packet, &ch, 1);          buffer_get(&incoming_packet, &ch, 1);
         return (unsigned char) ch;          return (u_char) ch;
 }  }
   
 /* Returns an integer from the packet data. */  /* Returns an integer from the packet data. */
   
 unsigned int  u_int
 packet_get_int()  packet_get_int()
 {  {
         return buffer_get_int(&incoming_packet);          return buffer_get_int(&incoming_packet);
Line 1081 
Line 1006 
  */   */
   
 char *  char *
 packet_get_string(unsigned int *length_ptr)  packet_get_string(u_int *length_ptr)
 {  {
         return buffer_get_string(&incoming_packet, length_ptr);          return buffer_get_string(&incoming_packet, length_ptr);
 }  }
Line 1101 
Line 1026 
         char buf[1024];          char buf[1024];
         va_list args;          va_list args;
   
           if (compat20 && (datafellows & SSH_BUG_DEBUG))
                   return;
   
         va_start(args, fmt);          va_start(args, fmt);
         vsnprintf(buf, sizeof(buf), fmt, args);          vsnprintf(buf, sizeof(buf), fmt, args);
         va_end(args);          va_end(args);
Line 1151 
Line 1079 
                 packet_put_cstring("");                  packet_put_cstring("");
         } else {          } else {
                 packet_start(SSH_MSG_DISCONNECT);                  packet_start(SSH_MSG_DISCONNECT);
                 packet_put_string(buf, strlen(buf));                  packet_put_cstring(buf);
         }          }
         packet_send();          packet_send();
         packet_write_wait();          packet_write_wait();
   
         /* Stop listening for connections. */          /* Stop listening for connections. */
         channel_stop_listening();          channel_close_all();
   
         /* Close the connection. */          /* Close the connection. */
         packet_close();          packet_close();
Line 1193 
Line 1121 
 void  void
 packet_write_wait()  packet_write_wait()
 {  {
           fd_set *setp;
   
           setp = (fd_set *)xmalloc(howmany(connection_out + 1, NFDBITS) *
               sizeof(fd_mask));
         packet_write_poll();          packet_write_poll();
         while (packet_have_data_to_write()) {          while (packet_have_data_to_write()) {
                 fd_set set;                  memset(setp, 0, howmany(connection_out + 1, NFDBITS) *
                 FD_ZERO(&set);                      sizeof(fd_mask));
                 FD_SET(connection_out, &set);                  FD_SET(connection_out, setp);
                 select(connection_out + 1, NULL, &set, NULL, NULL);                  while (select(connection_out + 1, NULL, setp, NULL, NULL) == -1 &&
                       (errno == EAGAIN || errno == EINTR))
                           ;
                 packet_write_poll();                  packet_write_poll();
         }          }
           xfree(setp);
 }  }
   
 /* Returns true if there is buffered data to write to the connection. */  /* Returns true if there is buffered data to write to the connection. */
Line 1225 
Line 1160 
 /* Informs that the current session is interactive.  Sets IP flags for that. */  /* Informs that the current session is interactive.  Sets IP flags for that. */
   
 void  void
 packet_set_interactive(int interactive, int keepalives)  packet_set_interactive(int interactive)
 {  {
           static int called = 0;
           int lowdelay = IPTOS_LOWDELAY;
           int throughput = IPTOS_THROUGHPUT;
         int on = 1;          int on = 1;
   
           if (called)
                   return;
           called = 1;
   
         /* Record that we are in interactive mode. */          /* Record that we are in interactive mode. */
         interactive_mode = interactive;          interactive_mode = interactive;
   
         /* Only set socket options if using a socket.  */          /* Only set socket options if using a socket.  */
         if (!packet_connection_is_on_socket())          if (!packet_connection_is_on_socket())
                 return;                  return;
         if (keepalives) {  
                 /* Set keepalives if requested. */  
                 if (setsockopt(connection_in, SOL_SOCKET, SO_KEEPALIVE, (void *) &on,  
                     sizeof(on)) < 0)  
                         error("setsockopt SO_KEEPALIVE: %.100s", strerror(errno));  
         }  
         /*          /*
          * IPTOS_LOWDELAY, TCP_NODELAY and IPTOS_THROUGHPUT are IPv4 only           * IPTOS_LOWDELAY and IPTOS_THROUGHPUT are IPv4 only
          */           */
         if (!packet_connection_is_ipv4())  
                 return;  
         if (interactive) {          if (interactive) {
                 /*                  /*
                  * Set IP options for an interactive connection.  Use                   * Set IP options for an interactive connection.  Use
                  * IPTOS_LOWDELAY and TCP_NODELAY.                   * IPTOS_LOWDELAY and TCP_NODELAY.
                  */                   */
                 int lowdelay = IPTOS_LOWDELAY;                  if (packet_connection_is_ipv4()) {
                 if (setsockopt(connection_in, IPPROTO_IP, IP_TOS, (void *) &lowdelay,                          if (setsockopt(connection_in, IPPROTO_IP, IP_TOS,
                     sizeof(lowdelay)) < 0)                              (void *) &lowdelay, sizeof(lowdelay)) < 0)
                         error("setsockopt IPTOS_LOWDELAY: %.100s", strerror(errno));                                  error("setsockopt IPTOS_LOWDELAY: %.100s",
                                       strerror(errno));
                   }
                 if (setsockopt(connection_in, IPPROTO_TCP, TCP_NODELAY, (void *) &on,                  if (setsockopt(connection_in, IPPROTO_TCP, TCP_NODELAY, (void *) &on,
                     sizeof(on)) < 0)                      sizeof(on)) < 0)
                         error("setsockopt TCP_NODELAY: %.100s", strerror(errno));                          error("setsockopt TCP_NODELAY: %.100s", strerror(errno));
         } else {          } else if (packet_connection_is_ipv4()) {
                 /*                  /*
                  * Set IP options for a non-interactive connection.  Use                   * Set IP options for a non-interactive connection.  Use
                  * IPTOS_THROUGHPUT.                   * IPTOS_THROUGHPUT.
                  */                   */
                 int throughput = IPTOS_THROUGHPUT;  
                 if (setsockopt(connection_in, IPPROTO_IP, IP_TOS, (void *) &throughput,                  if (setsockopt(connection_in, IPPROTO_IP, IP_TOS, (void *) &throughput,
                     sizeof(throughput)) < 0)                      sizeof(throughput)) < 0)
                         error("setsockopt IPTOS_THROUGHPUT: %.100s", strerror(errno));                          error("setsockopt IPTOS_THROUGHPUT: %.100s", strerror(errno));
Line 1291 
Line 1226 
                 log("packet_set_maxsize: bad size %d", s);                  log("packet_set_maxsize: bad size %d", s);
                 return -1;                  return -1;
         }          }
         log("packet_set_maxsize: setting to %d", s);          called = 1;
           debug("packet_set_maxsize: setting to %d", s);
         max_packet_size = s;          max_packet_size = s;
         return s;          return s;
   }
   
   /*
    * 9.2.  Ignored Data Message
    *
    *   byte      SSH_MSG_IGNORE
    *   string    data
    *
    * All implementations MUST understand (and ignore) this message at any
    * time (after receiving the protocol version). No implementation is
    * required to send them. This message can be used as an additional
    * protection measure against advanced traffic analysis techniques.
    */
   /* size of current + ignore message should be n*sumlen bytes (w/o mac) */
   void
   packet_inject_ignore(int sumlen)
   {
           int blocksize, padlen, have, need, nb, mini, nbytes;
           Enc *enc = NULL;
   
           if (compat20 == 0)
                   return;
   
           have = buffer_len(&outgoing_packet);
           debug2("packet_inject_ignore: current %d", have);
           if (newkeys[MODE_OUT] != NULL)
                   enc  = &newkeys[MODE_OUT]->enc;
           blocksize = enc ? enc->cipher->block_size : 8;
           padlen = blocksize - (have % blocksize);
           if (padlen < 4)
                   padlen += blocksize;
           have += padlen;
           have /= blocksize;      /* # of blocks for current message */
   
           nb   = roundup(sumlen,  blocksize) / blocksize; /* blocks for both */
           mini = roundup(5+1+4+4, blocksize) / blocksize; /* minsize ignore msg */
           need = nb - (have % nb);                        /* blocks for ignore */
           if (need <= mini)
                   need += nb;
           nbytes = (need - mini) * blocksize;     /* size of ignore payload */
           debug2("packet_inject_ignore: block %d have %d nb %d mini %d need %d",
               blocksize, have, nb, mini, need);
   
           /* enqueue current message and append a ignore message */
           packet_send();
           packet_send_ignore(nbytes);
   }
   
   void
   packet_send_ignore(int nbytes)
   {
           u_int32_t rand = 0;
           int i;
   
           packet_start(compat20 ? SSH2_MSG_IGNORE : SSH_MSG_IGNORE);
           packet_put_int(nbytes);
           for(i = 0; i < nbytes; i++) {
                   if (i % 4 == 0)
                           rand = arc4random();
                   packet_put_char(rand & 0xff);
                   rand >>= 8;
           }
 }  }
Legend:
Removed from v.1.38  
changed lines
  Added in v.1.38.2.6