95aaa82003-12-03Martin Nilsson #pike __REAL_VERSION__
59bfa12005-01-23Martin Nilsson #pragma strict_types
95aaa82003-12-03Martin Nilsson 
af10832003-12-03Martin Nilsson //! SERPENT is one of the AES finalists, designed by Ross Anderson, //! Eli Biham and Lars Knudsen. Thus, the interface and properties are //! similar to @[AES]'. One peculiarity is that it is quite pointless to //! use it with anything but the maximum key size, smaller keys are //! just padded to larger ones.
9aa0b82013-10-21Martin Nilsson #if constant(Nettle) && constant(Nettle.SERPENT_Info)
a164de2003-12-03Martin Nilsson 
95aaa82003-12-03Martin Nilsson // NOTE: Depends on the order of INIT invocations.
9aa0b82013-10-21Martin Nilsson inherit Nettle.SERPENT_Info;
95aaa82003-12-03Martin Nilsson inherit .Cipher;
9aa0b82013-10-21Martin Nilsson .CipherState `()() { return Nettle.SERPENT_State(); }
a164de2003-12-03Martin Nilsson 
627c732004-04-14Martin Nilsson #else constant this_program_does_not_exist=1;
a164de2003-12-03Martin Nilsson #endif