--- a/userlibandfileserver/fatfilenameconversionplugins/group/cp54936_allbmp_fromunicode.pl	Mon Dec 21 16:14:42 2009 +0000
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,154 +0,0 @@
-#
-# Copyright (c) 2008-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: 
-# See line 99 of this file.
-#
-
-if (@ARGV != 2 && @ARGV != 3)
-	{
-	print <<EOD;
-Usage: cp54936_allbmp_fromunicode.pl cp54936_2byte.txt cp54936_4byte.txt cp54936_allbmp_fromunicode.cpp
-EOD
-	exit(1);
-	}
-
-my $root = "cp54936_allbmp_fromunicode.cpp";
-if (@ARGV == 3)
-	{
-	$root = $ARGV[3];
-	}
-
-
-my %lines;	# the hash table to hold all characters with key=unicode(dec) and value=foreign(string)
-
-
-# read 2 byte input file
-open (IN2, "<$ARGV[0]") or die ("Error: $ARGV[0] $!");
-my $lineNumber = 0;
-my $acceptLineNumber = 0;
-while (!eof(IN2))
-	{
-	my $line = <IN2>;
-	$lineNumber++;
-	if ($line =~ /^(0[xX][\da-fA-F]{1,4})\s*(0[xX][\da-fA-F]{1,4}).*/)
-		{
-		$acceptLineNumber++;
-		my $foreign = $1;
-		my $unicode = hex($2);
-		if (exists ($lines{$unicode}))
-			{
-			print "ERROR: Unicode $unicode is reused by $lines{$unicode} and $foreign.\n";
-			exit(1);
-			}
-		$lines{$unicode} = $foreign;
-		}
-	else
-		{
-		#print "Ignore line: $line";
-		}
-	}
-close IN2;
-print "\nRead $ARGV[0] done.\n";
-print "$acceptLineNumber of $lineNumber lines accepted.\n\n";
-
-
-# read 4 byte input file
-open (IN4, "<$ARGV[1]") or die ("Error: $ARGV[1] $!");
-$lineNumber = 0;
-$acceptLineNumber = 0;
-while (!eof(IN4))
-	{
-	my $line = <IN4>;
-	$lineNumber++;
-	if ($line =~ /^(0[xX]8[1-4]3\d[\da-fA-F]{2}3\d)\s*(0[xX][\da-fA-F]{4}).*/)
-		{
-		$acceptLineNumber++;
-		my $foreign = $1;
-		my $unicode = hex($2);
-		if (exists ($lines{$unicode}))
-			{
-			print "ERROR: Unicode $unicode is reused by $lines{$unicode} and $foreign.\n";
-			exit(1);
-			}
-		$lines{$unicode} = $foreign;
-		}
-	else
-		{
-		#print "Ignore line: $line";
-		}
-	}
-close IN4;
-print "Read $ARGV[1] done.\n";
-print "$acceptLineNumber of $lineNumber lines accepted.\n\n";
-
-
-# write to output file
-print "Write to $root...\n";
-open (CPP, ">$root") or die ("Error: Can't open cpp file");
-print CPP <<EOD;
-// Copyright (c) 2008-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:
-//
-// Generated by the cp54936_allbmp_fromunicode.pl tool - Do not edit!!!
-// Generated with \"perl -w ..\\group\\cp54936_allbmp_fromunicode.pl cp54936_2byte.txt cp54936_4byte.txt\".
-//
-
-#include <e32std.h>
-#include <e32def.h>
-#include "cp54936.h"
-
-const TUint8 KForeignReplacement = 0x5F;
-
-EOD
-print CPP "const TUint32 KMappingTableUnicodeBmp2CP54936\[65536\] = \n";
-print CPP "\t\{\n\t";
-
-my $bytecount = 0;
-my $expectUnicode = 0;
-while ($expectUnicode <= 0xFFFF)
-	{
-	if (exists ($lines{$expectUnicode}))
-		{
-		print CPP "$lines{$expectUnicode}, ";
-		}
-	else
-		{
-		print CPP "KForeignReplacement, ";
-		}
-	$bytecount += 4;
-	$expectUnicode++;
-	if (($expectUnicode % 16) == 0)
-		{
-		print CPP sprintf("// %04X - %04X\n\t", $expectUnicode-16, $expectUnicode-1);
-		}
-	}
-print CPP "};\t";
-
-$bytecount += 8;
-print CPP "// total byte count = $bytecount\n";
-print "\nTotal byte count: $bytecount.\n";
-close CPP;
-
-print "\nDone.";