1e71b7053SJung-uk Kim /*
2b077aed3SPierre Pronchery * Copyright 1995-2020 The OpenSSL Project Authors. All Rights Reserved.
374664626SKris Kennaway *
4b077aed3SPierre Pronchery * Licensed under the Apache License 2.0 (the "License"). You may not use
5e71b7053SJung-uk Kim * this file except in compliance with the License. You can obtain a copy
6e71b7053SJung-uk Kim * in the file LICENSE in the source distribution or at
7e71b7053SJung-uk Kim * https://www.openssl.org/source/license.html
874664626SKris Kennaway */
974664626SKris Kennaway
10b077aed3SPierre Pronchery /*
11b077aed3SPierre Pronchery * BF low level APIs are deprecated for public use, but still ok for internal
12b077aed3SPierre Pronchery * use.
13b077aed3SPierre Pronchery */
14b077aed3SPierre Pronchery #include "internal/deprecated.h"
15b077aed3SPierre Pronchery
1674664626SKris Kennaway #include <stdio.h>
1774664626SKris Kennaway #include <string.h>
181f13597dSJung-uk Kim #include <openssl/blowfish.h>
1917f01e99SJung-uk Kim #include "bf_local.h"
2074664626SKris Kennaway #include "bf_pi.h"
2174664626SKris Kennaway
BF_set_key(BF_KEY * key,int len,const unsigned char * data)221f13597dSJung-uk Kim void BF_set_key(BF_KEY *key, int len, const unsigned char *data)
2374664626SKris Kennaway {
2474664626SKris Kennaway int i;
2574664626SKris Kennaway BF_LONG *p, ri, in[2];
26f579bf8eSKris Kennaway const unsigned char *d, *end;
2774664626SKris Kennaway
285c87c606SMark Murray memcpy(key, &bf_init, sizeof(BF_KEY));
2974664626SKris Kennaway p = key->P;
3074664626SKris Kennaway
316f9291ceSJung-uk Kim if (len > ((BF_ROUNDS + 2) * 4))
326f9291ceSJung-uk Kim len = (BF_ROUNDS + 2) * 4;
3374664626SKris Kennaway
3474664626SKris Kennaway d = data;
3574664626SKris Kennaway end = &(data[len]);
366f9291ceSJung-uk Kim for (i = 0; i < (BF_ROUNDS + 2); i++) {
3774664626SKris Kennaway ri = *(d++);
386f9291ceSJung-uk Kim if (d >= end)
396f9291ceSJung-uk Kim d = data;
4074664626SKris Kennaway
4174664626SKris Kennaway ri <<= 8;
4274664626SKris Kennaway ri |= *(d++);
436f9291ceSJung-uk Kim if (d >= end)
446f9291ceSJung-uk Kim d = data;
4574664626SKris Kennaway
4674664626SKris Kennaway ri <<= 8;
4774664626SKris Kennaway ri |= *(d++);
486f9291ceSJung-uk Kim if (d >= end)
496f9291ceSJung-uk Kim d = data;
5074664626SKris Kennaway
5174664626SKris Kennaway ri <<= 8;
5274664626SKris Kennaway ri |= *(d++);
536f9291ceSJung-uk Kim if (d >= end)
546f9291ceSJung-uk Kim d = data;
5574664626SKris Kennaway
5674664626SKris Kennaway p[i] ^= ri;
5774664626SKris Kennaway }
5874664626SKris Kennaway
5974664626SKris Kennaway in[0] = 0L;
6074664626SKris Kennaway in[1] = 0L;
616f9291ceSJung-uk Kim for (i = 0; i < (BF_ROUNDS + 2); i += 2) {
6274664626SKris Kennaway BF_encrypt(in, key);
6374664626SKris Kennaway p[i] = in[0];
6474664626SKris Kennaway p[i + 1] = in[1];
6574664626SKris Kennaway }
6674664626SKris Kennaway
6774664626SKris Kennaway p = key->S;
686f9291ceSJung-uk Kim for (i = 0; i < 4 * 256; i += 2) {
6974664626SKris Kennaway BF_encrypt(in, key);
7074664626SKris Kennaway p[i] = in[0];
7174664626SKris Kennaway p[i + 1] = in[1];
7274664626SKris Kennaway }
7374664626SKris Kennaway }
74