2 # Copyright 2006-2018 The OpenSSL Project Authors. All Rights Reserved.
4 # Licensed under the OpenSSL license (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
13 use File::Spec::Functions;
15 my $versionfile = catfile( $config{sourcedir}, "include/openssl/opensslv.h" );
17 my ( $ver, $v1, $v2, $v3, $v4, $beta, $version );
19 open FD, $versionfile or die "Couldn't open include/openssl/opensslv.h: $!\n";
21 if (/OPENSSL_VERSION_NUMBER\s+(0x[0-9a-f]+)/i) {
24 $v2 = ( $ver >> 20 ) & 0xff;
25 $v3 = ( $ver >> 12 ) & 0xff;
26 $v4 = ( $ver >> 4 ) & 0xff;
28 $version = "$v1.$v2.$v3";
30 $version .= chr( ord('a') + $v4 - 1 ) if ($v4);
31 } elsif ( $beta == 0 ) {
34 $version .= "-beta$beta";
41 my $filename = $ARGV[0];
42 my $description = "OpenSSL library";
44 if ( $filename =~ /openssl/i ) {
45 $description = "OpenSSL application";
49 my $YEAR = [localtime()]->[5] + 1900;
56 FILEVERSION $v1,$v2,$v3,$v4
57 PRODUCTVERSION $v1,$v2,$v3,$v4
68 BLOCK "StringFileInfo"
73 VALUE "CompanyName", "The OpenSSL Project, https://www.openssl.org/\\0"
74 VALUE "FileDescription", "$description\\0"
75 VALUE "FileVersion", "$version\\0"
76 VALUE "InternalName", "$filename\\0"
77 VALUE "OriginalFilename", "$filename\\0"
78 VALUE "ProductName", "The OpenSSL Toolkit\\0"
79 VALUE "ProductVersion", "$version\\0"
81 //VALUE "Comments", "\\0"
82 VALUE "LegalCopyright", "Copyright 1998-$YEAR The OpenSSL Authors. All rights reserved.\\0"
83 //VALUE "LegalTrademarks", "\\0"
84 //VALUE "PrivateBuild", "\\0"
85 //VALUE "SpecialBuild", "\\0"
90 VALUE "Translation", 0x409, 0x4b0