Lines Matching +full:json +full:- +full:schema
3 # SPDX-License-Identifier: MIT
27 # format that can be consumed more easily by tests/zfs-tests/cmd/crypto_test.
28 # See tests/zfs-tests/tests/functional/crypto/README for more info.
34 use JSON qw(decode_json);
46 my $json = do { local $/; <$infh> };
49 my $data = decode_json $json;
54 my $version = $data->{generatorVersion} // "[unknown]";
55 if ("$version" !~ m/^0\.9[^0-9]/) {
63 my $schema = $data->{schema} // "[unknown]";
64 if ("$schema" ne 'aead_test_schema.json') {
67 " input file has schema: $schema\n".
72 my $algorithm = $data->{algorithm};
79 $ntests += $_ for map { scalar @{$_->{tests}} } @{$data->{testGroups}};
80 if (!exists $data->{numberOfTests}) {
82 } elsif ($data->{numberOfTests} != $ntests) {
84 "W: input file has incorrect test count: $data->{numberOfTests}\n".
89 say " schema: $schema";
109 for my $group (@{$data->{testGroups}}) {
110 # skip non-AEAD test groups
111 my $type = $group->{type} // "[unknown]";
114 $skipped += @{$data->{tests}};
142 for my $test (@{$group->{tests}}) {
167 if ($test->{flags}) {
168 $flags = join(' ', sort @{$test->{flags}});
189 $ntests -= $skipped;