src/des/tables.h

   1 /*
   2  * Copyright 1988 by the Massachusetts Institute of Technology.
   3  *
   4  * For copying and distribution information, please see the file
   5  * <mit-copyright.h>.
   6  *
   7  * part of the Athena Kerberos encryption system
   8  *
   9  * spm  8/85
  10  */
  11
  12 /*
  13  * Initial permutation, adjust to zero based subscript
  14  */
  15 #ifdef WANT_IP_TABLE
  16 static  char    IP[] = {
  17         58-1, 50-1, 42-1, 34-1, 26-1, 18-1, 10-1,  2-1,
  18         60-1, 52-1, 44-1, 36-1, 28-1, 20-1, 12-1,  4-1,
  19         62-1, 54-1, 46-1, 38-1, 30-1, 22-1, 14-1,  6-1,
  20         64-1, 56-1, 48-1, 40-1, 32-1, 24-1, 16-1,  8-1,
  21         57-1, 49-1, 41-1, 33-1, 25-1, 17-1,  9-1,  1-1,
  22         59-1, 51-1, 43-1, 35-1, 27-1, 19-1, 11-1,  3-1,
  23         61-1, 53-1, 45-1, 37-1, 29-1, 21-1, 13-1,  5-1,
  24         63-1, 55-1, 47-1, 39-1, 31-1, 23-1, 15-1,  7-1,
  25 };
  26 #endif
  27
  28 /*
  29  * Final permutation,  FP = IP^(-1) adjust to zero based subscript
  30  */
  31 #ifdef WANT_FP_TABLE
  32 static  char    FP[] = {
  33         40-1,  8-1, 48-1, 16-1, 56-1, 24-1, 64-1, 32-1,
  34         39-1,  7-1, 47-1, 15-1, 55-1, 23-1, 63-1, 31-1,
  35         38-1,  6-1, 46-1, 14-1, 54-1, 22-1, 62-1, 30-1,
  36         37-1,  5-1, 45-1, 13-1, 53-1, 21-1, 61-1, 29-1,
  37         36-1,  4-1, 44-1, 12-1, 52-1, 20-1, 60-1, 28-1,
  38         35-1,  3-1, 43-1, 11-1, 51-1, 19-1, 59-1, 27-1,
  39         34-1,  2-1, 42-1, 10-1, 50-1, 18-1, 58-1, 26-1,
  40         33-1,  1-1, 41-1,  9-1, 49-1, 17-1, 57-1, 25-1,
  41 };
  42 #endif
  43
  44 /* the E selection function, adjusted to zero based subscripts */
  45 #ifdef WANT_E_TABLE
  46 static  char    E[] = {
  47         32-1,   1-1,    2-1,    3-1,    4-1,    5-1,
  48          4-1,   5-1,    6-1,    7-1,    8-1,    9-1,
  49          8-1,   9-1,    10-1,   11-1,   12-1,   13-1,
  50         12-1,   13-1,   14-1,   15-1,   16-1,   17-1,
  51         16-1,   17-1,   18-1,   19-1,   20-1,   21-1,
  52         20-1,   21-1,   22-1,   23-1,   24-1,   25-1,
  53         24-1,   25-1,   26-1,   27-1,   28-1,   29-1,
  54         28-1,   29-1,   30-1,   31-1,   32-1,   1-1,
  55 };
  56 #endif
  57
  58 /* the P permutation, adjusted to zero based subscripts */
  59 #ifdef WANT_P_TABLE
  60 static  char    P[] = {
  61         16-1,    7-1,   20-1,   21-1,
  62         29-1,   12-1,   28-1,   17-1,
  63          1-1,   15-1,   23-1,   26-1,
  64          5-1,   18-1,   31-1,   10-1,
  65          2-1,    8-1,   24-1,   14-1,
  66         32-1,   27-1,    3-1,    9-1,
  67         19-1,   13-1,   30-1,    6-1,
  68         22-1,   11-1,    4-1,   25-1,
  69 };
  70 #endif
  71
  72 /* S tables, original form */
  73 #ifdef WANT_S_TABLE
  74 static  char    S[8][64] = {
  75 {       14, 4,13, 1, 2,15,11, 8, 3,10, 6,12, 5, 9, 0, 7,
  76          0,15, 7, 4,14, 2,13, 1,10, 6,12,11, 9, 5, 3, 8,
  77          4, 1,14, 8,13, 6, 2,11,15,12, 9, 7, 3,10, 5, 0,
  78         15,12, 8, 2, 4, 9, 1, 7, 5,11, 3,14,10, 0, 6,13, },
  79
  80 {       15, 1, 8,14, 6,11, 3, 4, 9, 7, 2,13,12, 0, 5,10,
  81          3,13, 4, 7,15, 2, 8,14,12, 0, 1,10, 6, 9,11, 5,
  82          0,14, 7,11,10, 4,13, 1, 5, 8,12, 6, 9, 3, 2,15,
  83         13, 8,10, 1, 3,15, 4, 2,11, 6, 7,12, 0, 5,14, 9, },
  84
  85 {       10, 0, 9,14, 6, 3,15, 5, 1,13,12, 7,11, 4, 2, 8,
  86         13, 7, 0, 9, 3, 4, 6,10, 2, 8, 5,14,12,11,15, 1,
  87         13, 6, 4, 9, 8,15, 3, 0,11, 1, 2,12, 5,10,14, 7,
  88          1,10,13, 0, 6, 9, 8, 7, 4,15,14, 3,11, 5, 2,12, },
  89
  90 {        7,13,14, 3, 0, 6, 9,10, 1, 2, 8, 5,11,12, 4,15,
  91         13, 8,11, 5, 6,15, 0, 3, 4, 7, 2,12, 1,10,14, 9,
  92         10, 6, 9, 0,12,11, 7,13,15, 1, 3,14, 5, 2, 8, 4,
  93          3,15, 0, 6,10, 1,13, 8, 9, 4, 5,11,12, 7, 2,14, },
  94
  95 {        2,12, 4, 1, 7,10,11, 6, 8, 5, 3,15,13, 0,14, 9,
  96         14,11, 2,12, 4, 7,13, 1, 5, 0,15,10, 3, 9, 8, 6,
  97          4, 2, 1,11,10,13, 7, 8,15, 9,12, 5, 6, 3, 0,14,
  98         11, 8,12, 7, 1,14, 2,13, 6,15, 0, 9,10, 4, 5, 3, },
  99
 100 {       12, 1,10,15, 9, 2, 6, 8, 0,13, 3, 4,14, 7, 5,11,
 101         10,15, 4, 2, 7,12, 9, 5, 6, 1,13,14, 0,11, 3, 8,
 102          9,14,15, 5, 2, 8,12, 3, 7, 0, 4,10, 1,13,11, 6,
 103          4, 3, 2,12, 9, 5,15,10,11,14, 1, 7, 6, 0, 8,13, },
 104
 105 {        4,11, 2,14,15, 0, 8,13, 3,12, 9, 7, 5,10, 6, 1,
 106         13, 0,11, 7, 4, 9, 1,10,14, 3, 5,12, 2,15, 8, 6,
 107          1, 4,11,13,12, 3, 7,14,10,15, 6, 8, 0, 5, 9, 2,
 108          6,11,13, 8, 1, 4,10, 7, 9, 5, 0,15,14, 2, 3,12, },
 109
 110 {       13, 2, 8, 4, 6,15,11, 1,10, 9, 3,14, 5, 0,12, 7,
 111          1,15,13, 8,10, 3, 7, 4,12, 5, 6,11, 0,14, 9, 2,
 112          7,11, 4, 1, 9,12,14, 2, 0, 6,10,13,15, 3, 5, 8,
 113          2, 1,14, 7, 4,10, 8,13,15,12, 9, 0, 3, 5, 6,11 }
 114 };
 115 #endif