openpgp: Add benchmark generate_keys.

2 files changed, 26 insertions, 0 deletions

diff --git a/openpgp/Cargo.toml b/openpgp/Cargo.toml
index d8186c8e..6747af09 100644
--- a/openpgp/Cargo.toml
+++ b/openpgp/Cargo.toml
@@ -83,5 +83,9 @@ name = "pad"
 required-features = ["compression-deflate"]
 
 [[bench]]
+name = "generate_keys"
+harness = false
+
+[[bench]]
 name = "read_keys"
 harness = false
diff --git a/openpgp/benches/generate_keys.rs b/openpgp/benches/generate_keys.rs
new file mode 100644
index 00000000..c006fd83
--- /dev/null
+++ b/openpgp/benches/generate_keys.rs
@@ -0,0 +1,22 @@
+use criterion::{criterion_group, criterion_main, Criterion};
+
+use sequoia_openpgp::cert::{Cert, CertBuilder};
+
+// Borrowed from chapter 01 of the guide
+// Generates an signing-capable key.
+fn generate_signing() -> sequoia_openpgp::Result<Cert> {
+    let (cert, _revocation) = CertBuilder::new()
+        .add_userid("someone@example.org")
+        .add_signing_subkey()
+        .generate()?;
+    Ok(cert)
+}
+
+fn bench_generate_keys(c: &mut Criterion) {
+    let mut group = c.benchmark_group("generate keys");
+    group.bench_function("signing", |b| b.iter(|| generate_signing()));
+    group.finish();
+}
+
+criterion_group!(benches, bench_generate_keys);
+criterion_main!(benches);