77 	57, 49, 41, 33, 25, 17,  9,  1, 59, 51, 43, 35, 27, 19, 11,  3,
84 	10,  2, 59, 51, 43, 35, 27, 19, 11,  3, 60, 52, 44, 36,
95 	14, 17, 11, 24,  1,  5,  3, 28, 15,  6, 21, 10,
108 		14,  4, 13,  1,  2, 15, 11,  8,  3, 10,  6, 12,  5,  9,  0,  7,
109 		 0, 15,  7,  4, 14,  2, 13,  1, 10,  6, 12, 11,  9,  5,  3,  8,
110 		 4,  1, 14,  8, 13,  6,  2, 11, 15, 12,  9,  7,  3, 10,  5,  0,
111 		15, 12,  8,  2,  4,  9,  1,  7,  5, 11,  3, 14, 10,  0,  6, 13
114 		15,  1,  8, 14,  6, 11,  3,  4,  9,  7,  2, 13, 12,  0,  5, 10,
115 		 3, 13,  4,  7, 15,  2,  8, 14, 12,  0,  1, 10,  6,  9, 11,  5,
116 		 0, 14,  7, 11, 10,  4, 13,  1,  5,  8, 12,  6,  9,  3,  2, 15,
117 		13,  8, 10,  1,  3, 15,  4,  2, 11,  6,  7, 12,  0,  5, 14,  9
120 		10,  0,  9, 14,  6,  3, 15,  5,  1, 13, 12,  7, 11,  4,  2,  8,
121 		13,  7,  0,  9,  3,  4,  6, 10,  2,  8,  5, 14, 12, 11, 15,  1,
122 		13,  6,  4,  9,  8, 15,  3,  0, 11,  1,  2, 12,  5, 10, 14,  7,
123 		 1, 10, 13,  0,  6,  9,  8,  7,  4, 15, 14,  3, 11,  5,  2, 12
126 		 7, 13, 14,  3,  0,  6,  9, 10,  1,  2,  8,  5, 11, 12,  4, 15,
127 		13,  8, 11,  5,  6, 15,  0,  3,  4,  7,  2, 12,  1, 10, 14,  9,
128 		10,  6,  9,  0, 12, 11,  7, 13, 15,  1,  3, 14,  5,  2,  8,  4,
129 		 3, 15,  0,  6, 10,  1, 13,  8,  9,  4,  5, 11, 12,  7,  2, 14
132 		 2, 12,  4,  1,  7, 10, 11,  6,  8,  5,  3, 15, 13,  0, 14,  9,
133 		14, 11,  2, 12,  4,  7, 13,  1,  5,  0, 15, 10,  3,  9,  8,  6,
134 		 4,  2,  1, 11, 10, 13,  7,  8, 15,  9, 12,  5,  6,  3,  0, 14,
135 		11,  8, 12,  7,  1, 14,  2, 13,  6, 15,  0,  9, 10,  4,  5,  3
138 		12,  1, 10, 15,  9,  2,  6,  8,  0, 13,  3,  4, 14,  7,  5, 11,
139 		10, 15,  4,  2,  7, 12,  9,  5,  6,  1, 13, 14,  0, 11,  3,  8,
140 		 9, 14, 15,  5,  2,  8, 12,  3,  7,  0,  4, 10,  1, 13, 11,  6,
141 		 4,  3,  2, 12,  9,  5, 15, 10, 11, 14,  1,  7,  6,  0,  8, 13
144 		 4, 11,  2, 14, 15,  0,  8, 13,  3, 12,  9,  7,  5, 10,  6,  1,
145 		13,  0, 11,  7,  4,  9,  1, 10, 14,  3,  5, 12,  2, 15,  8,  6,
146 		 1,  4, 11, 13, 12,  3,  7, 14, 10, 15,  6,  8,  0,  5,  9,  2,
147 		 6, 11, 13,  8,  1,  4, 10,  7,  9,  5,  0, 15, 14,  2,  3, 12
150 		13,  2,  8,  4,  6, 15, 11,  1, 10,  9,  3, 14,  5,  0, 12,  7,
151 		 1, 15, 13,  8, 10,  3,  7,  4, 12,  5,  6, 11,  0, 14,  9,  2,
152 		 7, 11,  4,  1,  9, 12, 14,  2,  0,  6, 10, 13, 15,  3,  5,  8,
153 		 2,  1, 14,  7,  4, 10,  8, 13, 15, 12,  9,  0,  3,  5,  6, 11
160 	 2,  8, 24, 14, 32, 27,  3,  9, 19, 13, 30,  6, 22, 11,  4, 25
218 	int	i, j, b, k, inbit, obit;  in des_init()  local
229 	for (i = 0; i < 8; i++)  in des_init()
232 			u_sbox[i][j] = sbox[i][b];  in des_init()
240 		for (i = 0; i < 64; i++)  in des_init()
242 				m_sbox[b][(i << 6) | j] =  in des_init()
243 					(u_char)((u_sbox[(b << 1)][i] << 4) |  in des_init()
250 	for (i = 0; i < 64; i++) {  in des_init()
251 		init_perm[final_perm[i] = IP[i] - 1] = (u_char)i;  in des_init()
252 		inv_key_perm[i] = 255;  in des_init()
259 	for (i = 0; i < 56; i++) {  in des_init()
260 		inv_key_perm[key_perm[i] - 1] = (u_char)i;  in des_init()
261 		inv_comp_perm[i] = 255;  in des_init()
267 	for (i = 0; i < 48; i++) {  in des_init()
268 		inv_comp_perm[comp_perm[i] - 1] = (u_char)i;  in des_init()
276 		for (i = 0; i < 256; i++) {  in des_init()
277 			*(il = &ip_maskl[k][i]) = 0L;  in des_init()
278 			*(ir = &ip_maskr[k][i]) = 0L;  in des_init()
279 			*(fl = &fp_maskl[k][i]) = 0L;  in des_init()
280 			*(fr = &fp_maskr[k][i]) = 0L;  in des_init()
283 				if (i & bits8[j]) {  in des_init()
295 		for (i = 0; i < 128; i++) {  in des_init()
296 			*(il = &key_perm_maskl[k][i]) = 0L;  in des_init()
297 			*(ir = &key_perm_maskr[k][i]) = 0L;  in des_init()
300 				if (i & bits8[j + 1]) {  in des_init()
309 			*(il = &comp_maskl[k][i]) = 0L;  in des_init()
310 			*(ir = &comp_maskr[k][i]) = 0L;  in des_init()
313 				if (i & bits8[j + 1]) {  in des_init()
329 	for (i = 0; i < 32; i++)  in des_init()
330 		un_pbox[pbox[i] - 1] = (u_char)i;  in des_init()
333 		for (i = 0; i < 256; i++) {  in des_init()
334 			*(p = &psbox[b][i]) = 0L;  in des_init()
336 				if (i & bits8[j])  in des_init()
348 	int		i;  in setup_salt()  local
357 	for (i = 0; i < 24; i++) {  in setup_salt()
505 				| ((r & 0x1f800000) >> 11)  in do_des()
591 	int		i;  in crypt_des()  local
617 		for (i = 1, count = 0L; i < 5; i++)  in crypt_des()
618 			count |= ascii_to_bin(setting[i]) << ((i - 1) * 6);  in crypt_des()
620 		for (i = 5, salt = 0L; i < 9; i++)  in crypt_des()
621 			salt |= ascii_to_bin(setting[i]) << ((i - 5) * 6);  in crypt_des()