#include<iostream>
using namespace std;

typedef unsigned int DWORD;

void teaE(DWORD* EntryData, DWORD* Key)
{
    //分别加密数组中的前四个字节与后4个字节,4个字节为一组每次加密两组
    DWORD x = EntryData[0];
    DWORD y = EntryData[1];

    DWORD sum = 0;
    DWORD delta = 0x9E3779B9;
    //总共加密32轮
    for (int i = 0; i < 0x66; i++)
    {
        sum += delta;
        x += ((y << 4) + Key[0]) ^ (y + sum) ^ ((y >> 5) + Key[1]);
        y += ((x << 4) + Key[2]) ^ (x + sum) ^ ((x >> 5) + Key[3]);
        if(i==0)
            printf("%d轮：v0: %x v1: %x\n", i, x, y);
    }
    //最后加密的结果重新写入到数组中
    EntryData[0] = x;
    EntryData[1] = y;
}

void xteaE(DWORD v[2], DWORD const key[4]) {
    unsigned int i;
    DWORD v0 = v[0], v1 = v[1], sum = 0, delta = 0x9E3779B9;
    for (i = 0; i < 0x66; i++) {
        v0 += (((v1 << 4) ^ (v1 >> 5)) + v1) ^ (sum + key[sum & 3]);
        sum += delta;
        v1 += (((v0 << 4) ^ (v0 >> 5)) + v0) ^ (sum + key[(sum >> 11) & 3]);
        //if (i == 0)
            //printf("%d轮：v0: %x v1: %x\n", i, v0, v1);
    }
    v[0] = v0; v[1] = v1;
}

#define DELTA 0x9e3779b9
#define MX (((z>>5^y<<2) + (y>>3^z<<4)) ^ ((sum^y) + (key[(p&3)^e] ^ z)))

void xxtea(DWORD* v, int n, DWORD const key[4])
{
    DWORD y, z, sum;
    unsigned p, rounds, e;
   
    rounds = 0x66;
    sum = 0;
    z = v[n - 1];
    do
    {
        sum += DELTA;
        e = (sum >> 2) & 3;
        for (p = 0; p < n - 1; p++)
        {
            y = v[p + 1];
            z = v[p] += MX;
        }
        y = v[0];
        z = v[n - 1] += MX;
        if (rounds == 0x66)
            printf("%d轮：v0: %x v1: %x\n", rounds, y, z);
    } while (--rounds);
    
}

//上面这三个都是在尝试
//比较数据
//unsigned int ans[14] = {  假的，出生
//    0x027B44BE, 0x8C4B95BA, 0x90F1A8E3, 0x3CA4CDFB, 0x689EEE2F, 0xED6DAA79, 0x2F77B085, 0xFF413F27,
//   0x43CFC11F, 0xFAAC00AA, 0x09574371, 0xB2F7BA51, 0x47529667, 0xC74050A0
//};

unsigned int ans[14] = {
    0x9851E3A1, 0x49765686, 0x812B6B6F, 0x9612CECF, 0x3C3570A2, 0xF15C6231, 0xAA6B77FA, 0xBE056D9E,
    0xF8A424E8, 0x0B3A23DB, 0x03CC2016, 0xA92BB5AD, 0x1D789F34, 0x9EF9B92E
};

//unsigned char ans[] = "\xde\xde\xde\xde\xde\xde\xde\xde";
//DWORD res[] = { 0x027B44BE ,0x8C4B95BA };
//DWORD k[4] = { 2,2,3,4 };

DWORD k[4] = { 0xEF6FD9DB, 0xD2C273D3, 0x6F97E412, 0x72BFD624 };

void xteaD(DWORD v[2], DWORD const key[4]) {
    unsigned int i;
    DWORD v0 = v[0], v1 = v[1], delta = 0x9E3779B9, sum = delta * 0x66;
    for (i = 0; i < 0x66; i++) {
        v1 -= (((v0 << 4) ^ (v0 >> 5)) + v0) ^ (sum + key[(sum >> 11) & 3]);
        sum -= delta;
        v0 -= (((v1 << 4) ^ (v1 >> 5)) + v1) ^ (sum + key[sum & 3]);
    }
    v[0] = v0; v[1] = v1;
}

int main()
{
   // printf("%x %x\n", ((DWORD*)ans)[0], ((DWORD*)ans)[1]);
    //xteaE((DWORD*)ans,k);
    //xxtea((DWORD*)datas,2, k);

    //printf("%x %x\n", ((DWORD*)ans)[0], ((DWORD*)ans)[1]);
    for (int i = 0; i < 14; i += 2)
    {
        xteaD((DWORD*)&(((DWORD*)ans)[i]), k);
    }
    unsigned char* str = (unsigned char*)ans;
    for (int i = 0; i < 56; i++)
    {
        printf("%02x ", str[i]);
    }
    printf("\n\n\n");
    for (int i = 0; i < 56; i++)
    {
        printf("%c", (unsigned char)((0x7f - str[i])- 0x40));
    }
    //printf("%x", ans[2]);
    //DWORD sum = 0;
    //for (int i = 0; i < 0x66; i++)
    //{
    //    sum += DELTA;
    //}
    //printf("%x", sum);

	return 0;
}