![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to tables.h CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 43BSDReno / kerberosIV / des|
Return to tables.h CVS log | Up to [CSRG BSD Unix] / 43BSDReno / kerberosIV / des |
1.1 root 1: /*
2: * $Source: /usr/src/kerberosIV/des/RCS/tables.h,v $
3: * $Author: steiner $
4: * $Header: /usr/src/kerberosIV/des/RCS/tables.h,v 4.3 88/04/29 09:59:54 steiner Exp $
5: *
6: * Copyright 1988 by the Massachusetts Institute of Technology.
7: *
8: * For copying and distribution information, please see the file
9: * <mit-copyright.h>.
10: *
11: * part of the Athena Kerberos encryption system
12: *
13: * spm 8/85
14: */
15:
16: /*
17: * Initial permutation, adjust to zero based subscript
18: */
19: static char IP[] = {
20: 58-1, 50-1, 42-1, 34-1, 26-1, 18-1, 10-1, 2-1,
21: 60-1, 52-1, 44-1, 36-1, 28-1, 20-1, 12-1, 4-1,
22: 62-1, 54-1, 46-1, 38-1, 30-1, 22-1, 14-1, 6-1,
23: 64-1, 56-1, 48-1, 40-1, 32-1, 24-1, 16-1, 8-1,
24: 57-1, 49-1, 41-1, 33-1, 25-1, 17-1, 9-1, 1-1,
25: 59-1, 51-1, 43-1, 35-1, 27-1, 19-1, 11-1, 3-1,
26: 61-1, 53-1, 45-1, 37-1, 29-1, 21-1, 13-1, 5-1,
27: 63-1, 55-1, 47-1, 39-1, 31-1, 23-1, 15-1, 7-1,
28: };
29:
30: /*
31: * Final permutation, FP = IP^(-1) adjust to zero based subscript
32: */
33: static char FP[] = {
34: 40-1, 8-1, 48-1, 16-1, 56-1, 24-1, 64-1, 32-1,
35: 39-1, 7-1, 47-1, 15-1, 55-1, 23-1, 63-1, 31-1,
36: 38-1, 6-1, 46-1, 14-1, 54-1, 22-1, 62-1, 30-1,
37: 37-1, 5-1, 45-1, 13-1, 53-1, 21-1, 61-1, 29-1,
38: 36-1, 4-1, 44-1, 12-1, 52-1, 20-1, 60-1, 28-1,
39: 35-1, 3-1, 43-1, 11-1, 51-1, 19-1, 59-1, 27-1,
40: 34-1, 2-1, 42-1, 10-1, 50-1, 18-1, 58-1, 26-1,
41: 33-1, 1-1, 41-1, 9-1, 49-1, 17-1, 57-1, 25-1,
42: };
43:
44: /* the E selection function, adjusted to zero based subscripts */
45: static char E[] = {
46: 32-1, 1-1, 2-1, 3-1, 4-1, 5-1,
47: 4-1, 5-1, 6-1, 7-1, 8-1, 9-1,
48: 8-1, 9-1, 10-1, 11-1, 12-1, 13-1,
49: 12-1, 13-1, 14-1, 15-1, 16-1, 17-1,
50: 16-1, 17-1, 18-1, 19-1, 20-1, 21-1,
51: 20-1, 21-1, 22-1, 23-1, 24-1, 25-1,
52: 24-1, 25-1, 26-1, 27-1, 28-1, 29-1,
53: 28-1, 29-1, 30-1, 31-1, 32-1, 1-1,
54: };
55:
56: /* the P permutation, adjusted to zero based subscripts */
57: static char P[] = {
58: 16-1, 7-1, 20-1, 21-1,
59: 29-1, 12-1, 28-1, 17-1,
60: 1-1, 15-1, 23-1, 26-1,
61: 5-1, 18-1, 31-1, 10-1,
62: 2-1, 8-1, 24-1, 14-1,
63: 32-1, 27-1, 3-1, 9-1,
64: 19-1, 13-1, 30-1, 6-1,
65: 22-1, 11-1, 4-1, 25-1,
66: };
67:
68: /* S tables, original form */
69: static char S[8][64] = {
70: 14, 4,13, 1, 2,15,11, 8, 3,10, 6,12, 5, 9, 0, 7,
71: 0,15, 7, 4,14, 2,13, 1,10, 6,12,11, 9, 5, 3, 8,
72: 4, 1,14, 8,13, 6, 2,11,15,12, 9, 7, 3,10, 5, 0,
73: 15,12, 8, 2, 4, 9, 1, 7, 5,11, 3,14,10, 0, 6,13,
74:
75: 15, 1, 8,14, 6,11, 3, 4, 9, 7, 2,13,12, 0, 5,10,
76: 3,13, 4, 7,15, 2, 8,14,12, 0, 1,10, 6, 9,11, 5,
77: 0,14, 7,11,10, 4,13, 1, 5, 8,12, 6, 9, 3, 2,15,
78: 13, 8,10, 1, 3,15, 4, 2,11, 6, 7,12, 0, 5,14, 9,
79:
80: 10, 0, 9,14, 6, 3,15, 5, 1,13,12, 7,11, 4, 2, 8,
81: 13, 7, 0, 9, 3, 4, 6,10, 2, 8, 5,14,12,11,15, 1,
82: 13, 6, 4, 9, 8,15, 3, 0,11, 1, 2,12, 5,10,14, 7,
83: 1,10,13, 0, 6, 9, 8, 7, 4,15,14, 3,11, 5, 2,12,
84:
85: 7,13,14, 3, 0, 6, 9,10, 1, 2, 8, 5,11,12, 4,15,
86: 13, 8,11, 5, 6,15, 0, 3, 4, 7, 2,12, 1,10,14, 9,
87: 10, 6, 9, 0,12,11, 7,13,15, 1, 3,14, 5, 2, 8, 4,
88: 3,15, 0, 6,10, 1,13, 8, 9, 4, 5,11,12, 7, 2,14,
89:
90: 2,12, 4, 1, 7,10,11, 6, 8, 5, 3,15,13, 0,14, 9,
91: 14,11, 2,12, 4, 7,13, 1, 5, 0,15,10, 3, 9, 8, 6,
92: 4, 2, 1,11,10,13, 7, 8,15, 9,12, 5, 6, 3, 0,14,
93: 11, 8,12, 7, 1,14, 2,13, 6,15, 0, 9,10, 4, 5, 3,
94:
95: 12, 1,10,15, 9, 2, 6, 8, 0,13, 3, 4,14, 7, 5,11,
96: 10,15, 4, 2, 7,12, 9, 5, 6, 1,13,14, 0,11, 3, 8,
97: 9,14,15, 5, 2, 8,12, 3, 7, 0, 4,10, 1,13,11, 6,
98: 4, 3, 2,12, 9, 5,15,10,11,14, 1, 7, 6, 0, 8,13,
99:
100: 4,11, 2,14,15, 0, 8,13, 3,12, 9, 7, 5,10, 6, 1,
101: 13, 0,11, 7, 4, 9, 1,10,14, 3, 5,12, 2,15, 8, 6,
102: 1, 4,11,13,12, 3, 7,14,10,15, 6, 8, 0, 5, 9, 2,
103: 6,11,13, 8, 1, 4,10, 7, 9, 5, 0,15,14, 2, 3,12,
104:
105: 13, 2, 8, 4, 6,15,11, 1,10, 9, 3,14, 5, 0,12, 7,
106: 1,15,13, 8,10, 3, 7, 4,12, 5, 6,11, 0,14, 9, 2,
107: 7,11, 4, 1, 9,12,14, 2, 0, 6,10,13,15, 3, 5, 8,
108: 2, 1,14, 7, 4,10, 8,13,15,12, 9, 0, 3, 5, 6,11,
109: };
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.