1 #include <altivec.h>
2 vector unsigned char
permute_128(vector unsigned char input)3 permute_128(vector unsigned char input)
4 {
5 vector unsigned char result, new_bit;
6
7 vector unsigned char select2 = ((vector unsigned char){2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2});
8 vector unsigned char select3 = ((vector unsigned char){4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4});
9 vector unsigned char select4 = ((vector unsigned char){8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8});
10 vector unsigned char select5 = ((vector unsigned char){16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16});
11 vector unsigned char select6 = ((vector unsigned char){32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32});
12 vector unsigned char select7 = ((vector unsigned char){64,64,64,64,64,64,64,64,64,64,64,64,64,64,64,64});
13 vector unsigned char select8 = ((vector unsigned char){128,128,128,128,128,128,128,128,128,128,128,128,128,128,128,128});
14
15 vector unsigned char control1
16 = ((vector unsigned char){15,14,13,12,11,10,9,8,7,6,5,4,3,2,1,0});
17 vector unsigned char control2
18 = ((vector unsigned char){15,14,13,12,11,10,9,8,7,6,5,4,3,2,1,0});
19 vector unsigned char control3
20 = ((vector unsigned char){15,14,13,12,11,10,9,8,7,6,5,4,3,2,1,0});
21 vector unsigned char control4
22 = ((vector unsigned char){15,14,13,12,11,10,9,8,7,6,5,4,3,2,1,0});
23 vector unsigned char control5
24 = ((vector unsigned char){15,14,13,12,11,10,9,8,7,6,5,4,3,2,1,0});
25 vector unsigned char control6
26 = ((vector unsigned char){15,14,13,12,11,10,9,8,7,6,5,4,3,2,1,0});
27 vector unsigned char control7
28 = ((vector unsigned char){15,14,13,12,11,10,9,8,7,6,5,4,3,2,1,0});
29 vector unsigned char control8
30 = ((vector unsigned char){15,14,13,12,11,10,9,8,7,6,5,4,3,2,1,0});
31 vector unsigned char rotate1 = ((vector unsigned char){1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1});
32 vector unsigned char rotate2 = ((vector unsigned char){3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3});
33 vector unsigned char rotate3 = ((vector unsigned char){5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5});
34 vector unsigned char rotate4 = ((vector unsigned char){7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7});
35 vector unsigned char rotate5 = ((vector unsigned char){1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1});
36 vector unsigned char rotate6 = ((vector unsigned char){3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3});
37 vector unsigned char rotate7 = ((vector unsigned char){5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5});
38 vector unsigned char rotate8 = ((vector unsigned char){7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7});
39
40 result = vec_vperm(input, input, control1);
41 result = vec_rl(result, rotate1);
42
43 new_bit = vec_vperm(input, input, control2);
44 new_bit = vec_rl(new_bit, rotate2);
45 result = vec_sel(result, new_bit, select2);
46
47 new_bit = vec_vperm(input, input, control3);
48 new_bit = vec_rl(new_bit, rotate3);
49 result = vec_sel(result, new_bit, select3);
50
51 new_bit = vec_vperm(input, input, control4);
52 new_bit = vec_rl(new_bit, rotate4);
53 result = vec_sel(result, new_bit, select4);
54
55 new_bit = vec_vperm(input, input, control5);
56 new_bit = vec_rl(new_bit, rotate5);
57 result = vec_sel(result, new_bit, select5);
58
59 new_bit = vec_vperm(input, input, control6);
60 new_bit = vec_rl(new_bit, rotate6);
61 result = vec_sel(result, new_bit, select6);
62
63 new_bit = vec_vperm(input, input, control7);
64 new_bit = vec_rl(new_bit, rotate7);
65 result = vec_sel(result, new_bit, select7);
66
67 new_bit = vec_vperm(input, input, control8);
68 new_bit = vec_rl(new_bit, rotate8);
69 result = vec_sel(result, new_bit, select8);
70
71 return result;
72 }
73
main()74 int main()
75 {
76 vector unsigned char input
77 = ((vector unsigned char){0,1,2,4,8,16,32,64,128,0,1,2,4,8,16,32});
78 vector unsigned char result = permute_128(input);
79 return 0;
80 }
81