#

# Copyright (c) 2009 Nokia Corporation and/or its subsidiary(-ies).

# All rights reserved.

# This component and the accompanying materials are made available

# under the terms of "Eclipse Public License v1.0"

# which accompanies this distribution, and is available

# at the URL "http://www.eclipse.org/legal/epl-v10.html".

#

# Initial Contributors:

# Nokia Corporation - initial contribution.

#

# Contributors:

#

# Description: 

#

#! /usr/local/bin/perl -w

#

#  Change history:

#

# 06-Aug-2006 : DLL versioning support added (Elftran tool)

# 02-Aug-2007 : Updated for changed RnD certificate path

#

#

#

sub updateVersion ;

sub signSis ;

my @args = @ARGV;

# signing related variables

my $certPath = "\\s60_RnD\\RD_RootCA";

my $certificate = "rd.cer";

my $key = "rd-key.pem";

my $version = "10.1";

my $packageFile = undef;

my $sisFile = undef;

# path to copy signed sis (if optional -c argument used)

my $copyPath = undef;

# 

my $updateDllVersion = 0;

# print help if needed

if ( scalar(@args) == 0 || 

     $args[0] =~ /-[h,\?]/i )

    {

print <<HELP;

-------------------------------------------------------------------------

======= Script for making and signing an installation (.sis) file =======

Usage: sisTool <package-file-w/o-ext> [-d<version>] [-c<destination-path>] 

               [-s<stub-package-file-w/o-ext>]

 -d changes minor DLL version number - needed when eclipsing DLLs in ROM.

 -c copies target file to specific destination

 -s also creates stub SIS. File name is not needed if it same as base file

    name followed by "_stub" (e.g. pkg files for eclipsing SIS and stub SIS

    are component.pkg and component_stub.pkg respectively).

Examples:

=========

sisTool myPackage -d2

  Creates and signs(* 'myPackage.sis' from 'myPackage.pkg'.

  Before creating sis file myPackage.pkg is searched for DLLs

  and their version numbers are changed to 10.2 (i.e. minor

  version is changed - default major version number is 10).

sisTool myPackage -d -s

  Same as first example but uses default minor version number (=1)

  for DLLs, and creates stub sis with name myPackage_stub.sis.

(* Uses R&D certificate 'rd.cer' from \\S60\\s60_RnD\\RD_RootCA

HELP

    exit;

    }

$packageFile = shift;

foreach ( @args ) {

    # check if dll version number should be updated

    if ( /-d(\d+)?\b/ ) {

        $version = $1 ;

        $version = 1 if ( not defined $version );            

        $updateDllVersion = 1;

        }

    # check if stub SIS should be created

    elsif ( /-s((\w|\.|\\|_|:|-)+)?/ )

        {

        my $stubPkgFile = "${packageFile}_stub.pkg";

        if ( defined $1 ) {

            # user defined stub

            $stubPkgFile = $1; 

            $stubPkgFile = $stubPkgFile . ".pkg" if $stubPkgFile !~ /\.pkg$/; 

            }        

        my $cmd = "makesis -s $stubPkgFile";

        print "\n";

        system "$cmd";

        print "\n";

        }

    $copyPath = $1 if /-c(\S+)/;

    }

if ( defined($packageFile) ) {

    ( -e "$packageFile.pkg" ) or die "package file '$packageFile' not found.\n";

    # Update version number of DLLs listed in pkg-file.

    updateVersion if $updateDllVersion;

    my $cmd = "makesis $packageFile\.pkg\n";

    if ( !defined( $sisFile ) ) {

        $sisFile = "$packageFile.sis";

        }

    #################

    # Do create sis #

    #################

    my $err = system "$cmd";

    die "\nFailed making sis file $!" if $err;

    signSis;

    if ( defined( $copyPath ) )

        {

        system "xcopy $sisFile $copyPath 2>&1";

        }

    }

sub signSis {

    # sign a sis file

    my $signedFile = "${sisFile}S\.sis";

    ( -e "$certPath\\$certificate" ) or die <<NOCERT;

Certificate could not be found from $certPath\\$certificate

Check and modifiy the path in line ~17 in the script if needed.

NOCERT

    my $cmd = "signsis -s $packageFile.sis $signedFile $certPath\\$certificate $certPath\\$key";        

    if ( system ( "$cmd" ) == 0 )

        {        

        # delete original unsigned sis file

        system "del $sisFile";

        system "ren $signedFile $sisFile";

        print "\nSigned with R&D certificate\n";

        if ( defined ( $copyPath ) ) {

            # copy signed sis to specified directory

            system "xcopy $sisFile $copyPath";

            }

        }        

    }

sub updateVersion {

    open PACKAGE, "<$packageFile.pkg";    

    foreach ( <PACKAGE> )

        {

        if ( /\"(.*?\.dll)\"/i ) 

            {                        

            system "elftran -version 10\.$version $1";

            system "elftran -compressionmethod bytepair $1";

            print STDOUT "\nUpdated version number of\n$1 to 10.$version\n";

            }

        }

    close PACKAGE;  

    }