1#! /usr/bin/env perl 2# Copyright 2023 The OpenSSL Project Authors. All Rights Reserved. 3# 4# Licensed under the Apache License 2.0 (the "License"). You may not use 5# this file except in compliance with the License. You can obtain a copy 6# in the file LICENSE in the source distribution or at 7# https://www.openssl.org/source/license.html 8 9use strict; 10use OpenSSL::Test qw(:DEFAULT srctop_file); 11use OpenSSL::Test::Utils; 12 13setup("test_asn1_parse"); 14 15plan tests => 3; 16 17$ENV{OPENSSL_CONF} = srctop_file("test", "test_asn1_parse.cnf"); 18 19ok(run(app(([ 'openssl', 'asn1parse', 20 '-genstr', 'OID:1.2.3.4.1'])))); 21 22ok(run(app(([ 'openssl', 'asn1parse', 23 '-genstr', 'OID:1.2.3.4.2'])))); 24 25ok(run(app(([ 'openssl', 'asn1parse', 26 '-genstr', 'OID:1.2.3.4.3'])))); 27