cross-plat-dev-utils/get_baseline.pm
author Mike Kinghan <mikek@symbian.org>
Thu, 25 Nov 2010 13:59:07 +0000
changeset 40 68f68128601f
parent 6 787612182dd0
permissions -rwxr-xr-x
1) Add the sbsv1 components from sftools/dev/build to make the linux_build package independent of the obsolete buildtools package. 2) Enhance romnibus.pl so that it generate the symbol file for the built rom when invoked by Raptor 3) Make the maksym.pl tool portable for Linux as well as Windows. 4) Remove the of armasm2as.pl from the e32tools component in favour of the copy now exported from sbsv1/e32util.

#!/usr/bin/perl
# Copyright (c) 2010 Symbian Foundation Ltd
# This component and the accompanying materials are made available
# under the terms of the License "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:
# Mike Kinghan, mikek@symbian.org, for Symbian Foundation Ltd - initial contribution.

# Subroutine to get the mercurial revision from which this package was branched
# from the file ../baseline.txt

use strict;
use File::Spec;
use places;

sub trim($)
{
	my $string = shift;
	$string =~ s/^\s+//;
	$string =~ s/\s+$//;
	return $string;
}

sub get_baseline()
{
	my $epocroot = get_epocroot();
	my $baseline_txt = File::Spec->catfile(get_pkg_dir(),"baseline.txt");
	open IN,"<$baseline_txt" or die $!;
	my @lines = <IN>;
	close IN;
	while(@lines and $lines[0] =~ /^\s*#/) {
		shift @lines;
	}
	die "*** Error: can't extract baseline revsion no. from ../baseline.txt ***",
		unless(@lines);
	return trim($lines[0]);
}

1;