--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/kerneltest/f32test/cfileman/utility/genfile.pl	Mon Oct 19 15:55:17 2009 +0100
@@ -0,0 +1,54 @@
+#
+# 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 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:
+# Nokia Corporation - initial contribution.
+#
+# Contributors:
+#
+# Description:
+#
+
+my $file=@ARGV[0];
+my $newfile=@ARGV[1];
+open TMP, $file;
+my $line;
+my @data;
+my $n=0;
+my $start=0;
+while (my $line = <TMP>)
+{
+   if (($start == 0) && ($line =~ /^.*SYMTestCaseID.*/i))
+   {
+      $start=1;
+   }
+   if ($start)
+   {
+     push @data,$line;
+   
+     if ($line =~ /^.*SYMTestStatus\s*Implemented.*/i)
+     {
+         push @data, "int dummy$n(){}";
+         push @data,"\n";
+         $n++;
+         $start = 0;
+         next;
+     }
+   }
+}
+
+close TMP;
+
+open DUMP, ">$newfile";
+print "* Writing $newfile\n";
+my $line;
+foreach $line (@data)
+{
+	print DUMP $line;
+}
+close DUMP;