util/mkrc.pl

   1 #! /usr/bin/env perl
   2 # Copyright 2006-2016 The OpenSSL Project Authors. All Rights Reserved.
   3 #
   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
   8
   9 use strict;
  10 use warnings;
  11 use lib ".";
  12 use configdata;
  13 use File::Spec::Functions;
  14
  15 my $versionfile = catfile( $config{sourcedir}, "include/openssl/opensslv.h" );
  16
  17 my ( $ver, $v1, $v2, $v3, $v4, $beta, $version );
  18
  19 open FD, $versionfile or die "Couldn't open include/openssl/opensslv.h: $!\n";
  20 while (<FD>) {
  21     if (/OPENSSL_VERSION_NUMBER\s+(0x[0-9a-f]+)/i) {
  22         $ver     = hex($1);
  23         $v1      = ( $ver >> 28 );
  24         $v2      = ( $ver >> 20 ) & 0xff;
  25         $v3      = ( $ver >> 12 ) & 0xff;
  26         $v4      = ( $ver >>  4 ) & 0xff;
  27         $beta    = $ver & 0xf;
  28         $version = "$v1.$v2.$v3";
  29         if ( $beta == 0xf ) {
  30             $version .= chr( ord('a') + $v4 - 1 ) if ($v4);
  31         } elsif ( $beta == 0 ) {
  32             $version .= "-dev";
  33         } else {
  34             $version .= "-beta$beta";
  35         }
  36         last;
  37     }
  38 }
  39 close(FD);
  40
  41 my $filename = $ARGV[0];
  42 $filename =~ /(.*)\.([^.]+)$/;
  43 my $basename = $1;
  44 my $extname  = $2;
  45
  46 my $description = "OpenSSL application";
  47 $description = "OpenSSL shared library" if $extname =~ /dll/i;
  48
  49 print <<___;
  50 #include <winver.h>
  51
  52 LANGUAGE 0x09,0x01
  53
  54 1 VERSIONINFO
  55   FILEVERSION $v1,$v2,$v3,$v4
  56   PRODUCTVERSION $v1,$v2,$v3,$v4
  57   FILEFLAGSMASK 0x3fL
  58 #ifdef _DEBUG
  59   FILEFLAGS 0x01L
  60 #else
  61   FILEFLAGS 0x00L
  62 #endif
  63   FILEOS VOS__WINDOWS32
  64   FILETYPE VFT_DLL
  65   FILESUBTYPE 0x0L
  66 BEGIN
  67     BLOCK "StringFileInfo"
  68     BEGIN
  69         BLOCK "040904b0"
  70         BEGIN
  71             // Required:
  72             VALUE "CompanyName", "The OpenSSL Project, http://www.openssl.org/\\0"
  73             VALUE "FileDescription", "$description\\0"
  74             VALUE "FileVersion", "$version\\0"
  75             VALUE "InternalName", "$basename\\0"
  76             VALUE "OriginalFilename", "$filename\\0"
  77             VALUE "ProductName", "The OpenSSL Toolkit\\0"
  78             VALUE "ProductVersion", "$version\\0"
  79             // Optional:
  80             //VALUE "Comments", "\\0"
  81             VALUE "LegalCopyright", "Copyright 1998-2016 The OpenSSL Authors. All rights reserved.\\0"
  82             //VALUE "LegalTrademarks", "\\0"
  83             //VALUE "PrivateBuild", "\\0"
  84             //VALUE "SpecialBuild", "\\0"
  85         END
  86     END
  87     BLOCK "VarFileInfo"
  88     BEGIN
  89         VALUE "Translation", 0x409, 0x4b0
  90     END
  91 END
  92 ___