1 /* PR middle-end/55150 */
2 /* { dg-do compile } */
3 /* { dg-require-effective-target fpic } */
4 /* { dg-options "-Os -g -fPIC" } */
5 
6 typedef unsigned char DES_cblock[8];
7  typedef struct DES_ks {
8  }
9  DES_key_schedule;
10 void DES_encrypt1 (long *, DES_key_schedule *, int);
DES_ede3_cbcm_encrypt(const unsigned char * in,unsigned char * out,long length,DES_key_schedule * ks1,DES_key_schedule * ks2,DES_key_schedule * ks3,DES_cblock * ivec1,DES_cblock * ivec2,int enc)11  void DES_ede3_cbcm_encrypt (const unsigned char *in, unsigned char *out, 		       long length, DES_key_schedule * ks1, 		       DES_key_schedule * ks2, DES_key_schedule * ks3, 		       DES_cblock * ivec1, DES_cblock * ivec2, int enc) {
12    register unsigned long tout0, tout1, xor0, xor1, m0, m1;
13    register long l = length;
14    unsigned long tin[2];
15    unsigned char *iv1, *iv2;
16    iv1 = &(*ivec1)[0];
17    iv2 = &(*ivec2)[0];
18    if (enc)     {
19        (m0 = ((unsigned long) (*((iv1)++))), m0 |=        ((unsigned long) (*((iv1)++))) << 8L, m0 |=        ((unsigned long) (*((iv1)++))) << 16L, m0 |=        ((unsigned long) (*((iv1)++))) << 24L);
20        (m1 = ((unsigned long) (*((iv1)++))), m1 |=        ((unsigned long) (*((iv1)++))) << 8L, m1 |=        ((unsigned long) (*((iv1)++))) << 16L, m1 |=        ((unsigned long) (*((iv1)++))) << 24L);
21        (tout0 = ((unsigned long) (*((iv2)++))), tout0 |=        ((unsigned long) (*((iv2)++))) << 8L, tout0 |=        ((unsigned long) (*((iv2)++))) << 16L, tout0 |=        ((unsigned long) (*((iv2)++))) << 24L);
22        for (l -= 8;
23  l >= -7;
24  l -= 8) 	{
25  	  DES_encrypt1 (tin, ks3, 1);
26  	  DES_encrypt1 (tin, ks1, 1);
27  	}
28        (*((iv1)++) = (unsigned char) (((m0)) & 0xff), *((iv1)++) =        (unsigned char) (((m0) >> 8L) & 0xff), *((iv1)++) =        (unsigned char) (((m0) >> 16L) & 0xff), *((iv1)++) =        (unsigned char) (((m0) >> 24L) & 0xff));
29        (*((iv1)++) = (unsigned char) (((m1)) & 0xff), *((iv1)++) =        (unsigned char) (((m1) >> 8L) & 0xff), *((iv1)++) =        (unsigned char) (((m1) >> 16L) & 0xff), *((iv1)++) =        (unsigned char) (((m1) >> 24L) & 0xff));
30        (*((iv2)++) = (unsigned char) (((tout0)) & 0xff), *((iv2)++) =        (unsigned char) (((tout0) >> 8L) & 0xff), *((iv2)++) =        (unsigned char) (((tout0) >> 16L) & 0xff), *((iv2)++) =        (unsigned char) (((tout0) >> 24L) & 0xff));
31      }
32    else     {
33        (m0 = ((unsigned long) (*((iv1)++))), m0 |=        ((unsigned long) (*((iv1)++))) << 8L, m0 |=        ((unsigned long) (*((iv1)++))) << 16L, m0 |=        ((unsigned long) (*((iv1)++))) << 24L);
34        (xor1 = ((unsigned long) (*((iv2)++))), xor1 |=        ((unsigned long) (*((iv2)++))) << 8L, xor1 |=        ((unsigned long) (*((iv2)++))) << 16L, xor1 |=        ((unsigned long) (*((iv2)++))) << 24L);
35        for (l -= 8;
36  l >= -7;
37  l -= 8) 	{
38  	  DES_encrypt1 (tin, ks3, 1);
39  	  if (l < 0) 	    {
40  	      {
41  		switch (l + 8) 		  {
42  		  case 7: 		    *(--(out)) = (unsigned char) (((tout1) >> 16L) & 0xff);
43  		  case 6: 		    *(--(out)) = (unsigned char) (((tout1) >> 8L) & 0xff);
44  		  case 5: 		    *(--(out)) = (unsigned char) (((tout1)) & 0xff);
45  		  case 4: 		    *(--(out)) = (unsigned char) (((tout0) >> 24L) & 0xff);
46  		  case 1: 		    *(--(out)) = (unsigned char) (((tout0)) & 0xff);
47  		  }
48  	      };
49  	    }
50  	}
51        (*((iv1)++) = (unsigned char) (((m0)) & 0xff), *((iv1)++) =        (unsigned char) (((m0) >> 8L) & 0xff), *((iv1)++) =        (unsigned char) (((m0) >> 16L) & 0xff), *((iv1)++) =        (unsigned char) (((m0) >> 24L) & 0xff));
52        (*((iv2)++) = (unsigned char) (((xor0)) & 0xff), *((iv2)++) =        (unsigned char) (((xor0) >> 8L) & 0xff), *((iv2)++) =        (unsigned char) (((xor0) >> 16L) & 0xff), *((iv2)++) =        (unsigned char) (((xor0) >> 24L) & 0xff));
53        (*((iv2)++) = (unsigned char) (((xor1)) & 0xff), *((iv2)++) =        (unsigned char) (((xor1) >> 8L) & 0xff), *((iv2)++) =        (unsigned char) (((xor1) >> 16L) & 0xff), *((iv2)++) =        (unsigned char) (((xor1) >> 24L) & 0xff));
54      }
55  }
56