haskell/cryptonite
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Add comments about irreducible binary polynomial.

Browse Source
This commit is contained in:
Kei Hibino 2016-04-06 11:59:26 +09:00
parent 4442744b1d
commit 327d75c2d4
1 changed files with 7 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
Crypto/MAC/CMAC.hs
View File

@ -96,6 +96,13 @@ bxor = B.xor
cipherIPT :: BlockCipher k => k -> [Word8] cipherIPT :: BlockCipher k => k -> [Word8]
cipherIPT = expandIPT . blockSize where cipherIPT = expandIPT . blockSize where
-- Data type which represents the smallest irreducibule binary polynomial
-- against specified degree.
--
-- Maximum degree bit and degree 0 bit are omitted.
-- For example, The value /Q 7 2 1/ corresponds to the degree /128/.
-- It represents that the smallest irreducible binary polynomial of degree 128
-- is x^128 + x^7 + x^2 + x^1 + 1.
data IPolynomial data IPolynomial
= Q Int Int Int = Q Int Int Int
--- | T Int --- | T Int