diff options
| author | Nao Pross <np@0hm.ch> | 2021-04-08 18:49:39 +0200 |
|---|---|---|
| committer | Nao Pross <np@0hm.ch> | 2021-04-08 18:49:39 +0200 |
| commit | cff99b9070bf79a4e98723bbcab5d09909e6e02b (patch) | |
| tree | d934e3e1e74ed2f882023aa03907569315c04a6e /buch/chapters/90-crypto/images/sbox.m | |
| parent | Merge branch 'master' of https://github.com/AndreasFMueller/SeminarMatrizen (diff) | |
| parent | new slides (diff) | |
| download | SeminarMatrizen-cff99b9070bf79a4e98723bbcab5d09909e6e02b.tar.gz SeminarMatrizen-cff99b9070bf79a4e98723bbcab5d09909e6e02b.zip | |
Merge remote-tracking branch 'upstream/master'
Diffstat (limited to 'buch/chapters/90-crypto/images/sbox.m')
| -rw-r--r-- | buch/chapters/90-crypto/images/sbox.m | 52 |
1 files changed, 52 insertions, 0 deletions
diff --git a/buch/chapters/90-crypto/images/sbox.m b/buch/chapters/90-crypto/images/sbox.m new file mode 100644 index 0000000..973ffc9 --- /dev/null +++ b/buch/chapters/90-crypto/images/sbox.m @@ -0,0 +1,52 @@ +# +# sbox.m +# +# (c) 2021 Prof Dr Andreas Müller, OST Ostschweizer Fachhochschule +# +A=[ +1,0,0,0,1,1,1,1; +1,1,0,0,0,1,1,1; +1,1,1,0,0,0,1,1; +1,1,1,1,0,0,0,1; +1,1,1,1,1,0,0,0; +0,1,1,1,1,1,0,0; +0,0,1,1,1,1,1,0; +0,0,0,1,1,1,1,1; +] + +R = zeros(8,16); +R(:,1:8) = A; +R(:,9:16) = eye(8); + +for k = (1:5) + for i=(k+1:8) + pivot = R(i,k); + R(i,:) = R(i,:) + pivot * R(k,:); + end + R = mod(R, 2) +end + +P = [ +1,0,0,0,0,0,0,0; +0,1,0,0,0,0,0,0; +0,0,1,0,0,0,0,0; +0,0,0,1,0,0,0,0; +0,0,0,0,1,0,0,0; +0,0,0,0,0,0,0,1; +0,0,0,0,0,1,0,0; +0,0,0,0,0,0,1,0; +] + +R = P * R + +for k = (8:-1:2) + for i = (1:k-1) + pivot = R(i,k); + R(i,:) = R(i,:) + pivot * R(k,:); + end + R = mod(R, 2) +end + +B = R(:,9:16) + +A * B |