3 # Copyright (C) 2016 Red Hat, Inc.
5 # This program is free software; you can redistribute it and/or modify
6 # it under the terms of the GNU General Public License as published by
7 # the Free Software Foundation; either version 2 of the License, or
8 # (at your option) any later version.
10 # This program is distributed in the hope that it will be useful,
11 # but WITHOUT ANY WARRANTY; without even the implied warranty of
12 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 # GNU General Public License for more details.
15 # You should have received a copy of the GNU General Public License
16 # along with this program. If not, see <http://www.gnu.org/licenses/>.
18 # Creator/Owner: Daniel P. Berrange <berrange@redhat.com>
20 # Exercise the QEMU 'luks' block driver to validate interoperability
21 # with the Linux dm-crypt + cryptsetup implementation
32 class LUKSConfig(object):
33 """Represent configuration parameters for a single LUKS
36 def __init__(self
, name
, cipher
, keylen
, mode
, ivgen
,
37 ivgen_hash
, hash, password
=None, passwords
=None):
44 self
.ivgen_hash
= ivgen_hash
47 if passwords
is not None:
48 self
.passwords
= passwords
53 self
.passwords
["0"] = "123456"
55 self
.passwords
["0"] = password
61 return "luks-%s.img" % self
.name
64 return os
.path
.join(iotests
.test_dir
, self
.image_name())
66 def device_name(self
):
67 return "qiotest-145-%s" % self
.name
69 def device_path(self
):
70 return "/dev/mapper/" + self
.device_name()
72 def first_password(self
):
75 if slot
in self
.passwords
:
76 return (self
.passwords
[slot
], slot
)
77 raise Exception("No password found")
79 def first_password_base64(self
):
80 (pw
, slot
) = self
.first_password()
81 return base64
.b64encode(pw
)
83 def active_slots(self
):
87 if slot
in self
.passwords
:
91 def verify_passwordless_sudo():
92 """Check whether sudo is configured to allow
93 password-less access to commands"""
95 args
= ["sudo", "-n", "/bin/true"]
97 proc
= subprocess
.Popen(args
,
98 stdin
=subprocess
.PIPE
,
99 stdout
=subprocess
.PIPE
,
100 stderr
=subprocess
.STDOUT
)
102 msg
= proc
.communicate()[0]
104 if proc
.returncode
!= 0:
105 iotests
.notrun('requires password-less sudo access: %s' % msg
)
108 def cryptsetup(args
, password
=None):
109 """Run the cryptsetup command in batch mode"""
111 fullargs
= ["sudo", "cryptsetup", "-q", "-v"]
112 fullargs
.extend(args
)
114 iotests
.log(" ".join(fullargs
), filters
=[iotests
.filter_test_dir
])
115 proc
= subprocess
.Popen(fullargs
,
116 stdin
=subprocess
.PIPE
,
117 stdout
=subprocess
.PIPE
,
118 stderr
=subprocess
.STDOUT
)
120 msg
= proc
.communicate(password
)[0]
122 if proc
.returncode
!= 0:
126 def cryptsetup_add_password(config
, slot
):
127 """Add another password to a LUKS key slot"""
129 (password
, mainslot
) = config
.first_password()
131 pwfile
= os
.path
.join(iotests
.test_dir
, "passwd.txt")
132 with
open(pwfile
, "w") as fh
:
133 fh
.write(config
.passwords
[slot
])
136 args
= ["luksAddKey", config
.image_path(),
141 cryptsetup(args
, password
)
146 def cryptsetup_format(config
):
147 """Format a new LUKS volume with cryptsetup, adding the
148 first key slot only"""
150 (password
, slot
) = config
.first_password()
152 args
= ["luksFormat"]
153 cipher
= config
.cipher
+ "-" + config
.mode
+ "-" + config
.ivgen
154 if config
.ivgen_hash
is not None:
155 cipher
= cipher
+ ":" + config
.ivgen_hash
156 elif config
.ivgen
== "essiv":
157 cipher
= cipher
+ ":" + "sha256"
158 args
.extend(["--cipher", cipher
])
159 if config
.mode
== "xts":
160 args
.extend(["--key-size", str(config
.keylen
* 2)])
162 args
.extend(["--key-size", str(config
.keylen
)])
163 if config
.hash is not None:
164 args
.extend(["--hash", config
.hash])
165 args
.extend(["--key-slot", slot
])
166 args
.extend(["--key-file", "-"])
167 args
.append(config
.image_path())
169 cryptsetup(args
, password
)
173 """Set the ownership of a open LUKS device to this user"""
175 path
= config
.device_path()
177 args
= ["sudo", "chown", "%d:%d" % (os
.getuid(), os
.getgid()), path
]
178 iotests
.log(" ".join(args
), filters
=[iotests
.filter_chown
])
179 proc
= subprocess
.Popen(args
,
180 stdin
=subprocess
.PIPE
,
181 stdout
=subprocess
.PIPE
,
182 stderr
=subprocess
.STDOUT
)
184 msg
= proc
.communicate()[0]
186 if proc
.returncode
!= 0:
187 raise Exception("Cannot change owner on %s" % path
)
190 def cryptsetup_open(config
):
191 """Open an image as a LUKS device"""
193 (password
, slot
) = config
.first_password()
195 args
= ["luksOpen", config
.image_path(), config
.device_name()]
197 cryptsetup(args
, password
)
200 def cryptsetup_close(config
):
201 """Close an active LUKS device """
203 args
= ["luksClose", config
.device_name()]
207 def delete_image(config
):
208 """Delete a disk image"""
211 os
.unlink(config
.image_path())
212 iotests
.log("unlink %s" % config
.image_path(),
213 filters
=[iotests
.filter_test_dir
])
214 except Exception as e
:
218 def create_image(config
, size_mb
):
219 """Create a bare disk image with requested size"""
222 iotests
.log("truncate %s --size %dMB" % (config
.image_path(), size_mb
),
223 filters
=[iotests
.filter_test_dir
])
224 with
open(config
.image_path(), "w") as fn
:
225 fn
.truncate(size_mb
* 1024 * 1024)
228 def qemu_img_create(config
, size_mb
):
229 """Create and format a disk image with LUKS using qemu-img"""
233 "cipher-alg=%s-%d" % (config
.cipher
, config
.keylen
),
234 "cipher-mode=%s" % config
.mode
,
235 "ivgen-alg=%s" % config
.ivgen
,
236 "hash-alg=%s" % config
.hash,
238 if config
.ivgen_hash
is not None:
239 opts
.append("ivgen-hash-alg=%s" % config
.ivgen_hash
)
241 args
= ["create", "-f", "luks",
243 ("secret,id=sec0,data=%s,format=base64" %
244 config
.first_password_base64()),
245 "-o", ",".join(opts
),
249 iotests
.log("qemu-img " + " ".join(args
), filters
=[iotests
.filter_test_dir
])
250 iotests
.log(iotests
.qemu_img_pipe(*args
), filters
=[iotests
.filter_test_dir
])
252 def qemu_io_image_args(config
, dev
=False):
253 """Get the args for access an image or device with qemu-io"""
258 "driver=file,filename=%s" % config
.device_path()]
262 ("secret,id=sec0,data=%s,format=base64" %
263 config
.first_password_base64()),
265 ("driver=luks,key-secret=sec0,file.filename=%s" %
266 config
.image_path())]
268 def qemu_io_write_pattern(config
, pattern
, offset_mb
, size_mb
, dev
=False):
269 """Write a pattern of data to a LUKS image or device"""
271 args
= ["-c", "write -P 0x%x %dM %dM" % (pattern
, offset_mb
, size_mb
)]
272 args
.extend(qemu_io_image_args(config
, dev
))
273 iotests
.log("qemu-io " + " ".join(args
), filters
=[iotests
.filter_test_dir
])
274 iotests
.log(iotests
.qemu_io(*args
), filters
=[iotests
.filter_test_dir
,
275 iotests
.filter_qemu_io
])
278 def qemu_io_read_pattern(config
, pattern
, offset_mb
, size_mb
, dev
=False):
279 """Read a pattern of data to a LUKS image or device"""
281 args
= ["-c", "read -P 0x%x %dM %dM" % (pattern
, offset_mb
, size_mb
)]
282 args
.extend(qemu_io_image_args(config
, dev
))
283 iotests
.log("qemu-io " + " ".join(args
), filters
=[iotests
.filter_test_dir
])
284 iotests
.log(iotests
.qemu_io(*args
), filters
=[iotests
.filter_test_dir
,
285 iotests
.filter_qemu_io
])
288 def test_once(config
, qemu_img
=False):
289 """Run the test with a desired LUKS configuration. Can either
290 use qemu-img for creating the initial volume, or cryptsetup,
291 in order to test interoperability in both directions"""
293 iotests
.log("# ================= %s %s =================" % (
294 "qemu-img" if qemu_img
else "dm-crypt", config
))
301 # 4 TB, so that we pass the 32-bit sector number boundary.
302 # Important for testing correctness of some IV generators
303 # The files are sparse, so not actually using this much space
304 image_size
= 4 * oneTB
306 iotests
.log("# Create image")
307 qemu_img_create(config
, image_size
/ oneMB
)
309 iotests
.log("# Create image")
310 create_image(config
, image_size
/ oneMB
)
313 highOffsetMB
= 3 * oneTB
/ oneMB
317 iotests
.log("# Format image")
318 cryptsetup_format(config
)
320 for slot
in config
.active_slots()[1:]:
321 iotests
.log("# Add password slot %s" % slot
)
322 cryptsetup_add_password(config
, slot
)
324 # First we'll open the image using cryptsetup and write a
325 # known pattern of data that we'll then verify with QEMU
327 iotests
.log("# Open dev")
328 cryptsetup_open(config
)
331 iotests
.log("# Set dev owner")
334 iotests
.log("# Write test pattern 0xa7")
335 qemu_io_write_pattern(config
, 0xa7, lowOffsetMB
, 10, dev
=True)
336 iotests
.log("# Write test pattern 0x13")
337 qemu_io_write_pattern(config
, 0x13, highOffsetMB
, 10, dev
=True)
339 iotests
.log("# Close dev")
340 cryptsetup_close(config
)
342 # Ok, now we're using QEMU to verify the pattern just
343 # written via dm-crypt
345 iotests
.log("# Read test pattern 0xa7")
346 qemu_io_read_pattern(config
, 0xa7, lowOffsetMB
, 10, dev
=False)
347 iotests
.log("# Read test pattern 0x13")
348 qemu_io_read_pattern(config
, 0x13, highOffsetMB
, 10, dev
=False)
351 # Write a new pattern to the image, which we'll later
352 # verify with dm-crypt
353 iotests
.log("# Write test pattern 0x91")
354 qemu_io_write_pattern(config
, 0x91, lowOffsetMB
, 10, dev
=False)
355 iotests
.log("# Write test pattern 0x5e")
356 qemu_io_write_pattern(config
, 0x5e, highOffsetMB
, 10, dev
=False)
359 # Now we're opening the image with dm-crypt once more
360 # and verifying what QEMU wrote, completing the circle
361 iotests
.log("# Open dev")
362 cryptsetup_open(config
)
365 iotests
.log("# Set dev owner")
368 iotests
.log("# Read test pattern 0x91")
369 qemu_io_read_pattern(config
, 0x91, lowOffsetMB
, 10, dev
=True)
370 iotests
.log("# Read test pattern 0x5e")
371 qemu_io_read_pattern(config
, 0x5e, highOffsetMB
, 10, dev
=True)
373 iotests
.log("# Close dev")
374 cryptsetup_close(config
)
376 iotests
.log("# Delete image")
381 # Obviously we only work with the luks image format
382 iotests
.verify_image_format(supported_fmts
=['luks'])
383 iotests
.verify_platform()
385 # We need sudo in order to run cryptsetup to create
386 # dm-crypt devices. This is safe to use on any
387 # machine, since all dm-crypt devices are backed
388 # by newly created plain files, and have a dm-crypt
389 # name prefix of 'qiotest' to avoid clashing with
391 verify_passwordless_sudo()
394 # If we look at all permutations of cipher, key size,
395 # mode, ivgen, hash, there are ~1000 possible configs.
397 # We certainly don't want/need to test every permutation
398 # to get good validation of interoperability between QEMU
399 # and dm-crypt/cryptsetup.
401 # The configs below are a representative set that aim to
402 # exercise each axis of configurability.
405 # A common LUKS default
406 LUKSConfig("aes-256-xts-plain64-sha1",
407 "aes", 256, "xts", "plain64", None, "sha1"),
410 # LUKS default but diff ciphers
411 LUKSConfig("twofish-256-xts-plain64-sha1",
412 "twofish", 256, "xts", "plain64", None, "sha1"),
413 LUKSConfig("serpent-256-xts-plain64-sha1",
414 "serpent", 256, "xts", "plain64", None, "sha1"),
415 # Should really be xts, but kernel doesn't support xts+cast5
416 # nor does it do essiv+cast5
417 LUKSConfig("cast5-128-cbc-plain64-sha1",
418 "cast5", 128, "cbc", "plain64", None, "sha1"),
419 LUKSConfig("cast6-256-xts-plain64-sha1",
420 "cast6", 256, "xts", "plain64", None, "sha1"),
423 # LUKS default but diff modes / ivgens
424 LUKSConfig("aes-256-cbc-plain-sha1",
425 "aes", 256, "cbc", "plain", None, "sha1"),
426 LUKSConfig("aes-256-cbc-plain64-sha1",
427 "aes", 256, "cbc", "plain64", None, "sha1"),
428 LUKSConfig("aes-256-cbc-essiv-sha256-sha1",
429 "aes", 256, "cbc", "essiv", "sha256", "sha1"),
430 LUKSConfig("aes-256-xts-essiv-sha256-sha1",
431 "aes", 256, "xts", "essiv", "sha256", "sha1"),
434 # LUKS default but smaller key sizes
435 LUKSConfig("aes-128-xts-plain64-sha256-sha1",
436 "aes", 128, "xts", "plain64", None, "sha1"),
437 LUKSConfig("aes-192-xts-plain64-sha256-sha1",
438 "aes", 192, "xts", "plain64", None, "sha1"),
440 LUKSConfig("twofish-128-xts-plain64-sha1",
441 "twofish", 128, "xts", "plain64", None, "sha1"),
442 LUKSConfig("twofish-192-xts-plain64-sha1",
443 "twofish", 192, "xts", "plain64", None, "sha1"),
445 LUKSConfig("serpent-128-xts-plain64-sha1",
446 "serpent", 128, "xts", "plain64", None, "sha1"),
447 LUKSConfig("serpent-192-xts-plain64-sha1",
448 "serpent", 192, "xts", "plain64", None, "sha1"),
450 LUKSConfig("cast6-128-xts-plain64-sha1",
451 "cast6", 128, "xts", "plain", None, "sha1"),
452 LUKSConfig("cast6-192-xts-plain64-sha1",
453 "cast6", 192, "xts", "plain64", None, "sha1"),
456 # LUKS default but diff hash
457 LUKSConfig("aes-256-xts-plain64-sha256",
458 "aes", 256, "xts", "plain64", None, "sha256"),
459 LUKSConfig("aes-256-xts-plain64-sha512",
460 "aes", 256, "xts", "plain64", None, "sha512"),
461 LUKSConfig("aes-256-xts-plain64-ripemd160",
462 "aes", 256, "xts", "plain64", None, "ripemd160"),
465 LUKSConfig("aes-256-xts-plain-sha1-pwslot3",
466 "aes", 256, "xts", "plain", None, "sha1",
471 # Passwords in every slot
472 LUKSConfig("aes-256-xts-plain-sha1-pwallslots",
473 "aes", 256, "xts", "plain", None, "sha1",
485 # Check handling of default hash alg (sha256) with essiv
486 LUKSConfig("aes-256-cbc-essiv-auto-sha1",
487 "aes", 256, "cbc", "essiv", None, "sha1"),
489 # Check that a useless hash provided for 'plain64' iv gen
490 # is ignored and no error raised
491 LUKSConfig("aes-256-cbc-plain64-sha256-sha1",
492 "aes", 256, "cbc", "plain64", "sha256", "sha1"),
497 # We don't have a cast-6 cipher impl for QEMU yet
498 "cast6-256-xts-plain64-sha1",
499 "cast6-128-xts-plain64-sha1",
500 "cast6-192-xts-plain64-sha1",
502 # GCrypt doesn't support Twofish with 192 bit key
503 "twofish-192-xts-plain64-sha1",
505 # We don't have sha512 hash wired up yet
506 "aes-256-xts-plain64-sha512",
508 # We don't have ripemd160 hash wired up yet
509 "aes-256-xts-plain64-ripemd160",
513 if "LUKS_CONFIG" in os
.environ
:
514 whitelist
= os
.environ
["LUKS_CONFIG"].split(",")
516 for config
in configs
:
517 if config
.name
in blacklist
:
518 iotests
.log("Skipping %s in blacklist" % config
.name
)
521 if len(whitelist
) > 0 and config
.name
not in whitelist
:
522 iotests
.log("Skipping %s not in whitelist" % config
.name
)
525 test_once(config
, qemu_img
=False)
527 # XXX we should support setting passwords in a non-0
528 # key slot with 'qemu-img create' in future
529 (pw
, slot
) = config
.first_password()
531 test_once(config
, qemu_img
=True)