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 ) { $version .= chr( ord('a') + $v4 - 1 ) if ($v4); }
  30         elsif ( $beta == 0 ) { $version .= "-dev"; }
  31         else                 { $version .= "-beta$beta"; }
  32         last;
  33     }
  34 }
  35 close(FD);
  36
  37 my $filename = $ARGV[0];
  38 $filename =~ /(.*)\.([^.]+)$/;
  39 my $basename = $1;
  40 my $extname  = $2;
  41
  42 my $description = "OpenSSL application";
  43 $description = "OpenSSL shared library" if $extname =~ /dll/i;
  44
  45 print <<___;
  46 #include <winver.h>
  47
  48 LANGUAGE 0x09,0x01
  49
  50 1 VERSIONINFO
  51   FILEVERSION $v1,$v2,$v3,$v4
  52   PRODUCTVERSION $v1,$v2,$v3,$v4
  53   FILEFLAGSMASK 0x3fL
  54 #ifdef _DEBUG
  55   FILEFLAGS 0x01L
  56 #else
  57   FILEFLAGS 0x00L
  58 #endif
  59   FILEOS VOS__WINDOWS32
  60   FILETYPE VFT_DLL
  61   FILESUBTYPE 0x0L
  62 BEGIN
  63     BLOCK "StringFileInfo"
  64     BEGIN
  65         BLOCK "040904b0"
  66         BEGIN
  67             // Required:
  68             VALUE "CompanyName", "The OpenSSL Project, http://www.openssl.org/\\0"
  69             VALUE "FileDescription", "$description\\0"
  70             VALUE "FileVersion", "$version\\0"
  71             VALUE "InternalName", "$basename\\0"
  72             VALUE "OriginalFilename", "$filename\\0"
  73             VALUE "ProductName", "The OpenSSL Toolkit\\0"
  74             VALUE "ProductVersion", "$version\\0"
  75             // Optional:
  76             //VALUE "Comments", "\\0"
  77             VALUE "LegalCopyright", "Copyright 1998-2016 The OpenSSL Authors. All rights reserved.\\0"
  78             //VALUE "LegalTrademarks", "\\0"
  79             //VALUE "PrivateBuild", "\\0"
  80             //VALUE "SpecialBuild", "\\0"
  81         END
  82     END
  83     BLOCK "VarFileInfo"
  84     BEGIN
  85         VALUE "Translation", 0x409, 0x4b0
  86     END
  87 END
  88 ___