PostgreSQL Source Code  git master
 All Data Structures Namespaces Files Functions Variables Typedefs Enumerations Enumerator Macros
crypt-blowfish.c File Reference
#include "postgres.h"
#include "miscadmin.h"
#include "px-crypt.h"
#include "px.h"
Include dependency graph for crypt-blowfish.c:

Go to the source code of this file.

Data Structures

struct  BF_ctx
 

Macros

#define BF_ASM   0
 
#define BF_SCALE   0
 
#define BF_N   16
 
#define BF_safe_atoi64(dst, src)
 
#define BF_INDEX(S, i)   (*((BF_word *)(((unsigned char *)(S)) + (i))))
 
#define BF_ROUND(L, R, N)
 
#define BF_ENCRYPT
 
#define BF_body()
 

Typedefs

typedef unsigned int BF_word
 
typedef signed int BF_word_signed
 
typedef BF_word BF_key [BF_N+2]
 

Functions

static int BF_decode (BF_word *dst, const char *src, int size)
 
static void BF_encode (char *dst, const BF_word *src, int size)
 
static void BF_swap (BF_word *x, int count)
 
static void BF_set_key (const char *key, BF_key expanded, BF_key initial, int sign_extension_bug)
 
char * _crypt_blowfish_rn (const char *key, const char *setting, char *output, int size)
 

Variables

static BF_word BF_magic_w [6]
 
static BF_ctx BF_init_state
 
static unsigned char BF_itoa64 [64+1]
 
static unsigned char BF_atoi64 [0x60]
 

Macro Definition Documentation

#define BF_ASM   0

Definition at line 48 of file crypt-blowfish.c.

#define BF_body ( )
Value:
L = R = 0; \
ptr = data.ctx.P; \
do { \
ptr += 2; \
*(ptr - 2) = L; \
*(ptr - 1) = R; \
} while (ptr < &data.ctx.P[BF_N + 2]); \
\
ptr = data.ctx.S[0]; \
do { \
ptr += 2; \
*(ptr - 2) = L; \
*(ptr - 1) = R; \
} while (ptr < &data.ctx.S[3][0xFF]);
#define R(b, x)
Definition: sha2.c:121
#define BF_ENCRYPT
#define BF_N

Definition at line 529 of file crypt-blowfish.c.

Referenced by _crypt_blowfish_rn().

#define BF_ENCRYPT
Value:
L ^= data.ctx.P[0]; \
BF_ROUND(L, R, 0); \
BF_ROUND(R, L, 1); \
BF_ROUND(L, R, 2); \
BF_ROUND(R, L, 3); \
BF_ROUND(L, R, 4); \
BF_ROUND(R, L, 5); \
BF_ROUND(L, R, 6); \
BF_ROUND(R, L, 7); \
BF_ROUND(L, R, 8); \
BF_ROUND(R, L, 9); \
BF_ROUND(L, R, 10); \
BF_ROUND(R, L, 11); \
BF_ROUND(L, R, 12); \
BF_ROUND(R, L, 13); \
BF_ROUND(L, R, 14); \
BF_ROUND(R, L, 15); \
tmp4 = R; \
R = L; \
L = tmp4 ^ data.ctx.P[BF_N + 1];
#define R(b, x)
Definition: sha2.c:121
#define BF_ROUND(L, R, N)
#define BF_N

Definition at line 499 of file crypt-blowfish.c.

Referenced by _crypt_blowfish_rn().

#define BF_INDEX (   S,
  i 
)    (*((BF_word *)(((unsigned char *)(S)) + (i))))

Definition at line 475 of file crypt-blowfish.c.

#define BF_N   16

Definition at line 56 of file crypt-blowfish.c.

Referenced by _crypt_blowfish_rn(), and BF_set_key().

#define BF_ROUND (   L,
  R,
 
)
Value:
tmp1 = (L) & 0xFF; \
tmp1 <<= 2; \
tmp2 = (L) >> 6; \
tmp2 &= 0x3FC; \
tmp3 = (L) >> 14; \
tmp3 &= 0x3FC; \
tmp4 = (L) >> 22; \
tmp4 &= 0x3FC; \
tmp1 = BF_INDEX(data.ctx.S[3], tmp1); \
tmp2 = BF_INDEX(data.ctx.S[2], tmp2); \
tmp3 = BF_INDEX(data.ctx.S[1], tmp3); \
tmp3 += BF_INDEX(data.ctx.S[0], tmp4); \
tmp3 ^= tmp2; \
(R) ^= data.ctx.P[(N) + 1]; \
tmp3 += tmp1; \
(R) ^= tmp3;
#define R(b, x)
Definition: sha2.c:121
#define BF_INDEX(S, i)

Definition at line 477 of file crypt-blowfish.c.

#define BF_safe_atoi64 (   dst,
  src 
)
Value:
do { \
tmp = (unsigned char)(src); \
if ((unsigned int)(tmp -= 0x20) >= 0x60) return -1; \
tmp = BF_atoi64[tmp]; \
if (tmp > 63) return -1; \
(dst) = tmp; \
} while (0)
static unsigned char BF_atoi64[0x60]

Definition at line 362 of file crypt-blowfish.c.

Referenced by BF_decode().

#define BF_SCALE   0

Definition at line 49 of file crypt-blowfish.c.

Typedef Documentation

typedef BF_word BF_key[BF_N+2]

Definition at line 58 of file crypt-blowfish.c.

typedef unsigned int BF_word

Definition at line 52 of file crypt-blowfish.c.

typedef signed int BF_word_signed

Definition at line 53 of file crypt-blowfish.c.

Function Documentation

char* _crypt_blowfish_rn ( const char *  key,
const char *  setting,
char *  output,
int  size 
)

Definition at line 580 of file crypt-blowfish.c.

References BF_atoi64, BF_body, BF_decode(), BF_encode(), BF_ENCRYPT, BF_itoa64, BF_magic_w, BF_N, BF_set_key(), BF_swap(), CHECK_FOR_INTERRUPTS, ereport, errcode(), errmsg(), ERROR, i, output(), px_memset(), R, and BF_ctx::S.

Referenced by run_crypt_bf().

582 {
583  struct
584  {
585  BF_ctx ctx;
586  BF_key expanded_key;
587  union
588  {
589  BF_word salt[4];
590  BF_word output[6];
591  } binary;
592  } data;
593  BF_word L,
594  R;
595  BF_word tmp1,
596  tmp2,
597  tmp3,
598  tmp4;
599  BF_word *ptr;
600  BF_word count;
601  int i;
602 
603  if (size < 7 + 22 + 31 + 1)
604  return NULL;
605 
606  /*
607  * Blowfish salt value must be formatted as follows: "$2a$" or "$2x$", a
608  * two digit cost parameter, "$", and 22 digits from the alphabet
609  * "./0-9A-Za-z". -- from the PHP crypt docs. Apparently we enforce a few
610  * more restrictions on the count in the salt as well.
611  */
612  if (strlen(setting) < 29)
613  ereport(ERROR,
614  (errcode(ERRCODE_INVALID_PARAMETER_VALUE),
615  errmsg("invalid salt")));
616 
617  if (setting[0] != '$' ||
618  setting[1] != '2' ||
619  (setting[2] != 'a' && setting[2] != 'x') ||
620  setting[3] != '$' ||
621  setting[4] < '0' || setting[4] > '3' ||
622  setting[5] < '0' || setting[5] > '9' ||
623  (setting[4] == '3' && setting[5] > '1') ||
624  setting[6] != '$')
625  {
626  ereport(ERROR,
627  (errcode(ERRCODE_INVALID_PARAMETER_VALUE),
628  errmsg("invalid salt")));
629  }
630 
631  count = (BF_word) 1 << ((setting[4] - '0') * 10 + (setting[5] - '0'));
632  if (count < 16 || BF_decode(data.binary.salt, &setting[7], 16))
633  {
634  px_memset(data.binary.salt, 0, sizeof(data.binary.salt));
635  ereport(ERROR,
636  (errcode(ERRCODE_INVALID_PARAMETER_VALUE),
637  errmsg("invalid salt")));
638  }
639  BF_swap(data.binary.salt, 4);
640 
641  BF_set_key(key, data.expanded_key, data.ctx.P, setting[2] == 'x');
642 
643  memcpy(data.ctx.S, BF_init_state.S, sizeof(data.ctx.S));
644 
645  L = R = 0;
646  for (i = 0; i < BF_N + 2; i += 2)
647  {
648  L ^= data.binary.salt[i & 2];
649  R ^= data.binary.salt[(i & 2) + 1];
650  BF_ENCRYPT;
651  data.ctx.P[i] = L;
652  data.ctx.P[i + 1] = R;
653  }
654 
655  ptr = data.ctx.S[0];
656  do
657  {
658  ptr += 4;
659  L ^= data.binary.salt[(BF_N + 2) & 3];
660  R ^= data.binary.salt[(BF_N + 3) & 3];
661  BF_ENCRYPT;
662  *(ptr - 4) = L;
663  *(ptr - 3) = R;
664 
665  L ^= data.binary.salt[(BF_N + 4) & 3];
666  R ^= data.binary.salt[(BF_N + 5) & 3];
667  BF_ENCRYPT;
668  *(ptr - 2) = L;
669  *(ptr - 1) = R;
670  } while (ptr < &data.ctx.S[3][0xFF]);
671 
672  do
673  {
675 
676  data.ctx.P[0] ^= data.expanded_key[0];
677  data.ctx.P[1] ^= data.expanded_key[1];
678  data.ctx.P[2] ^= data.expanded_key[2];
679  data.ctx.P[3] ^= data.expanded_key[3];
680  data.ctx.P[4] ^= data.expanded_key[4];
681  data.ctx.P[5] ^= data.expanded_key[5];
682  data.ctx.P[6] ^= data.expanded_key[6];
683  data.ctx.P[7] ^= data.expanded_key[7];
684  data.ctx.P[8] ^= data.expanded_key[8];
685  data.ctx.P[9] ^= data.expanded_key[9];
686  data.ctx.P[10] ^= data.expanded_key[10];
687  data.ctx.P[11] ^= data.expanded_key[11];
688  data.ctx.P[12] ^= data.expanded_key[12];
689  data.ctx.P[13] ^= data.expanded_key[13];
690  data.ctx.P[14] ^= data.expanded_key[14];
691  data.ctx.P[15] ^= data.expanded_key[15];
692  data.ctx.P[16] ^= data.expanded_key[16];
693  data.ctx.P[17] ^= data.expanded_key[17];
694 
695  BF_body();
696 
697  tmp1 = data.binary.salt[0];
698  tmp2 = data.binary.salt[1];
699  tmp3 = data.binary.salt[2];
700  tmp4 = data.binary.salt[3];
701  data.ctx.P[0] ^= tmp1;
702  data.ctx.P[1] ^= tmp2;
703  data.ctx.P[2] ^= tmp3;
704  data.ctx.P[3] ^= tmp4;
705  data.ctx.P[4] ^= tmp1;
706  data.ctx.P[5] ^= tmp2;
707  data.ctx.P[6] ^= tmp3;
708  data.ctx.P[7] ^= tmp4;
709  data.ctx.P[8] ^= tmp1;
710  data.ctx.P[9] ^= tmp2;
711  data.ctx.P[10] ^= tmp3;
712  data.ctx.P[11] ^= tmp4;
713  data.ctx.P[12] ^= tmp1;
714  data.ctx.P[13] ^= tmp2;
715  data.ctx.P[14] ^= tmp3;
716  data.ctx.P[15] ^= tmp4;
717  data.ctx.P[16] ^= tmp1;
718  data.ctx.P[17] ^= tmp2;
719 
720  BF_body();
721  } while (--count);
722 
723  for (i = 0; i < 6; i += 2)
724  {
725  L = BF_magic_w[i];
726  R = BF_magic_w[i + 1];
727 
728  count = 64;
729  do
730  {
731  BF_ENCRYPT;
732  } while (--count);
733 
734  data.binary.output[i] = L;
735  data.binary.output[i + 1] = R;
736  }
737 
738  memcpy(output, setting, 7 + 22 - 1);
739  output[7 + 22 - 1] = BF_itoa64[(int)
740  BF_atoi64[(int) setting[7 + 22 - 1] - 0x20] & 0x30];
741 
742 /* This has to be bug-compatible with the original implementation, so
743  * only encode 23 of the 24 bytes. :-) */
744  BF_swap(data.binary.output, 6);
745  BF_encode(&output[7 + 22], data.binary.output, 23);
746  output[7 + 22 + 31] = '\0';
747 
748 /* Overwrite the most obvious sensitive data we have on the stack. Note
749  * that this does not guarantee there's no sensitive data left on the
750  * stack and/or in registers; I'm not aware of portable code that does. */
751  px_memset(&data, 0, sizeof(data));
752 
753  return output;
754 }
BF_word S[4][0x100]
#define R(b, x)
Definition: sha2.c:121
static void BF_swap(BF_word *x, int count)
static int BF_decode(BF_word *dst, const char *src, int size)
static void output(uint64 loop_count)
int errcode(int sqlerrcode)
Definition: elog.c:575
static void BF_set_key(const char *key, BF_key expanded, BF_key initial, int sign_extension_bug)
unsigned int BF_word
#define ERROR
Definition: elog.h:43
static unsigned char BF_itoa64[64+1]
#define BF_ENCRYPT
static void BF_encode(char *dst, const BF_word *src, int size)
#define ereport(elevel, rest)
Definition: elog.h:122
#define BF_body()
BF_word BF_key[BF_N+2]
static BF_word BF_magic_w[6]
#define BF_N
int errmsg(const char *fmt,...)
Definition: elog.c:797
static BF_ctx BF_init_state
int i
#define CHECK_FOR_INTERRUPTS()
Definition: miscadmin.h:98
static unsigned char BF_atoi64[0x60]
void px_memset(void *ptr, int c, size_t len)
Definition: px.c:134
static int BF_decode ( BF_word dst,
const char *  src,
int  size 
)
static

Definition at line 372 of file crypt-blowfish.c.

References BF_safe_atoi64.

Referenced by _crypt_blowfish_rn().

373 {
374  unsigned char *dptr = (unsigned char *) dst;
375  unsigned char *end = dptr + size;
376  const unsigned char *sptr = (const unsigned char *) src;
377  unsigned int tmp,
378  c1,
379  c2,
380  c3,
381  c4;
382 
383  do
384  {
385  BF_safe_atoi64(c1, *sptr++);
386  BF_safe_atoi64(c2, *sptr++);
387  *dptr++ = (c1 << 2) | ((c2 & 0x30) >> 4);
388  if (dptr >= end)
389  break;
390 
391  BF_safe_atoi64(c3, *sptr++);
392  *dptr++ = ((c2 & 0x0F) << 4) | ((c3 & 0x3C) >> 2);
393  if (dptr >= end)
394  break;
395 
396  BF_safe_atoi64(c4, *sptr++);
397  *dptr++ = ((c3 & 0x03) << 6) | c4;
398  } while (dptr < end);
399 
400  return 0;
401 }
#define BF_safe_atoi64(dst, src)
static void BF_encode ( char *  dst,
const BF_word src,
int  size 
)
static

Definition at line 404 of file crypt-blowfish.c.

References BF_itoa64.

Referenced by _crypt_blowfish_rn().

405 {
406  const unsigned char *sptr = (const unsigned char *) src;
407  const unsigned char *end = sptr + size;
408  unsigned char *dptr = (unsigned char *) dst;
409  unsigned int c1,
410  c2;
411 
412  do
413  {
414  c1 = *sptr++;
415  *dptr++ = BF_itoa64[c1 >> 2];
416  c1 = (c1 & 0x03) << 4;
417  if (sptr >= end)
418  {
419  *dptr++ = BF_itoa64[c1];
420  break;
421  }
422 
423  c2 = *sptr++;
424  c1 |= c2 >> 4;
425  *dptr++ = BF_itoa64[c1];
426  c1 = (c2 & 0x0f) << 2;
427  if (sptr >= end)
428  {
429  *dptr++ = BF_itoa64[c1];
430  break;
431  }
432 
433  c2 = *sptr++;
434  c1 |= c2 >> 6;
435  *dptr++ = BF_itoa64[c1];
436  *dptr++ = BF_itoa64[c2 & 0x3f];
437  } while (sptr < end);
438 }
static unsigned char BF_itoa64[64+1]
static void BF_set_key ( const char *  key,
BF_key  expanded,
BF_key  initial,
int  sign_extension_bug 
)
static

Definition at line 549 of file crypt-blowfish.c.

References BF_N, i, and BF_ctx::P.

Referenced by _crypt_blowfish_rn().

551 {
552  const char *ptr = key;
553  int i,
554  j;
555  BF_word tmp;
556 
557  for (i = 0; i < BF_N + 2; i++)
558  {
559  tmp = 0;
560  for (j = 0; j < 4; j++)
561  {
562  tmp <<= 8;
563  if (sign_extension_bug)
564  tmp |= (BF_word_signed) (signed char) *ptr;
565  else
566  tmp |= (unsigned char) *ptr;
567 
568  if (!*ptr)
569  ptr = key;
570  else
571  ptr++;
572  }
573 
574  expanded[i] = tmp;
575  initial[i] = BF_init_state.P[i] ^ tmp;
576  }
577 }
BF_key P
signed int BF_word_signed
unsigned int BF_word
#define BF_N
static BF_ctx BF_init_state
int i
static void BF_swap ( BF_word x,
int  count 
)
static

Definition at line 441 of file crypt-blowfish.c.

Referenced by _crypt_blowfish_rn().

442 {
443  /* Swap on little-endian hardware, else do nothing */
444 #ifndef WORDS_BIGENDIAN
445  BF_word tmp;
446 
447  do
448  {
449  tmp = *x;
450  tmp = (tmp << 16) | (tmp >> 16);
451  *x++ = ((tmp & 0x00FF00FF) << 8) | ((tmp >> 8) & 0x00FF00FF);
452  } while (--count);
453 #endif
454 }
unsigned int BF_word

Variable Documentation

unsigned char BF_atoi64[0x60]
static
Initial value:
= {
64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 0, 1,
54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 64, 64, 64, 64, 64,
64, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16,
17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 64, 64, 64, 64, 64,
64, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42,
43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 64, 64, 64, 64, 64
}

Definition at line 353 of file crypt-blowfish.c.

Referenced by _crypt_blowfish_rn().

BF_ctx BF_init_state
static

Definition at line 78 of file crypt-blowfish.c.

unsigned char BF_itoa64[64+1]
static
Initial value:
=
"./ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789"

Definition at line 350 of file crypt-blowfish.c.

Referenced by _crypt_blowfish_rn(), and BF_encode().

BF_word BF_magic_w[6]
static
Initial value:
= {
0x4F727068, 0x65616E42, 0x65686F6C,
0x64657253, 0x63727944, 0x6F756274
}

Definition at line 70 of file crypt-blowfish.c.

Referenced by _crypt_blowfish_rn().