80789ae6bf24a6426bcd38bcb4e54bf3c75cb3f6
[openafs.git] / src / des / make_fp.c
1 /*
2  * Copyright 1988 by the Massachusetts Institute of Technology.
3  *
4  * For copying and distribution information,
5  * please see the file <mit-cpyright.h>.
6  *
7  * This file contains a generation routine for source code
8  * implementing the final permutation of the DES.
9  */
10
11 #include <afsconfig.h>
12 #include <afs/param.h>
13
14 RCSID
15     ("$Header$");
16
17 #include <mit-cpyright.h>
18 #include <stdio.h>
19 #include <des.h>
20 #include "des_internal.h"
21 #include "des_prototypes.h"
22
23 #define WANT_FP_TABLE
24 #include "tables.h"
25
26 void
27 gen(FILE * stream)
28 {
29     register int i;
30
31     /* clear the output */
32     fprintf(stream, "    L2 = 0; R2 = 0;\n");
33
34     /*
35      *  NOTE: As part of the final permutation, we also have to adjust
36      *  for host bit order via "swap_bit_pos_0()".  Since L2,R2 are
37      *  the output from this, we adjust the bit positions written into
38      *  L2,R2.
39      */
40
41 #define SWAP(i,j) \
42     swap_long_bytes_bit_number(swap_bit_pos_0_to_ansi((unsigned)i)-j)
43
44     /* first setup FP */
45     fprintf(stream, "/* FP operations */\n/* first left to left */\n");
46
47     /* first list mapping from left to left */
48     for (i = 0; i <= 31; i++)
49         if (FP[i] < 32)
50             test_set(stream, "L1", FP[i], "L2", SWAP(i, 0));
51
52     /* now mapping from right to left */
53     fprintf(stream, "\n\n/* now from right to left */\n");
54     for (i = 0; i <= 31; i++)
55         if (FP[i] >= 32)
56             test_set(stream, "R1", FP[i] - 32, "L2", SWAP(i, 0));
57
58     fprintf(stream, "\n/* now from left to right */\n");
59
60     /*  list mapping from left to right */
61     for (i = 32; i <= 63; i++)
62         if (FP[i] < 32)
63             test_set(stream, "L1", FP[i], "R2", SWAP(i, 32));
64
65     /* now mapping from right to right */
66     fprintf(stream, "\n/* last from right to right */\n");
67     for (i = 32; i <= 63; i++)
68         if (FP[i] >= 32)
69             test_set(stream, "R1", FP[i] - 32, "R2", SWAP(i, 32));
70 }