typedef struct {
word32 k0246[16], k1357[16];
- word32 eiv0, eiv1;
- word32 div0, div1;
+ word32 iv0, iv1;
} DESContext;
#define rotl(x, c) ( (x << c) | (x >> (32-c)) )
return ret;
}
-void des_key_setup(word32 key_msw, word32 key_lsw, DESContext * sched)
+static void des_key_setup(word32 key_msw, word32 key_lsw, DESContext * sched)
{
static const int PC1_Cbits[] = {
sched->k1357[i] = bitsel(buf, PC2_1357, 32);
}
- sched->eiv0 = sched->eiv1 = 0;
- sched->div0 = sched->div1 = 0; /* for good measure */
+ sched->iv0 = sched->iv1 = 0;
}
static const word32 SPboxes[8][64] = {
bitswap(R, L, 16, 0x0000FFFF), \
bitswap(R, L, 4, 0x0F0F0F0F))
-void des_encipher(word32 * output, word32 L, word32 R, DESContext * sched)
+static void des_encipher(word32 * output, word32 L, word32 R,
+ DESContext * sched)
{
word32 swap, s0246, s1357;
output[1] = R;
}
-void des_decipher(word32 * output, word32 L, word32 R, DESContext * sched)
+static void des_decipher(word32 * output, word32 L, word32 R,
+ DESContext * sched)
{
word32 swap, s0246, s1357;
output[1] = R;
}
-#define GET_32BIT_MSB_FIRST(cp) \
- (((unsigned long)(unsigned char)(cp)[3]) | \
- ((unsigned long)(unsigned char)(cp)[2] << 8) | \
- ((unsigned long)(unsigned char)(cp)[1] << 16) | \
- ((unsigned long)(unsigned char)(cp)[0] << 24))
-
-#define PUT_32BIT_MSB_FIRST(cp, value) do { \
- (cp)[3] = (value); \
- (cp)[2] = (value) >> 8; \
- (cp)[1] = (value) >> 16; \
- (cp)[0] = (value) >> 24; } while (0)
-
-static void des_cbc_encrypt(unsigned char *dest, const unsigned char *src,
+static void des_cbc_encrypt(unsigned char *blk,
unsigned int len, DESContext * sched)
{
word32 out[2], iv0, iv1;
assert((len & 7) == 0);
- iv0 = sched->eiv0;
- iv1 = sched->eiv1;
+ iv0 = sched->iv0;
+ iv1 = sched->iv1;
for (i = 0; i < len; i += 8) {
- iv0 ^= GET_32BIT_MSB_FIRST(src);
- src += 4;
- iv1 ^= GET_32BIT_MSB_FIRST(src);
- src += 4;
+ iv0 ^= GET_32BIT_MSB_FIRST(blk);
+ iv1 ^= GET_32BIT_MSB_FIRST(blk + 4);
des_encipher(out, iv0, iv1, sched);
iv0 = out[0];
iv1 = out[1];
- PUT_32BIT_MSB_FIRST(dest, iv0);
- dest += 4;
- PUT_32BIT_MSB_FIRST(dest, iv1);
- dest += 4;
+ PUT_32BIT_MSB_FIRST(blk, iv0);
+ PUT_32BIT_MSB_FIRST(blk + 4, iv1);
+ blk += 8;
}
- sched->eiv0 = iv0;
- sched->eiv1 = iv1;
+ sched->iv0 = iv0;
+ sched->iv1 = iv1;
}
-static void des_cbc_decrypt(unsigned char *dest, const unsigned char *src,
+static void des_cbc_decrypt(unsigned char *blk,
unsigned int len, DESContext * sched)
{
word32 out[2], iv0, iv1, xL, xR;
assert((len & 7) == 0);
- iv0 = sched->div0;
- iv1 = sched->div1;
+ iv0 = sched->iv0;
+ iv1 = sched->iv1;
for (i = 0; i < len; i += 8) {
- xL = GET_32BIT_MSB_FIRST(src);
- src += 4;
- xR = GET_32BIT_MSB_FIRST(src);
- src += 4;
+ xL = GET_32BIT_MSB_FIRST(blk);
+ xR = GET_32BIT_MSB_FIRST(blk + 4);
des_decipher(out, xL, xR, sched);
iv0 ^= out[0];
iv1 ^= out[1];
- PUT_32BIT_MSB_FIRST(dest, iv0);
- dest += 4;
- PUT_32BIT_MSB_FIRST(dest, iv1);
- dest += 4;
+ PUT_32BIT_MSB_FIRST(blk, iv0);
+ PUT_32BIT_MSB_FIRST(blk + 4, iv1);
+ blk += 8;
iv0 = xL;
iv1 = xR;
}
- sched->div0 = iv0;
- sched->div1 = iv1;
+ sched->iv0 = iv0;
+ sched->iv1 = iv1;
}
-static void des_3cbc_encrypt(unsigned char *dest, const unsigned char *src,
+static void des_3cbc_encrypt(unsigned char *blk,
unsigned int len, DESContext * scheds)
{
- des_cbc_encrypt(dest, src, len, &scheds[0]);
- des_cbc_decrypt(dest, src, len, &scheds[1]);
- des_cbc_encrypt(dest, src, len, &scheds[2]);
+ des_cbc_encrypt(blk, len, &scheds[0]);
+ des_cbc_decrypt(blk, len, &scheds[1]);
+ des_cbc_encrypt(blk, len, &scheds[2]);
}
-static void des_cbc3_encrypt(unsigned char *dest, const unsigned char *src,
+static void des_cbc3_encrypt(unsigned char *blk,
unsigned int len, DESContext * scheds)
{
word32 out[2], iv0, iv1;
assert((len & 7) == 0);
- iv0 = scheds->eiv0;
- iv1 = scheds->eiv1;
+ iv0 = scheds->iv0;
+ iv1 = scheds->iv1;
for (i = 0; i < len; i += 8) {
- iv0 ^= GET_32BIT_MSB_FIRST(src);
- src += 4;
- iv1 ^= GET_32BIT_MSB_FIRST(src);
- src += 4;
+ iv0 ^= GET_32BIT_MSB_FIRST(blk);
+ iv1 ^= GET_32BIT_MSB_FIRST(blk + 4);
des_encipher(out, iv0, iv1, &scheds[0]);
des_decipher(out, out[0], out[1], &scheds[1]);
des_encipher(out, out[0], out[1], &scheds[2]);
iv0 = out[0];
iv1 = out[1];
- PUT_32BIT_MSB_FIRST(dest, iv0);
- dest += 4;
- PUT_32BIT_MSB_FIRST(dest, iv1);
- dest += 4;
+ PUT_32BIT_MSB_FIRST(blk, iv0);
+ PUT_32BIT_MSB_FIRST(blk + 4, iv1);
+ blk += 8;
}
- scheds->eiv0 = iv0;
- scheds->eiv1 = iv1;
+ scheds->iv0 = iv0;
+ scheds->iv1 = iv1;
}
-static void des_3cbc_decrypt(unsigned char *dest, const unsigned char *src,
+static void des_3cbc_decrypt(unsigned char *blk,
unsigned int len, DESContext * scheds)
{
- des_cbc_decrypt(dest, src, len, &scheds[2]);
- des_cbc_encrypt(dest, src, len, &scheds[1]);
- des_cbc_decrypt(dest, src, len, &scheds[0]);
+ des_cbc_decrypt(blk, len, &scheds[2]);
+ des_cbc_encrypt(blk, len, &scheds[1]);
+ des_cbc_decrypt(blk, len, &scheds[0]);
}
-static void des_cbc3_decrypt(unsigned char *dest, const unsigned char *src,
+static void des_cbc3_decrypt(unsigned char *blk,
unsigned int len, DESContext * scheds)
{
word32 out[2], iv0, iv1, xL, xR;
assert((len & 7) == 0);
- iv0 = scheds->div0;
- iv1 = scheds->div1;
+ iv0 = scheds->iv0;
+ iv1 = scheds->iv1;
for (i = 0; i < len; i += 8) {
- xL = GET_32BIT_MSB_FIRST(src);
- src += 4;
- xR = GET_32BIT_MSB_FIRST(src);
- src += 4;
+ xL = GET_32BIT_MSB_FIRST(blk);
+ xR = GET_32BIT_MSB_FIRST(blk + 4);
des_decipher(out, xL, xR, &scheds[2]);
des_encipher(out, out[0], out[1], &scheds[1]);
des_decipher(out, out[0], out[1], &scheds[0]);
iv0 ^= out[0];
iv1 ^= out[1];
- PUT_32BIT_MSB_FIRST(dest, iv0);
- dest += 4;
- PUT_32BIT_MSB_FIRST(dest, iv1);
- dest += 4;
+ PUT_32BIT_MSB_FIRST(blk, iv0);
+ PUT_32BIT_MSB_FIRST(blk + 4, iv1);
+ blk += 8;
iv0 = xL;
iv1 = xR;
}
- scheds->div0 = iv0;
- scheds->div1 = iv1;
+ scheds->iv0 = iv0;
+ scheds->iv1 = iv1;
}
-static DESContext cskeys[3], sckeys[3];
+static void des_sdctr3(unsigned char *blk,
+ unsigned int len, DESContext * scheds)
+{
+ word32 b[2], iv0, iv1, tmp;
+ unsigned int i;
+
+ assert((len & 7) == 0);
-static void des3_cskey(unsigned char *key)
+ iv0 = scheds->iv0;
+ iv1 = scheds->iv1;
+ for (i = 0; i < len; i += 8) {
+ des_encipher(b, iv0, iv1, &scheds[0]);
+ des_decipher(b, b[0], b[1], &scheds[1]);
+ des_encipher(b, b[0], b[1], &scheds[2]);
+ tmp = GET_32BIT_MSB_FIRST(blk);
+ PUT_32BIT_MSB_FIRST(blk, tmp ^ b[0]);
+ blk += 4;
+ tmp = GET_32BIT_MSB_FIRST(blk);
+ PUT_32BIT_MSB_FIRST(blk, tmp ^ b[1]);
+ blk += 4;
+ if ((iv1 = (iv1 + 1) & 0xffffffff) == 0)
+ iv0 = (iv0 + 1) & 0xffffffff;
+ }
+ scheds->iv0 = iv0;
+ scheds->iv1 = iv1;
+}
+
+static void *des3_make_context(void)
{
- des_key_setup(GET_32BIT_MSB_FIRST(key),
- GET_32BIT_MSB_FIRST(key + 4), &cskeys[0]);
- des_key_setup(GET_32BIT_MSB_FIRST(key + 8),
- GET_32BIT_MSB_FIRST(key + 12), &cskeys[1]);
- des_key_setup(GET_32BIT_MSB_FIRST(key + 16),
- GET_32BIT_MSB_FIRST(key + 20), &cskeys[2]);
- logevent("Initialised triple-DES client->server encryption");
+ return snewn(3, DESContext);
}
-static void des_cskey(unsigned char *key)
+static void *des3_ssh1_make_context(void)
{
- des_key_setup(GET_32BIT_MSB_FIRST(key),
- GET_32BIT_MSB_FIRST(key + 4), &cskeys[0]);
- logevent("Initialised single-DES client->server encryption");
+ /* Need 3 keys for each direction, in SSH-1 */
+ return snewn(6, DESContext);
}
-static void des3_csiv(unsigned char *key)
+static void *des_make_context(void)
{
- cskeys[0].eiv0 = GET_32BIT_MSB_FIRST(key);
- cskeys[0].eiv1 = GET_32BIT_MSB_FIRST(key + 4);
+ return snew(DESContext);
}
-static void des3_sciv(unsigned char *key)
+static void *des_ssh1_make_context(void)
{
- sckeys[0].div0 = GET_32BIT_MSB_FIRST(key);
- sckeys[0].div1 = GET_32BIT_MSB_FIRST(key + 4);
+ /* Need one key for each direction, in SSH-1 */
+ return snewn(2, DESContext);
}
-static void des3_sckey(unsigned char *key)
+static void des3_free_context(void *handle) /* used for both 3DES and DES */
{
+ sfree(handle);
+}
+
+static void des3_key(void *handle, unsigned char *key)
+{
+ DESContext *keys = (DESContext *) handle;
des_key_setup(GET_32BIT_MSB_FIRST(key),
- GET_32BIT_MSB_FIRST(key + 4), &sckeys[0]);
+ GET_32BIT_MSB_FIRST(key + 4), &keys[0]);
des_key_setup(GET_32BIT_MSB_FIRST(key + 8),
- GET_32BIT_MSB_FIRST(key + 12), &sckeys[1]);
+ GET_32BIT_MSB_FIRST(key + 12), &keys[1]);
des_key_setup(GET_32BIT_MSB_FIRST(key + 16),
- GET_32BIT_MSB_FIRST(key + 20), &sckeys[2]);
- logevent("Initialised triple-DES server->client encryption");
+ GET_32BIT_MSB_FIRST(key + 20), &keys[2]);
}
-static void des_sckey(unsigned char *key)
+static void des3_iv(void *handle, unsigned char *key)
{
+ DESContext *keys = (DESContext *) handle;
+ keys[0].iv0 = GET_32BIT_MSB_FIRST(key);
+ keys[0].iv1 = GET_32BIT_MSB_FIRST(key + 4);
+}
+
+static void des_key(void *handle, unsigned char *key)
+{
+ DESContext *keys = (DESContext *) handle;
des_key_setup(GET_32BIT_MSB_FIRST(key),
- GET_32BIT_MSB_FIRST(key + 4), &sckeys[0]);
- logevent("Initialised single-DES server->client encryption");
+ GET_32BIT_MSB_FIRST(key + 4), &keys[0]);
+}
+
+static void des3_sesskey(void *handle, unsigned char *key)
+{
+ DESContext *keys = (DESContext *) handle;
+ des3_key(keys, key);
+ des3_key(keys+3, key);
}
-static void des3_sesskey(unsigned char *key)
+static void des3_encrypt_blk(void *handle, unsigned char *blk, int len)
{
- des3_cskey(key);
- des3_sckey(key);
+ DESContext *keys = (DESContext *) handle;
+ des_3cbc_encrypt(blk, len, keys);
}
-static void des3_encrypt_blk(unsigned char *blk, int len)
+static void des3_decrypt_blk(void *handle, unsigned char *blk, int len)
{
- des_3cbc_encrypt(blk, blk, len, cskeys);
+ DESContext *keys = (DESContext *) handle;
+ des_3cbc_decrypt(blk, len, keys+3);
}
-static void des3_decrypt_blk(unsigned char *blk, int len)
+static void des3_ssh2_encrypt_blk(void *handle, unsigned char *blk, int len)
{
- des_3cbc_decrypt(blk, blk, len, sckeys);
+ DESContext *keys = (DESContext *) handle;
+ des_cbc3_encrypt(blk, len, keys);
}
-static void des3_ssh2_encrypt_blk(unsigned char *blk, int len)
+static void des3_ssh2_decrypt_blk(void *handle, unsigned char *blk, int len)
{
- des_cbc3_encrypt(blk, blk, len, cskeys);
+ DESContext *keys = (DESContext *) handle;
+ des_cbc3_decrypt(blk, len, keys);
}
-static void des3_ssh2_decrypt_blk(unsigned char *blk, int len)
+static void des3_ssh2_sdctr(void *handle, unsigned char *blk, int len)
{
- des_cbc3_decrypt(blk, blk, len, sckeys);
+ DESContext *keys = (DESContext *) handle;
+ des_sdctr3(blk, len, keys);
}
-static void des_ssh2_encrypt_blk(unsigned char *blk, int len)
+static void des_ssh2_encrypt_blk(void *handle, unsigned char *blk, int len)
{
- des_cbc_encrypt(blk, blk, len, cskeys);
+ DESContext *keys = (DESContext *) handle;
+ des_cbc_encrypt(blk, len, keys);
}
-static void des_ssh2_decrypt_blk(unsigned char *blk, int len)
+static void des_ssh2_decrypt_blk(void *handle, unsigned char *blk, int len)
{
- des_cbc_decrypt(blk, blk, len, sckeys);
+ DESContext *keys = (DESContext *) handle;
+ des_cbc_decrypt(blk, len, keys);
}
void des3_decrypt_pubkey(unsigned char *key, unsigned char *blk, int len)
GET_32BIT_MSB_FIRST(key + 12), &ourkeys[1]);
des_key_setup(GET_32BIT_MSB_FIRST(key),
GET_32BIT_MSB_FIRST(key + 4), &ourkeys[2]);
- des_3cbc_decrypt(blk, blk, len, ourkeys);
+ des_3cbc_decrypt(blk, len, ourkeys);
+ memset(ourkeys, 0, sizeof(ourkeys));
}
void des3_encrypt_pubkey(unsigned char *key, unsigned char *blk, int len)
GET_32BIT_MSB_FIRST(key + 12), &ourkeys[1]);
des_key_setup(GET_32BIT_MSB_FIRST(key),
GET_32BIT_MSB_FIRST(key + 4), &ourkeys[2]);
- des_3cbc_encrypt(blk, blk, len, ourkeys);
+ des_3cbc_encrypt(blk, len, ourkeys);
+ memset(ourkeys, 0, sizeof(ourkeys));
+}
+
+void des3_decrypt_pubkey_ossh(unsigned char *key, unsigned char *iv,
+ unsigned char *blk, int len)
+{
+ DESContext ourkeys[3];
+ des_key_setup(GET_32BIT_MSB_FIRST(key),
+ GET_32BIT_MSB_FIRST(key + 4), &ourkeys[0]);
+ des_key_setup(GET_32BIT_MSB_FIRST(key + 8),
+ GET_32BIT_MSB_FIRST(key + 12), &ourkeys[1]);
+ des_key_setup(GET_32BIT_MSB_FIRST(key + 16),
+ GET_32BIT_MSB_FIRST(key + 20), &ourkeys[2]);
+ ourkeys[0].iv0 = GET_32BIT_MSB_FIRST(iv);
+ ourkeys[0].iv1 = GET_32BIT_MSB_FIRST(iv+4);
+ des_cbc3_decrypt(blk, len, ourkeys);
+ memset(ourkeys, 0, sizeof(ourkeys));
+}
+
+void des3_encrypt_pubkey_ossh(unsigned char *key, unsigned char *iv,
+ unsigned char *blk, int len)
+{
+ DESContext ourkeys[3];
+ des_key_setup(GET_32BIT_MSB_FIRST(key),
+ GET_32BIT_MSB_FIRST(key + 4), &ourkeys[0]);
+ des_key_setup(GET_32BIT_MSB_FIRST(key + 8),
+ GET_32BIT_MSB_FIRST(key + 12), &ourkeys[1]);
+ des_key_setup(GET_32BIT_MSB_FIRST(key + 16),
+ GET_32BIT_MSB_FIRST(key + 20), &ourkeys[2]);
+ ourkeys[0].iv0 = GET_32BIT_MSB_FIRST(iv);
+ ourkeys[0].iv1 = GET_32BIT_MSB_FIRST(iv+4);
+ des_cbc3_encrypt(blk, len, ourkeys);
+ memset(ourkeys, 0, sizeof(ourkeys));
+}
+
+static void des_keysetup_xdmauth(unsigned char *keydata, DESContext *dc)
+{
+ unsigned char key[8];
+ int i, nbits, j;
+ unsigned int bits;
+
+ bits = 0;
+ nbits = 0;
+ j = 0;
+ for (i = 0; i < 8; i++) {
+ if (nbits < 7) {
+ bits = (bits << 8) | keydata[j];
+ nbits += 8;
+ j++;
+ }
+ key[i] = (bits >> (nbits - 7)) << 1;
+ bits &= ~(0x7F << (nbits - 7));
+ nbits -= 7;
+ }
+
+ des_key_setup(GET_32BIT_MSB_FIRST(key), GET_32BIT_MSB_FIRST(key + 4), dc);
+}
+
+void des_encrypt_xdmauth(unsigned char *keydata, unsigned char *blk, int len)
+{
+ DESContext dc;
+ des_keysetup_xdmauth(keydata, &dc);
+ des_cbc_encrypt(blk, 24, &dc);
+}
+
+void des_decrypt_xdmauth(unsigned char *keydata, unsigned char *blk, int len)
+{
+ DESContext dc;
+ des_keysetup_xdmauth(keydata, &dc);
+ des_cbc_decrypt(blk, 24, &dc);
}
static const struct ssh2_cipher ssh_3des_ssh2 = {
- des3_csiv, des3_cskey,
- des3_sciv, des3_sckey,
- des3_ssh2_encrypt_blk,
- des3_ssh2_decrypt_blk,
+ des3_make_context, des3_free_context, des3_iv, des3_key,
+ des3_ssh2_encrypt_blk, des3_ssh2_decrypt_blk,
"3des-cbc",
- 8, 168
+ 8, 168, SSH_CIPHER_IS_CBC, "triple-DES CBC"
+};
+
+static const struct ssh2_cipher ssh_3des_ssh2_ctr = {
+ des3_make_context, des3_free_context, des3_iv, des3_key,
+ des3_ssh2_sdctr, des3_ssh2_sdctr,
+ "3des-ctr",
+ 8, 168, 0, "triple-DES SDCTR"
};
/*
- * Single DES in ssh2. It isn't clear that "des-cbc" is an official
- * cipher name, but ssh.com support it and apparently aren't the
- * only people to do so, so we sigh and implement it anyway.
+ * Single DES in SSH-2. "des-cbc" is marked as HISTORIC in
+ * draft-ietf-secsh-assignednumbers-04.txt, referring to
+ * FIPS-46-3. ("Single DES (i.e., DES) will be permitted
+ * for legacy systems only.") , but ssh.com support it and
+ * apparently aren't the only people to do so, so we sigh
+ * and implement it anyway.
*/
static const struct ssh2_cipher ssh_des_ssh2 = {
- des3_csiv, des_cskey, /* iv functions shared with 3des */
- des3_sciv, des_sckey,
- des_ssh2_encrypt_blk,
- des_ssh2_decrypt_blk,
+ des_make_context, des3_free_context, des3_iv, des_key,
+ des_ssh2_encrypt_blk, des_ssh2_decrypt_blk,
"des-cbc",
- 8, 56
+ 8, 56, SSH_CIPHER_IS_CBC, "single-DES CBC"
+};
+
+static const struct ssh2_cipher ssh_des_sshcom_ssh2 = {
+ des_make_context, des3_free_context, des3_iv, des_key,
+ des_ssh2_encrypt_blk, des_ssh2_decrypt_blk,
+ "des-cbc@ssh.com",
+ 8, 56, SSH_CIPHER_IS_CBC, "single-DES CBC"
};
static const struct ssh2_cipher *const des3_list[] = {
+ &ssh_3des_ssh2_ctr,
&ssh_3des_ssh2
};
};
static const struct ssh2_cipher *const des_list[] = {
- &ssh_des_ssh2
+ &ssh_des_ssh2,
+ &ssh_des_sshcom_ssh2
};
const struct ssh2_ciphers ssh2_des = {
- sizeof(des3_list) / sizeof(*des_list),
+ sizeof(des_list) / sizeof(*des_list),
des_list
};
const struct ssh_cipher ssh_3des = {
- des3_sesskey,
- des3_encrypt_blk,
- des3_decrypt_blk,
- 8
+ des3_ssh1_make_context, des3_free_context, des3_sesskey,
+ des3_encrypt_blk, des3_decrypt_blk,
+ 8, "triple-DES inner-CBC"
};
-static void des_sesskey(unsigned char *key)
+static void des_sesskey(void *handle, unsigned char *key)
{
- des_cskey(key);
- des_sckey(key);
+ DESContext *keys = (DESContext *) handle;
+ des_key(keys, key);
+ des_key(keys+1, key);
}
-static void des_encrypt_blk(unsigned char *blk, int len)
+static void des_encrypt_blk(void *handle, unsigned char *blk, int len)
{
- des_cbc_encrypt(blk, blk, len, cskeys);
+ DESContext *keys = (DESContext *) handle;
+ des_cbc_encrypt(blk, len, keys);
}
-static void des_decrypt_blk(unsigned char *blk, int len)
+static void des_decrypt_blk(void *handle, unsigned char *blk, int len)
{
- des_cbc_decrypt(blk, blk, len, cskeys);
+ DESContext *keys = (DESContext *) handle;
+ des_cbc_decrypt(blk, len, keys+1);
}
const struct ssh_cipher ssh_des = {
- des_sesskey,
- des_encrypt_blk,
- des_decrypt_blk,
- 8
+ des_ssh1_make_context, des3_free_context, des_sesskey,
+ des_encrypt_blk, des_decrypt_blk,
+ 8, "single-DES CBC"
};