primitives.c

/*
 *
 * University of Luxembourg
 * Laboratory of Algorithmics, Cryptology and Security (LACS)
 *
 * FELICS - Fair Evaluation of Lightweight Cryptographic Systems
 *
 * Copyright (C) 2015 University of Luxembourg
 *
 * Written in 2015 by Daniel Dinu <dumitru-daniel.dinu@uni.lu>
 *
 * This file is part of FELICS.
 *
 * FELICS is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 3 of the License, or
 * (at your option) any later version.
 *
 * FELICS is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, see <http://www.gnu.org/licenses/>.
 *
 */

#include <stdint.h>
#include <string.h>

#include "cipher.h"
#include "constants.h"
#include "primitives.h"

#define ROTL(x)   (((x)<<1)|((x)>>7))

void inline rrr_sbox(uint8_t *data)
{
	uint8_t temp = data[3];
	data[3] &= data[2];
	data[3] ^= data[1];
	data[1] |= data[2];
	data[1] ^= data[0];
	data[0] &= data[3];
	data[0] ^= temp;
	temp &= data[1];
	data[2] ^= temp;
}

void inline rrr_L(uint8_t *data)
{
	uint8_t temp = data[0];
	temp = ROTL(temp);
	temp ^= data[0];
	temp = ROTL(temp);
	data[0] ^= temp;
}

void rrr_SLK(uint8_t *data, uint8_t *roundKey)
{
	uint8_t i;
	rrr_sbox(data);
	for(i=0;i<4;i++){
		rrr_L(data+i);
		data[i] ^= READ_ROUND_KEY_BYTE(roundKey[i]);
	}
}

void inline rrr_enc_dec_round(uint8_t *block, uint8_t *roundKey, uint8_t round)
{
	uint32_t temp;
	
	temp = ((uint32_t*)block)[0];
	
	rrr_SLK(block,roundKey);
	rrr_SLK(block,roundKey+4);
	block[3] ^= round;
	rrr_SLK(block,roundKey+8);
	rrr_sbox(block);
	
	((uint32_t*)block)[0] ^= ((uint32_t*)block)[1];
	((uint32_t*)block)[1] = temp;
}