mirror of
https://github.com/ehw-fit/ariths-gen.git
synced 2025-04-22 06:41:22 +01:00
205 lines
9.8 KiB
C
205 lines
9.8 KiB
C
#include <stdio.h>
|
|
#include <stdint.h>
|
|
|
|
uint8_t xor_gate(uint8_t a, uint8_t b){
|
|
return ((a >> 0) & 0x01) ^ ((b >> 0) & 0x01);
|
|
}
|
|
|
|
uint8_t and_gate(uint8_t a, uint8_t b){
|
|
return ((a >> 0) & 0x01) & ((b >> 0) & 0x01);
|
|
}
|
|
|
|
uint8_t or_gate(uint8_t a, uint8_t b){
|
|
return ((a >> 0) & 0x01) | ((b >> 0) & 0x01);
|
|
}
|
|
|
|
uint8_t not_gate(uint8_t a){
|
|
return ~(((a >> 0) & 0x01)) & 0x01;
|
|
}
|
|
|
|
uint8_t ha(uint8_t a, uint8_t b){
|
|
uint8_t ha_out = 0;
|
|
uint8_t ha_xor0 = 0;
|
|
uint8_t ha_and0 = 0;
|
|
|
|
ha_xor0 = xor_gate(((a >> 0) & 0x01), ((b >> 0) & 0x01));
|
|
ha_and0 = and_gate(((a >> 0) & 0x01), ((b >> 0) & 0x01));
|
|
|
|
ha_out |= ((ha_xor0 >> 0) & 0x01ull) << 0;
|
|
ha_out |= ((ha_and0 >> 0) & 0x01ull) << 1;
|
|
return ha_out;
|
|
}
|
|
|
|
uint8_t fa(uint8_t a, uint8_t b, uint8_t cin){
|
|
uint8_t fa_out = 0;
|
|
uint8_t fa_xor0 = 0;
|
|
uint8_t fa_and0 = 0;
|
|
uint8_t fa_xor1 = 0;
|
|
uint8_t fa_and1 = 0;
|
|
uint8_t fa_or0 = 0;
|
|
|
|
fa_xor0 = xor_gate(((a >> 0) & 0x01), ((b >> 0) & 0x01));
|
|
fa_and0 = and_gate(((a >> 0) & 0x01), ((b >> 0) & 0x01));
|
|
fa_xor1 = xor_gate(((fa_xor0 >> 0) & 0x01), ((cin >> 0) & 0x01));
|
|
fa_and1 = and_gate(((fa_xor0 >> 0) & 0x01), ((cin >> 0) & 0x01));
|
|
fa_or0 = or_gate(((fa_and0 >> 0) & 0x01), ((fa_and1 >> 0) & 0x01));
|
|
|
|
fa_out |= ((fa_xor1 >> 0) & 0x01ull) << 0;
|
|
fa_out |= ((fa_or0 >> 0) & 0x01ull) << 1;
|
|
return fa_out;
|
|
}
|
|
|
|
uint8_t mux2to1(uint8_t d0, uint8_t d1, uint8_t sel){
|
|
uint8_t mux2to1_out = 0;
|
|
uint8_t mux2to1_and0 = 0;
|
|
uint8_t mux2to1_not0 = 0;
|
|
uint8_t mux2to1_and1 = 0;
|
|
uint8_t mux2to1_xor0 = 0;
|
|
|
|
mux2to1_and0 = and_gate(((d1 >> 0) & 0x01), ((sel >> 0) & 0x01));
|
|
mux2to1_not0 = not_gate(((sel >> 0) & 0x01));
|
|
mux2to1_and1 = and_gate(((d0 >> 0) & 0x01), ((mux2to1_not0 >> 0) & 0x01));
|
|
mux2to1_xor0 = xor_gate(((mux2to1_and0 >> 0) & 0x01), ((mux2to1_and1 >> 0) & 0x01));
|
|
|
|
mux2to1_out |= ((mux2to1_xor0 >> 0) & 0x01ull) << 0;
|
|
return mux2to1_out;
|
|
}
|
|
|
|
int64_t s_cska8(int64_t a, int64_t b){
|
|
int64_t s_cska8_out = 0;
|
|
uint8_t s_cska8_xor0 = 0;
|
|
uint8_t s_cska8_ha0_xor0 = 0;
|
|
uint8_t s_cska8_ha0_and0 = 0;
|
|
uint8_t s_cska8_xor1 = 0;
|
|
uint8_t s_cska8_fa0_xor1 = 0;
|
|
uint8_t s_cska8_fa0_or0 = 0;
|
|
uint8_t s_cska8_xor2 = 0;
|
|
uint8_t s_cska8_fa1_xor1 = 0;
|
|
uint8_t s_cska8_fa1_or0 = 0;
|
|
uint8_t s_cska8_xor3 = 0;
|
|
uint8_t s_cska8_fa2_xor1 = 0;
|
|
uint8_t s_cska8_fa2_or0 = 0;
|
|
uint8_t s_cska8_and_propagate00 = 0;
|
|
uint8_t s_cska8_and_propagate01 = 0;
|
|
uint8_t s_cska8_and_propagate02 = 0;
|
|
uint8_t s_cska8_mux2to10_and1 = 0;
|
|
uint8_t s_cska8_xor4 = 0;
|
|
uint8_t s_cska8_fa3_xor1 = 0;
|
|
uint8_t s_cska8_fa3_or0 = 0;
|
|
uint8_t s_cska8_xor5 = 0;
|
|
uint8_t s_cska8_fa4_xor1 = 0;
|
|
uint8_t s_cska8_fa4_or0 = 0;
|
|
uint8_t s_cska8_xor6 = 0;
|
|
uint8_t s_cska8_fa5_xor1 = 0;
|
|
uint8_t s_cska8_fa5_or0 = 0;
|
|
uint8_t s_cska8_xor7 = 0;
|
|
uint8_t s_cska8_fa6_xor1 = 0;
|
|
uint8_t s_cska8_fa6_or0 = 0;
|
|
uint8_t s_cska8_and_propagate13 = 0;
|
|
uint8_t s_cska8_and_propagate14 = 0;
|
|
uint8_t s_cska8_and_propagate15 = 0;
|
|
uint8_t s_cska8_mux2to11_xor0 = 0;
|
|
uint8_t s_cska8_xor8 = 0;
|
|
uint8_t s_cska8_xor9 = 0;
|
|
|
|
s_cska8_xor0 = xor_gate(((a >> 0) & 0x01), ((b >> 0) & 0x01));
|
|
s_cska8_ha0_xor0 = (ha(((a >> 0) & 0x01), ((b >> 0) & 0x01)) >> 0) & 0x01;
|
|
s_cska8_ha0_and0 = (ha(((a >> 0) & 0x01), ((b >> 0) & 0x01)) >> 1) & 0x01;
|
|
s_cska8_xor1 = xor_gate(((a >> 1) & 0x01), ((b >> 1) & 0x01));
|
|
s_cska8_fa0_xor1 = (fa(((a >> 1) & 0x01), ((b >> 1) & 0x01), ((s_cska8_ha0_and0 >> 0) & 0x01)) >> 0) & 0x01;
|
|
s_cska8_fa0_or0 = (fa(((a >> 1) & 0x01), ((b >> 1) & 0x01), ((s_cska8_ha0_and0 >> 0) & 0x01)) >> 1) & 0x01;
|
|
s_cska8_xor2 = xor_gate(((a >> 2) & 0x01), ((b >> 2) & 0x01));
|
|
s_cska8_fa1_xor1 = (fa(((a >> 2) & 0x01), ((b >> 2) & 0x01), ((s_cska8_fa0_or0 >> 0) & 0x01)) >> 0) & 0x01;
|
|
s_cska8_fa1_or0 = (fa(((a >> 2) & 0x01), ((b >> 2) & 0x01), ((s_cska8_fa0_or0 >> 0) & 0x01)) >> 1) & 0x01;
|
|
s_cska8_xor3 = xor_gate(((a >> 3) & 0x01), ((b >> 3) & 0x01));
|
|
s_cska8_fa2_xor1 = (fa(((a >> 3) & 0x01), ((b >> 3) & 0x01), ((s_cska8_fa1_or0 >> 0) & 0x01)) >> 0) & 0x01;
|
|
s_cska8_fa2_or0 = (fa(((a >> 3) & 0x01), ((b >> 3) & 0x01), ((s_cska8_fa1_or0 >> 0) & 0x01)) >> 1) & 0x01;
|
|
s_cska8_and_propagate00 = and_gate(((s_cska8_xor0 >> 0) & 0x01), ((s_cska8_xor2 >> 0) & 0x01));
|
|
s_cska8_and_propagate01 = and_gate(((s_cska8_xor1 >> 0) & 0x01), ((s_cska8_xor3 >> 0) & 0x01));
|
|
s_cska8_and_propagate02 = and_gate(((s_cska8_and_propagate00 >> 0) & 0x01), ((s_cska8_and_propagate01 >> 0) & 0x01));
|
|
s_cska8_mux2to10_and1 = (mux2to1(((s_cska8_fa2_or0 >> 0) & 0x01), (0x00), ((s_cska8_and_propagate02 >> 0) & 0x01)) >> 0) & 0x01;
|
|
s_cska8_xor4 = xor_gate(((a >> 4) & 0x01), ((b >> 4) & 0x01));
|
|
s_cska8_fa3_xor1 = (fa(((a >> 4) & 0x01), ((b >> 4) & 0x01), ((s_cska8_mux2to10_and1 >> 0) & 0x01)) >> 0) & 0x01;
|
|
s_cska8_fa3_or0 = (fa(((a >> 4) & 0x01), ((b >> 4) & 0x01), ((s_cska8_mux2to10_and1 >> 0) & 0x01)) >> 1) & 0x01;
|
|
s_cska8_xor5 = xor_gate(((a >> 5) & 0x01), ((b >> 5) & 0x01));
|
|
s_cska8_fa4_xor1 = (fa(((a >> 5) & 0x01), ((b >> 5) & 0x01), ((s_cska8_fa3_or0 >> 0) & 0x01)) >> 0) & 0x01;
|
|
s_cska8_fa4_or0 = (fa(((a >> 5) & 0x01), ((b >> 5) & 0x01), ((s_cska8_fa3_or0 >> 0) & 0x01)) >> 1) & 0x01;
|
|
s_cska8_xor6 = xor_gate(((a >> 6) & 0x01), ((b >> 6) & 0x01));
|
|
s_cska8_fa5_xor1 = (fa(((a >> 6) & 0x01), ((b >> 6) & 0x01), ((s_cska8_fa4_or0 >> 0) & 0x01)) >> 0) & 0x01;
|
|
s_cska8_fa5_or0 = (fa(((a >> 6) & 0x01), ((b >> 6) & 0x01), ((s_cska8_fa4_or0 >> 0) & 0x01)) >> 1) & 0x01;
|
|
s_cska8_xor7 = xor_gate(((a >> 7) & 0x01), ((b >> 7) & 0x01));
|
|
s_cska8_fa6_xor1 = (fa(((a >> 7) & 0x01), ((b >> 7) & 0x01), ((s_cska8_fa5_or0 >> 0) & 0x01)) >> 0) & 0x01;
|
|
s_cska8_fa6_or0 = (fa(((a >> 7) & 0x01), ((b >> 7) & 0x01), ((s_cska8_fa5_or0 >> 0) & 0x01)) >> 1) & 0x01;
|
|
s_cska8_and_propagate13 = and_gate(((s_cska8_xor4 >> 0) & 0x01), ((s_cska8_xor6 >> 0) & 0x01));
|
|
s_cska8_and_propagate14 = and_gate(((s_cska8_xor5 >> 0) & 0x01), ((s_cska8_xor7 >> 0) & 0x01));
|
|
s_cska8_and_propagate15 = and_gate(((s_cska8_and_propagate13 >> 0) & 0x01), ((s_cska8_and_propagate14 >> 0) & 0x01));
|
|
s_cska8_mux2to11_xor0 = (mux2to1(((s_cska8_fa6_or0 >> 0) & 0x01), ((s_cska8_mux2to10_and1 >> 0) & 0x01), ((s_cska8_and_propagate15 >> 0) & 0x01)) >> 0) & 0x01;
|
|
s_cska8_xor8 = xor_gate(((a >> 7) & 0x01), ((b >> 7) & 0x01));
|
|
s_cska8_xor9 = xor_gate(((s_cska8_xor8 >> 0) & 0x01), ((s_cska8_mux2to11_xor0 >> 0) & 0x01));
|
|
|
|
s_cska8_out |= ((s_cska8_ha0_xor0 >> 0) & 0x01ull) << 0;
|
|
s_cska8_out |= ((s_cska8_fa0_xor1 >> 0) & 0x01ull) << 1;
|
|
s_cska8_out |= ((s_cska8_fa1_xor1 >> 0) & 0x01ull) << 2;
|
|
s_cska8_out |= ((s_cska8_fa2_xor1 >> 0) & 0x01ull) << 3;
|
|
s_cska8_out |= ((s_cska8_fa3_xor1 >> 0) & 0x01ull) << 4;
|
|
s_cska8_out |= ((s_cska8_fa4_xor1 >> 0) & 0x01ull) << 5;
|
|
s_cska8_out |= ((s_cska8_fa5_xor1 >> 0) & 0x01ull) << 6;
|
|
s_cska8_out |= ((s_cska8_fa6_xor1 >> 0) & 0x01ull) << 7;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 8;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 9;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 10;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 11;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 12;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 13;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 14;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 15;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 16;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 17;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 18;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 19;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 20;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 21;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 22;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 23;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 24;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 25;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 26;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 27;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 28;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 29;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 30;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 31;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 32;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 33;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 34;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 35;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 36;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 37;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 38;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 39;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 40;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 41;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 42;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 43;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 44;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 45;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 46;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 47;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 48;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 49;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 50;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 51;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 52;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 53;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 54;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 55;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 56;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 57;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 58;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 59;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 60;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 61;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 62;
|
|
s_cska8_out |= ((s_cska8_xor9 >> 0) & 0x01ull) << 63;
|
|
return s_cska8_out;
|
|
} |