Subversion Repositories DevTools

Rev

Rev 1143 | Rev 1443 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1143 Rev 1145
Line 1... Line 1...
1
########################################################################
1
########################################################################
2
# Copyright (C) 2010 Vix-ERG Limited, All rights reserved
2
# Copyright (C) 1998-2012 Vix Technology, All rights reserved
3
#
3
#
4
# Module name   : MakeNsisDefs.pl
4
# Module name   : MakeNsisDefs.pl
5
# Module type   : Makefile system
5
# Module type   : Makefile system
6
# Compiler(s)   : Perl
6
# Compiler(s)   : Perl
7
# Environment(s): jats
7
# Environment(s): jats
Line 31... Line 31...
31
#   Global variables
31
#   Global variables
32
#
32
#
33
my  $VERSION = "1.0.0";                     # Update this
33
my  $VERSION = "1.0.0";                     # Update this
34
our $GBE_MAKE_TARGET;
34
our $GBE_MAKE_TARGET;
35
my $package_name = 'nsis_packager';
35
my $package_name = 'nsis_packager';
-
 
36
my $CurrentYear = 1900 + (localtime())[5];
-
 
37
 
-
 
38
################################################################################
-
 
39
#   The following strings have been obtained from Simon Davey in an email
-
 
40
#   to David Purdie dated Monday, 16 January 2012 3:40 PM
-
 
41
#
36
my $company_name ='Vix';
42
my $CompanyName = 'Vix IP Pty Ltd';
-
 
43
my $Copyright = $CompanyName . ' ' . $CurrentYear;
-
 
44
my $Trademark = $CompanyName;
-
 
45
#
-
 
46
################################################################################
37
 
47
 
38
#
48
#
39
#   Global variables - Options
49
#   Global variables - Options
40
#
50
#
41
my $opt_help = 0;
51
my $opt_help = 0;
Line 143... Line 153...
143
my $fh = ConfigurationFile::New( $opt_ofile, '--Type=NSIS' );
153
my $fh = ConfigurationFile::New( $opt_ofile, '--Type=NSIS' );
144
$fh->HeaderSimple( 'MakeNsisDefs',
154
$fh->HeaderSimple( 'MakeNsisDefs',
145
                   'NSIS Version Definitions' );
155
                   'NSIS Version Definitions' );
146
 
156
 
147
writeCmt( $fh, 'Company Information');
157
writeCmt( $fh, 'Company Information');
148
writeDef ($fh, 'GBE_COMPANY', $company_name );
158
writeDef ($fh, 'GBE_COMPANY', $CompanyName);
149
 
159
 
150
writeCmt( $fh, 'Build Package Information');
160
writeCmt( $fh, 'Build Package Information');
151
writeDef ($fh, 'GBE_BUILDNAME', $ScmBuildName );
161
writeDef ($fh, 'GBE_BUILDNAME', $ScmBuildName );
152
writeDef ($fh, 'GBE_PACKAGE',   $ScmBuildPackage );
162
writeDef ($fh, 'GBE_PACKAGE',   $ScmBuildPackage );
153
writeDef ($fh, 'GBE_VERSION',   $ScmBuildVersion );
163
writeDef ($fh, 'GBE_VERSION',   $ScmBuildVersion );
Line 172... Line 182...
172
                'User CAN provide:',
182
                'User CAN provide:',
173
                '     ProductName',
183
                '     ProductName',
174
                '     Comments',
184
                '     Comments',
175
                '     Other Random Fields');
185
                '     Other Random Fields');
176
    writeCmd( $fh,  'VIProductVersion', "$major.$minor.$patch.$build");
186
    writeCmd( $fh,  'VIProductVersion', "$major.$minor.$patch.$build");
177
    writeCmd( $fh,  'VIAddVersionKey',  'CompanyName', $company_name);
187
    writeCmd( $fh,  'VIAddVersionKey',  'CompanyName', $CompanyName);
178
    writeCmd( $fh,  '#VIAddVersionKey',  'FileDescription', 'Describe the Installer');
188
    writeCmd( $fh,  '#VIAddVersionKey',  'FileDescription', 'Describe the Installer');
179
#    writeCmd( $fh,  'VIAddVersionKey',  'LegalTrademarks', $company_name . ' is a Vix Technology company');
189
    writeCmd( $fh,  'VIAddVersionKey',  'LegalTrademarks', $Trademark);
180
    writeCmd( $fh,  'VIAddVersionKey',  'LegalCopyright', $company_name . '©');
190
    writeCmd( $fh,  'VIAddVersionKey',  'LegalCopyright', $Copyright);
181
    writeCmd( $fh,  'VIAddVersionKey',  'FileVersion', "$major.$minor.$patch.$build");
191
    writeCmd( $fh,  'VIAddVersionKey',  'FileVersion', "$major.$minor.$patch.$build");
182
}
192
}
183
 
193
 
184
#
194
#
185
#   Provide path information to important parts of the build system
195
#   Provide path information to important parts of the build system
Line 257... Line 267...
257
 
267
 
258
unless ( $opt_plain )
268
unless ( $opt_plain )
259
{
269
{
260
    writeCmt( $fh, 'Name, Branding and Caption');
270
    writeCmt( $fh, 'Name, Branding and Caption');
261
    writeCmd( $fh, 'Name', "$ScmBuildPackage ($ScmBuildVersionFull)" );
271
    writeCmd( $fh, 'Name', "$ScmBuildPackage ($ScmBuildVersionFull)" );
262
    writeCmd( $fh, 'BrandingText', $company_name );
272
    writeCmd( $fh, 'BrandingText', $CompanyName );
263
    writeCmd( $fh, 'Caption', $ScmBuildPackage );
273
    writeCmd( $fh, 'Caption', $ScmBuildPackage );
264
}
274
}
265
 
275
 
266
$fh->Write( "\n");
276
$fh->Write( "\n");
267
$fh->Close();
277
$fh->Close();