def __init__(self, field = None):
"""
Create a linear feedback shift cryptosystem.
INPUT: A string monoid over a binary alphabet.
OUTPUT:
EXAMPLES::
sage: E = LFSRCryptosystem(FiniteField(2))
sage: E
LFSR cryptosystem over Finite Field of size 2
TESTS::
sage: E = LFSRCryptosystem(FiniteField(2))
sage: E == loads(dumps(E))
True
TODO: Implement LFSR cryptosystem for arbitrary rings. The current
implementation is limited to the finite field of 2 elements only
because of the dependence on binary strings.
"""
if field is None:
field = FiniteField(2)
if field.cardinality() != 2:
raise NotImplementedError("Not yet implemented.")
S = BinaryStrings()
P = PolynomialRing(FiniteField(2),'x')
SymmetricKeyCryptosystem.__init__(self, S, S, None)
self._field = field
def __init__(self, field=None):
"""
Create a shrinking generator cryptosystem.
INPUT: A string monoid over a binary alphabet.
OUTPUT:
EXAMPLES::
sage: E = ShrinkingGeneratorCryptosystem()
sage: E
Shrinking generator cryptosystem over Finite Field of size 2
"""
if field is None:
field = FiniteField(2)
if field.cardinality() != 2:
raise NotImplementedError("Not yet implemented.")
S = BinaryStrings()
SymmetricKeyCryptosystem.__init__(self, S, S, None)
self._field = field
def ascii_to_bin(A):
r"""
Return the binary representation of the ASCII string ``A``.
INPUT:
- ``A`` -- a string or list of ASCII characters.
OUTPUT:
- The binary representation of ``A``.
ALGORITHM:
Let `A = a_0 a_1 \cdots a_{n-1}` be an ASCII string, where each `a_i` is
an ASCII character. Let `c_i` be the ASCII integer corresponding to `a_i`
and let `b_i` be the binary representation of `c_i`. The binary
representation `B` of `A` is `B = b_0 b_1 \cdots b_{n-1}`.
EXAMPLES:
The binary representation of some ASCII strings::
sage: from sage.crypto.util import ascii_to_bin
sage: ascii_to_bin("A")
01000001
sage: ascii_to_bin("Abc123")
010000010110001001100011001100010011001000110011
The empty string is different from the string with one space character.
For the empty string and the empty list, this function returns the same
result::
sage: from sage.crypto.util import ascii_to_bin
sage: ascii_to_bin("")
<BLANKLINE>
sage: ascii_to_bin(" ")
00100000
sage: ascii_to_bin([])
<BLANKLINE>
This function also accepts a list of ASCII characters. You can also pass
in a list of strings::
sage: from sage.crypto.util import ascii_to_bin
sage: ascii_to_bin(["A", "b", "c", "1", "2", "3"])
010000010110001001100011001100010011001000110011
sage: ascii_to_bin(["A", "bc", "1", "23"])
010000010110001001100011001100010011001000110011
TESTS:
For a list of ASCII characters or strings, do not mix characters or
strings with integers::
sage: from sage.crypto.util import ascii_to_bin
sage: ascii_to_bin(["A", "b", "c", 1, 2, 3])
Traceback (most recent call last):
...
TypeError: sequence item 3: expected string, sage.rings.integer.Integer found
sage: ascii_to_bin(["Abc", 1, 2, 3])
Traceback (most recent call last):
...
TypeError: sequence item 1: expected string, sage.rings.integer.Integer found
"""
bin = BinaryStrings()
return bin.encoding("".join(list(A)))
def encrypt(self, P, K, seed=None):
r"""
Apply the Blum-Goldwasser scheme to encrypt the plaintext ``P`` using
the public key ``K``.
INPUT:
- ``P`` -- a non-empty string of plaintext. The string ``""`` is
an empty string, whereas ``" "`` is a string consisting of one
white space character. The plaintext can be a binary string or
a string of ASCII characters. Where ``P`` is an ASCII string, then
``P`` is first encoded as a binary string prior to encryption.
- ``K`` -- a public key, which is the product of two Blum primes.
- ``seed`` -- (default: ``None``) if `p` and `q` are Blum primes and
`n = pq` is a public key, then ``seed`` is a quadratic residue in
the multiplicative group `(\ZZ/n\ZZ)^{\ast}`. If ``seed=None``,
then the function would generate its own random quadratic residue
in `(\ZZ/n\ZZ)^{\ast}`. Where a value for ``seed`` is provided,
it is your responsibility to ensure that the seed is a
quadratic residue in the multiplicative group `(\ZZ/n\ZZ)^{\ast}`.
OUTPUT:
- The ciphertext resulting from encrypting ``P`` using the public
key ``K``. The ciphertext `C` is of the form
`C = (c_1, c_2, \dots, c_t, x_{t+1})`. Each `c_i` is a
sub-block of binary string and `x_{t+1}` is the result of the
`t+1`-th iteration of the Blum-Blum-Shub algorithm.
ALGORITHM:
The Blum-Goldwasser encryption algorithm is described in Algorithm
8.56, page 309 of [MvOV1996]_. The algorithm works as follows:
#. Let `n` be a public key, where `n = pq` is the product of two
distinct Blum primes `p` and `q`.
#. Let `k = \lfloor \log_2(n) \rfloor` and
`h = \lfloor \log_2(k) \rfloor`.
#. Let `m = m_1 m_2 \cdots m_t` be the message (plaintext) where
each `m_i` is a binary string of length `h`.
#. Choose a random seed `x_0`, which is a quadratic residue in
the multiplicative group `(\ZZ/n\ZZ)^{\ast}`. That is, choose
a random `r \in (\ZZ/n\ZZ)^{\ast}` and compute
`x_0 = r^2 \bmod n`.
#. For `i` from 1 to `t`, do:
#. Let `x_i = x_{i-1}^2 \bmod n`.
#. Let `p_i` be the `h` least significant bits of `x_i`.
#. Let `c_i = p_i \oplus m_i`.
#. Compute `x_{t+1} = x_t^2 \bmod n`.
#. The ciphertext is `c = (c_1, c_2, \dots, c_t, x_{t+1})`.
The value `h` in the algorithm is the sub-block length. If the
binary string representing the message cannot be divided into blocks
of length `h` each, then other sub-block lengths would be used
instead. The sub-block lengths to fall back on are in the
following order: 16, 8, 4, 2, 1.
EXAMPLES:
The following encryption example is taken from Example 8.57,
pages 309--310 of [MvOV1996]_. Here, we encrypt a binary
string::
sage: from sage.crypto.public_key.blum_goldwasser import BlumGoldwasser
sage: bg = BlumGoldwasser()
sage: p = 499; q = 547; n = p * q
sage: P = "10011100000100001100"
sage: C = bg.encrypt(P, n, seed=159201); C
([[0, 0, 1, 0], [0, 0, 0, 0], [1, 1, 0, 0], [1, 1, 1, 0], [0, 1, 0, 0]], 139680)
Convert the ciphertext sub-blocks into a binary string::
sage: bin = BinaryStrings()
sage: bin(flatten(C[0]))
00100000110011100100
Now encrypt an ASCII string. The result is random; no seed is
provided to the encryption function so the function generates its
own random seed::
sage: from sage.crypto.public_key.blum_goldwasser import BlumGoldwasser
sage: bg = BlumGoldwasser()
sage: K = 32300619509
sage: P = "Blum-Goldwasser encryption"
sage: bg.encrypt(P, K) # random
([[1, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 0, 0, 1, 0, 0], \
[1, 0, 0, 1, 1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 1, 1], \
[0, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 1, 0, 0, 0, 0], \
[0, 0, 1, 1, 0, 0, 1, 0, 0, 1, 1, 1, 1, 0, 1, 1], \
[1, 0, 0, 1, 0, 1, 0, 1, 1, 1, 0, 0, 1, 0, 0, 0], \
[0, 0, 1, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 0, 1], \
[1, 1, 1, 0, 0, 1, 1, 1, 0, 1, 0, 0, 1, 0, 0, 0], \
[1, 1, 0, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 1], \
[0, 1, 0, 1, 0, 0, 0, 1, 0, 1, 0, 1, 0, 1, 0, 0], \
[1, 0, 1, 1, 0, 1, 0, 0, 1, 1, 0, 1, 0, 1, 0, 1], \
[1, 1, 1, 0, 0, 1, 1, 1, 0, 1, 0, 1, 0, 1, 0, 1], \
[1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 0, 0, 1, 0], \
[0, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 1, 1, 1]], 3479653279)
TESTS:
The plaintext cannot be an empty string. ::
sage: from sage.crypto.public_key.blum_goldwasser import BlumGoldwasser
sage: bg = BlumGoldwasser()
sage: bg.encrypt("", 3)
Traceback (most recent call last):
...
ValueError: The plaintext cannot be an empty string.
"""
# sanity check
if P == "":
raise ValueError("The plaintext cannot be an empty string.")
n = K
k = floor(log(n, base=2))
h = floor(log(k, base=2))
bin = BinaryStrings()
M = ""
try:
# the plaintext is a binary string
M = bin(P)
except TypeError:
# encode the plaintext as a binary string
# An exception might be raised here if P cannot be encoded as a
# binary string.
M = bin.encoding(P)
# the number of plaintext sub-blocks; each sub-block has length h
t = 0
try:
# Attempt to use t and h values from the algorithm described
# in [MvOV1996].
t = len(M) / h
# If the following raises an exception, then we can't use
# the t and h values specified by [MvOV1996].
mod(len(M), t)
# fall back to using other sub-block lengths
except TypeError:
# sub-blocks of length h = 16
if mod(len(M), 16) == 0:
h = 16
t = len(M) // h
# sub-blocks of length h = 8
elif mod(len(M), 8) == 0:
h = 8
t = len(M) // h
# sub-blocks of length h = 4
elif mod(len(M), 4) == 0:
h = 4
t = len(M) // h
# sub-blocks of length h = 2
elif mod(len(M), 2) == 0:
h = 2
t = len(M) // h
# sub-blocks of length h = 1
else:
h = 1
t = len(M) // h
# If no seed is provided, select a random seed.
x0 = seed
if seed is None:
zmod = IntegerModRing(n) # K = n = pq
r = zmod.random_element().lift()
while gcd(r, n) != 1:
r = zmod.random_element().lift()
x0 = power_mod(r, 2, n)
# perform the encryption
to_int = lambda x: int(str(x))
C = []
for i in range(t):
x1 = power_mod(x0, 2, n)
p = least_significant_bits(x1, h)
# xor p with a sub-block of length h. There are t sub-blocks of
# length h each.
C.append(list(map(xor, p, [to_int(_) for _ in M[i*h : (i+1)*h]])))
x0 = x1
x1 = power_mod(x0, 2, n)
return (C, x1)
def ascii_to_bin(A):
r"""
Return the binary representation of the ASCII string ``A``.
INPUT:
- ``A`` -- a string or list of ASCII characters.
OUTPUT:
- The binary representation of ``A``.
ALGORITHM:
Let `A = a_0 a_1 \cdots a_{n-1}` be an ASCII string, where each `a_i` is
an ASCII character. Let `c_i` be the ASCII integer corresponding to `a_i`
and let `b_i` be the binary representation of `c_i`. The binary
representation `B` of `A` is `B = b_0 b_1 \cdots b_{n-1}`.
EXAMPLES:
The binary representation of some ASCII strings::
sage: from sage.crypto.util import ascii_to_bin
sage: ascii_to_bin("A")
01000001
sage: ascii_to_bin("Abc123")
010000010110001001100011001100010011001000110011
The empty string is different from the string with one space character.
For the empty string and the empty list, this function returns the same
result::
sage: from sage.crypto.util import ascii_to_bin
sage: ascii_to_bin("")
<BLANKLINE>
sage: ascii_to_bin(" ")
00100000
sage: ascii_to_bin([])
<BLANKLINE>
This function also accepts a list of ASCII characters. You can also pass
in a list of strings::
sage: from sage.crypto.util import ascii_to_bin
sage: ascii_to_bin(["A", "b", "c", "1", "2", "3"])
010000010110001001100011001100010011001000110011
sage: ascii_to_bin(["A", "bc", "1", "23"])
010000010110001001100011001100010011001000110011
TESTS:
For a list of ASCII characters or strings, do not mix characters or
strings with integers::
sage: from sage.crypto.util import ascii_to_bin
sage: ascii_to_bin(["A", "b", "c", 1, 2, 3])
Traceback (most recent call last):
...
TypeError: sequence item 3: expected string, sage.rings.integer.Integer found
sage: ascii_to_bin(["Abc", 1, 2, 3])
Traceback (most recent call last):
...
TypeError: sequence item 1: expected string, sage.rings.integer.Integer found
"""
bin = BinaryStrings()
return bin.encoding("".join(list(A)))
def blum_blum_shub(length, seed=None, p=None, q=None,
lbound=None, ubound=None, ntries=100):
r"""
The Blum-Blum-Shub (BBS) pseudorandom bit generator.
See the original paper by Blum, Blum and Shub [BlumBlumShub1986]_. The
BBS algorithm is also discussed in section 5.5.2 of [MenezesEtAl1996]_.
INPUT:
- ``length`` -- positive integer; the number of bits in the output
pseudorandom bit sequence.
- ``seed`` -- (default: ``None``) if `p` and `q` are Blum primes, then
``seed`` is a quadratic residue in the multiplicative group
`(\ZZ/n\ZZ)^{\ast}` where `n = pq`. If ``seed=None``, then the function
would generate its own random quadratic residue in `(\ZZ/n\ZZ)^{\ast}`.
If you provide a value for ``seed``, then it is your responsibility to
ensure that the seed is a quadratic residue in the multiplicative group
`(\ZZ/n\ZZ)^{\ast}`.
- ``p`` -- (default: ``None``) a large positive prime congruent to 3
modulo 4. Both ``p`` and ``q`` must be distinct. If ``p=None``, then
a value for ``p`` will be generated, where
``0 < lower_bound <= p <= upper_bound``.
- ``q`` -- (default: ``None``) a large positive prime congruence to 3
modulo 4. Both ``p`` and ``q`` must be distinct. If ``q=None``, then
a value for ``q`` will be generated, where
``0 < lower_bound <= q <= upper_bound``.
- ``lbound`` -- (positive integer, default: ``None``) the lower
bound on how small each random primes `p` and `q` can be. So we
have ``0 < lbound <= p, q <= ubound``. The lower bound must be
distinct from the upper bound.
- ``ubound`` -- (positive integer, default: ``None``) the upper
bound on how large each random primes `p` and `q` can be. So we have
``0 < lbound <= p, q <= ubound``. The lower bound must be distinct
from the upper bound.
- ``ntries`` -- (default: ``100``) the number of attempts to generate
a random Blum prime. If ``ntries`` is a positive integer, then
perform that many attempts at generating a random Blum prime. This
might or might not result in a Blum prime.
OUTPUT:
- A pseudorandom bit sequence whose length is specified by ``length``.
Here is a common use case for this function. If you want this
function to use pre-computed values for `p` and `q`, you should pass
those pre-computed values to this function. In that case, you only need
to specify values for ``length``, ``p`` and ``q``, and you do not need
to worry about doing anything with the parameters ``lbound`` and
``ubound``. The pre-computed values `p` and `q` must be Blum primes.
It is your responsibility to check that both `p` and `q` are Blum primes.
Here is another common use case. If you want the function to generate
its own values for `p` and `q`, you must specify the lower and upper
bounds within which these two primes must lie. In that case, you must
specify values for ``length``, ``lbound`` and ``ubound``, and you do
not need to worry about values for the parameters ``p`` and ``q``. The
parameter ``ntries`` is only relevant when you want this function to
generate ``p`` and ``q``.
.. NOTE::
Beware that there might not be any primes between the lower and
upper bounds. So make sure that these two bounds are
"sufficiently" far apart from each other for there to be primes
congruent to 3 modulo 4. In particular, there should be at least
two distinct primes within these bounds, each prime being congruent
to 3 modulo 4. This function uses the function
:func:`random_blum_prime() <sage.crypto.util.random_blum_prime>` to
generate random primes that are congruent to 3 modulo 4.
ALGORITHM:
The BBS algorithm as described below is adapted from the presentation
in Algorithm 5.40, page 186 of [MenezesEtAl1996]_.
#. Let `L` be the desired number of bits in the output bit sequence.
That is, `L` is the desired length of the bit string.
#. Let `p` and `q` be two large distinct primes, each congruent to 3
modulo 4.
#. Let `n = pq` be the product of `p` and `q`.
#. Select a random seed value `s \in (\ZZ/n\ZZ)^{\ast}`, where
`(\ZZ/n\ZZ)^{\ast}` is the multiplicative group of `\ZZ/n\ZZ`.
#. Let `x_0 = s^2 \bmod n`.
#. For `i` from 1 to `L`, do
#. Let `x_i = x_{i-1}^2 \bmod n`.
#. Let `z_i` be the least significant bit of `x_i`.
#. The output pseudorandom bit sequence is `z_1, z_2, \dots, z_L`.
EXAMPLES:
A BBS pseudorandom bit sequence with a specified seed::
sage: from sage.crypto.stream import blum_blum_shub
sage: blum_blum_shub(length=6, seed=3, p=11, q=19)
110000
You could specify the length of the bit string, with given values for
``p`` and ``q``::
sage: blum_blum_shub(length=6, p=11, q=19) # random
001011
Or you could specify the length of the bit string, with given values for
the lower and upper bounds::
sage: blum_blum_shub(length=6, lbound=10**4, ubound=10**5) # random
110111
Under some reasonable hypotheses, Blum-Blum-Shub [BlumBlumShub1982]_
sketch a proof that the period of the BBS stream cipher is equal to
`\lambda(\lambda(n))`, where `\lambda(n)` is the Carmichael function of
`n`. This is verified below in a few examples by using the function
:func:`lfsr_connection_polynomial() <sage.crypto.lfsr.lfsr_connection_polynomial>`
(written by Tim Brock) which computes the connection polynomial of a
linear feedback shift register sequence. The degree of that polynomial
is the period. ::
sage: from sage.crypto.stream import blum_blum_shub
sage: from sage.crypto.util import carmichael_lambda
sage: carmichael_lambda(carmichael_lambda(7*11))
4
sage: s = [GF(2)(int(str(x))) for x in blum_blum_shub(60, p=7, q=11, seed=13)]
sage: lfsr_connection_polynomial(s)
x^3 + x^2 + x + 1
sage: carmichael_lambda(carmichael_lambda(11*23))
20
sage: s = [GF(2)(int(str(x))) for x in blum_blum_shub(60, p=11, q=23, seed=13)]
sage: lfsr_connection_polynomial(s)
x^19 + x^18 + x^17 + x^16 + x^15 + x^14 + x^13 + x^12 + x^11 + x^10 + x^9 + x^8 + x^7 + x^6 + x^5 + x^4 + x^3 + x^2 + x + 1
TESTS:
Make sure that there is at least one Blum prime between the lower and
upper bounds. In the following example, we have ``lbound=24`` and
``ubound=30`` with 29 being the only prime within those bounds. But 29
is not a Blum prime. ::
sage: from sage.crypto.stream import blum_blum_shub
sage: blum_blum_shub(6, lbound=24, ubound=30, ntries=10)
Traceback (most recent call last):
...
ValueError: No Blum primes within the specified closed interval.
Both the lower and upper bounds must be greater than 2::
sage: blum_blum_shub(6, lbound=2, ubound=3)
Traceback (most recent call last):
...
ValueError: Both the lower and upper bounds must be > 2.
sage: blum_blum_shub(6, lbound=3, ubound=2)
Traceback (most recent call last):
...
ValueError: Both the lower and upper bounds must be > 2.
sage: blum_blum_shub(6, lbound=2, ubound=2)
Traceback (most recent call last):
...
ValueError: Both the lower and upper bounds must be > 2.
The lower and upper bounds must be distinct from each other::
sage: blum_blum_shub(6, lbound=3, ubound=3)
Traceback (most recent call last):
...
ValueError: The lower and upper bounds must be distinct.
The lower bound must be less than the upper bound::
sage: blum_blum_shub(6, lbound=4, ubound=3)
Traceback (most recent call last):
...
ValueError: The lower bound must be less than the upper bound.
REFERENCES:
.. [BlumBlumShub1982] L. Blum, M. Blum, and M. Shub.
Comparison of Two Pseudo-Random Number Generators.
*Advances in Cryptology: Proceedings of Crypto '82*,
pp.61--78, 1982.
.. [BlumBlumShub1986] L. Blum, M. Blum, and M. Shub.
A Simple Unpredictable Pseudo-Random Number Generator.
*SIAM Journal on Computing*, 15(2):364--383, 1986.
"""
# sanity checks
if length < 0:
raise ValueError("The length of the bit string must be positive.")
if (p is None) and (p == q == lbound == ubound):
raise ValueError("Either specify values for p and q, or specify values for the lower and upper bounds.")
# Use pre-computed Blum primes. Both the parameters p and q are
# assumed to be Blum primes. No attempts are made to ensure that they
# are indeed Blum primes.
randp = 0
randq = 0
if (p is not None) and (q is not None):
randp = p
randq = q
# generate random Blum primes within specified bounds
elif (lbound is not None) and (ubound is not None):
randp = random_blum_prime(lbound, ubound, ntries=ntries)
randq = random_blum_prime(lbound, ubound, ntries=ntries)
while randp == randq:
randq = random_blum_prime(lbound, ubound, ntries=ntries)
# no pre-computed primes given, and no appropriate bounds given
else:
raise ValueError("Either specify values for p and q, or specify values for the lower and upper bounds.")
# By now, we should have two distinct Blum primes.
n = randp * randq
# If no seed is provided, select a random seed.
x0 = seed
if seed is None:
zmod = IntegerModRing(n)
s = zmod.random_element().lift()
while gcd(s, n) != 1:
s = zmod.random_element().lift()
x0 = power_mod(s, 2, n)
# start generating pseudorandom bits
z = []
for i in xrange(length):
x1 = power_mod(x0, 2, n)
z.append(x1 % 2)
x0 = x1
bin = BinaryStrings()
return bin(z)
