# HG changeset patch
# User Shabe Razvi <shaber@symbian.org>
# Date 1274206386 -3600
# Node ID ebd3f79a304f35d8946acd7bf828953dfaae2ff2
# Parent  aba5f24f35c1208f73037a19648857e6be939c84
Rollback rom_sbs.pl to version that works correctly in flm/platform build

diff -r aba5f24f35c1 -r ebd3f79a304f kernel/eka/rombuild/rom_sbs.pl
--- a/kernel/eka/rombuild/rom_sbs.pl	Tue May 18 14:12:35 2010 +0100
+++ b/kernel/eka/rombuild/rom_sbs.pl	Tue May 18 19:13:06 2010 +0100
@@ -119,18 +119,16 @@
 	my @path = split(/\\/, $cwd);
 	shift(@path);
 	$toroot = ('..\\') x @path;
-	$toroot =~ s/\\$//;
-	#e32path supposed to be = to "\sf\os"
 	$e32path = $fp0;
-	$e32path =~ s/\\kernelhwsrv\\kernel\\eka\\rombuild\\rom_sbs\.pl$//i;
+	$e32path =~ s/\\kernelhwsrv\\kernel\\eka\\rombuild\\rom\.pl$//i;
 	$e32path =~ s/^[A-Za-z]://;
-	$rombuildpath = $toroot."\\sf\\os\\kernelhwsrv\\kernel\\eka\\rombuild";
+	$rombuildpath = $toroot."sf\\os\\kernelhwsrv\\kernel\\eka\\rombuild";
 	$Epoc32Path = $toroot;
 	$Epoc32Path =~ s/\\$//;
 	$Epoc32Path .= $EpocRoot . "epoc32";
 	$toolpath = "$Epoc32Path\\tools\\";
 	push @INC, $toolpath;
-	$BasePath = $toroot . $e32path."\\";
+	$BasePath = $toroot . $e32path;
 }
 
 use E32Plat;
@@ -239,7 +237,6 @@
 
 # First output the ROM name
 print OUT "\nromname=$romname\n";
-# Go through the iby file passed as parameter of this script and replace flags by proper values before copying the line in rom1.tmp.
 while(<X>) {
 	s/\#\#ASSP\#\#/$opts{'assp'}/;
 	s/\#\#VARIANT\#\#/$opts{'variant'}/;
@@ -315,7 +312,7 @@
 	# Unicode build
 	$cppcmd = "$Epoc32Path/gcc/bin/cpp $cppflags -D UNICODE $defines rom1.tmp rom2.tmp";
 } else {
-	$cppcmd = "$Epoc32Path/gcc/bin/cpp $cppflags $defines rom1.tmp rom2.tmp";
+	$cppcmd = "cpp $cppflags $defines rom1.tmp rom2.tmp";
 }
 print "Executing CPP:\n\t$cppcmd\n" if $debug;
 $ret = system($cppcmd);
@@ -596,10 +593,6 @@
 			if ($k and $line=~/^\s*kerneltrace/i) {
 				$line = "kerneltrace $k\n";
 			}
-			
-			# This next line is about converting all the / to \ to make sure that we are using the right format for the build generation	
-			$line =~ s/\//\\/g;
-			
 			print OUTPUT_FILE $line if !($line=~/^\s*REM\s+/i);
 		}
 	}