Skip to main content
  • Home
  • login
  • Browse the archive

    swh mirror partner logo
swh logo
SoftwareHeritage
Software
Heritage
Mirror
Features
  • Search

  • Downloads

  • Save code now

  • Add forge now

  • Help

  • 0c094c0
  • /
  • test
  • /
  • recipes
  • /
  • 90-test_fipsload.t
Raw File
Permalinks

To reference or cite the objects present in the Software Heritage archive, permalinks based on SoftWare Hash IDentifiers (SWHIDs) must be used.
Select below a type of object currently browsed in order to display its associated SWHID and permalink.

  • content
  • directory
content badge Iframe embedding
swh:1:cnt:c4f713385d2f77d9ba7a52315f47a371751a8e54
directory badge Iframe embedding
swh:1:dir:77fae7e7c6f2167aa2619b5b7f6dda32006a57ce
90-test_fipsload.t
#! /usr/bin/env perl
# Copyright 2020 The OpenSSL Project Authors. All Rights Reserved.
#
# Licensed under the Apache License 2.0 (the "License").  You may not use
# this file except in compliance with the License.  You can obtain a copy
# in the file LICENSE in the source distribution or at
# https://www.openssl.org/source/license.html

use OpenSSL::Test qw/:DEFAULT srctop_dir bldtop_dir/;
use OpenSSL::Test::Utils;

BEGIN {
    setup('test_shlibload');
}
use lib srctop_dir('Configurations');
use lib bldtop_dir('.');
use platform;

plan skip_all => 'Test only supported in a shared build' if disabled('shared');
plan skip_all => 'Test is disabled on AIX' if config('target') =~ m|^aix|;
plan skip_all => 'Test is disabled on NonStop' if config('target') =~ m|^nonstop|;
plan skip_all => 'Test only supported in a dso build' if disabled('dso');
plan skip_all => 'Test is disabled in an address sanitizer build' unless disabled('asan');

plan tests => 1;

my $fips = bldtop_dir('providers', platform->dso('fips'));

ok(run(test(['moduleloadtest', $fips, 'OSSL_provider_init'])),
   "trying to load $fips in its own");

ENEA — Copyright (C), ENEA. License: GNU AGPLv3+.
Legal notes  ::  JavaScript license information ::  Web API

back to top